Hjälp med sök!

2 svar · 160 visningar · startad av McD 25 juli 2001

McDMedlem sedan mars 20002 520 inlägg

Frågan25 juli 2001 14:50#1

sökrutan

table width="679" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="3"> </td>
    <td width="533" valign="top" align="left"> 
      <div align="right">
        <form name="sok" method="post" action="default.asp?sida1=sok&sok=start">
           <select name="omrode">
              <option value="0" selected>--- Välj sökområde ----</option>
              <option value="0">Nyheter</option>
              <option value="1">Privat </option>
              <option value="2">Fiske</option>
              <option value="3">Försäljning</option>
              <option value="4">Spel</option>
              <option value="5">Diverse</option>
            </select>
            <input type="text" name="sokstrang" size="20" maxlength="19" value="--- Din Söksträng ---">
            <input type="submit" name="sok" value="Sök">
          </p>
            </td>
    <td width="3" valign="top" align="right"> </td>
  </tr>
</table>

sökkoden

<%
If request.querystring("sok") = "start" then
sokning = Request.Form("sokstrang")

SQL = "SELECT * FROM nyheter WHERE subject LIKE '%" & sokning & "%' OR text LIKE '%" & sokning & "%' OR namn LIKE '%" & sokning & "%' ORDER BY id DESC"
set rs = Databas.Execute(SQL)
antal = "0"
Do Until rs.EOF
antal = antal +1
counter = counter + 1
If counter Mod 2 = 0 then
color = "bilder/main.gif"
Else
color = "bilder/subject1.gif"
End If
%>

Frågan är nu? Hur får jag in det andra fältet "omrode" dvs i vilken tabell i databasen söksträngen ska leta i?

------------------
McD- Burgers for the people!

www.McDz.net www.SweQuake.com

[Redigerat av McD den 25 jul 2001]

cyprysMedlem sedan dec. 20003 563 inlägg

26 juli 2001 21:32#2

<%
If request.querystring("sok") = "start" then
sokning = Request.Form("sokstrang")
SQL = "SELECT * FROM [b]"&request.form("omrode")&"[/b] WHERE subject LIKE '%" & sokning & "%' OR text LIKE '%" & sokning & "%' OR namn LIKE '%" & sokning & "%' ORDER BY id DESC"
set rs = Databas.Execute(SQL)
antal = "0"
Do Until rs.EOF
antal = antal +1
counter = counter + 1
If counter Mod 2 = 0 then
color = "bilder/main.gif"
Else
color = "bilder/subject1.gif"
End If
%>

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

McDMedlem sedan mars 20002 520 inlägg

27 juli 2001 13:54#3

Tack! :)

ska kolla ikväll om det funkar...

men det borde ju funka :)

------------------
McD- Burgers for the people!

www.McDz.net www.SweQuake.com