Søge funktion?

Hvis du giver mig tabelnavn + kolonnenavne o.s.v. vil jeg godt lave et eksempel til dig.

alternativt kan du sende databasen til mig

Lyder bare godt.

her er databasen + en fil med de forskellige ting der skal søges efter...

Så kom der åbenbart hul igennem til eksperten - det var da dejligt !!!

Sender du det til webmaster@pc-skole.dk, kigger jeg på det hurtigt

http://www.mobiltoner.dk/sog.zip

skulle den være..

Her er et lille eksempel :
http://213.237.16.203/eksperten/søgefunktion/

er det noget i den stil du tænker på ?

Prøv f.eks. at søge efter kvinde , Ryger, Øvrige Sjælland

kan jeg lige få en adresse der virker?

har du snart lavet noget???

??????

<%
\' din database forbindelse  INDTAST SELV ADRESSEN
set conndb = server.createobject(\"adodb.connection\")
conndb.open \"driver={microsoft access driver (*.mdb)};dbq=\"

sql = \"select * from [login] where \"

\' normale indtastnings felter og dropdowns  -  felterne skal hedde det samme som det der står i databasen
Felt = split(\"navn,sex,ryger\",\",\")

for i = 0 to 2 \' 2 er det antal felter der står i Felt - 1
    if request(Felt(i)) <> \"\" then
        sql = sql & \"[\" & Felt(i) & \"] like \'%\" & request(Felt(i)) & \"%\' and \"
        tmpFound = true
    end if
next

sql = sql & \"[vaegt] => \" & request(\"vaegt1\") & \" and [vaegt] =< \" & request(\"vaegt2\") & \" and \"
sql = sql & \"[hojte] => \" & request(\"hojte1\") & \" and [hojte] =< \" & request(\"hojte2\") & \"\"

set rs = conndb.execute(sql)

if (rs.bof or rs.eof) then
    response.write \"Der blev ikke fundet noget!\")
else
    do while not rs.eof
        response.write rs(\"navn\")
    rs.movenext
    loop
end if

set rs = nothing

conndb.close
set conndb = nothing
%>

Bare spørg hvis du har nogle spørgsmål... du har jo min icq :)

Takker