HJÆLPPPP!
Nu har jeg sedet og takket i dette script i 2,5 uge men kan ikke få lordet til at virke!!Det er 2 sider, det ene er der hvor man indtaster den dan skal søge på!
OG den anden side er der hvor den viser hvilke felter i databasen der passer på søgningen!
<% IF request.querystring(\"action\") = \"sog1\" THEN %>
<form method=\"post\" action=\"profil.asp?action=sog2\">
<center>
<table>
<tr>
<td>
Hvilket køn?
</td>
<td>
<select name=kon>
<option size=1 value=\"mand\">Mand</option>
<option size=1 value=\"kvinde\">Kvinde</option>
<option size=1 value=\"\">Bægge</option>
</select>
</td>
</tr>
<tr>
<td>
Ledig
</td>
<td>
<select name=ledig>
<option value=\"\">Lige meget</option>
<option size=1 value=\"1\">JA</option>
<option size=1 value=\"0\">Nej</option>
</select>
</td>
</tr>
<tr>
<td>
Hårfarve
</td>
<td>
<select style=\'width:155px\' name=\'Har\' size=\'1\'>
<option value=\"\">Lige meget</option>
<option value=\"Hvidt\">Hvidt</option>
<option value=\"Blond\">Blond</option>
<option value=\"Mørke blond\">Mørke blond</option>
<option value=\"Mørke brunt\">Mørke brunt</option>
<option value=\"Sort\">Sort</option>
<option value=\"Brunt\">Brunt</option>
<option value=\"Gråt\">Gråt</option>
<option value=\"Rødt\">Rødt</option>
<option value=\"Mørke rødt\">Mørke rødt</option>
<option value=\"Andet\">Andet</option>
</select>
</td>
</tr>
<tr>
<td>
Højde
</td>
<td> <input type=text size=\"3\" maxLength=\"3\" name=hojde1> og <input size=\"3\" maxLength=\"3\" type=text name=hojde2>cm.
</td>
</tr>
<tr>
<td>
Vægt
</td>
<td> <input type=text size=\"3\" maxLength=\"3\" name=vagt1> og <input size=\"3\" maxLength=\"3\" type=text name=vagt2>kg.
</td>
</tr>
<tr>
<td>
Alder mellem
</td>
<td> <input type=text size=\"3\" maxLength=\"2\" name=alder1> og <input size=\"3\" maxLength=\"2\" type=text name=alder2>år.
</td>
</tr>
<tr>
<td>
Brugern skal søge
</td>
<td><select name=soger>
<option value=\"\">Lige meget</option>
<option size=1 value=\"kærste\">Kæreste</option>
<option size=1 value=\"ven\">Ven</option>
</select>
</td>
</tr>
<tr>
<td>
Kropsbygning
</td>
<td>
<select style=\'width:155px\' name=\'bygning\' size=\'1\'>
<option value=\"\">Lige meget</option>
<option value=\"Spinkel\">Spinkel</option>
<option value=\"Almindelig\">Almindelig</option>
<option value=\"Robust\">Robust</option>
<option value=\"Buttet\">Buttet</option>
<option value=\"Overvægtig\">Overvægtig</option>
<option value=\"Handicappet\">Handicappet</option>
</select>
</td>
</tr>
<tr>
<td>
Børn
</td>
<td>
<select style=\'width:155px\' name=\'born\' size=\'1\'>
<option value=\"\">Lige meget</option>
<option value=\"Ingen\">Ingen</option>
<option value=\"1 Barn\">1 Barn</option>
<option value=\"2 børn\">2 børn</option>
<option value=\"3 børn eller flere\">3 børn eller flere</option>
<option value=\"Gravid\">Gravid</option>
</select>
</td>
</tr>
<tr>
<td>
Musik smag
</td>
<td>
<select style=\'width:155px\' name=\'Musik\' size=\'5\' MULTIPLE>
<option value=\"\">Lige meget</option>
<option value=\"Lidt af hvert\">Lidt af hvert</option>
<option value=\"Pop\">Pop</option>
<option value=\"Disco\">Disco</option>
<option value=\"Blues\">Blues</option>
<option value=\"Soul\">Soul</option>
<option value=\"Funk\">Funk</option>
<option value=\"Country\">Country</option>
<option value=\"Death Metal\">Death Metal</option>
<option value=\"Rock\">Rock</option>
<option value=\"Hard Rock\">Hard Rock</option>
<option value=\"Grunge Rock\">Grunge Rock</option>
<option value=\"Heavy Metal\">Heavy Metal</option>
<option value=\"Punk\">Punk</option>
<option value=\"Hip Hop\">Hip Hop</option>
<option value=\"Rap\">Rap</option>
<option value=\"Indie\">Indie</option>
<option value=\"Alternative\">Alternative</option>
<option value=\"Industrial\">Industrial</option>
<option value=\"Klassisk\">Klassisk</option>
<option value=\"Jazz\">Jazz</option>
<option value=\"New Age\">New Age</option>
<option value=\"Ambient\">Ambient</option>
<option value=\"Techno\">Techno</option>
<option value=\"Ethnic\">Ethnic</option>
<option value=\"World Beat\">World Beat</option>
<option value=\"Celtic\">Celtic</option>
</select>
</td>
</tr>
<tr>
<td>
Ryger
</td>
<td>
<select style=\'width:155px\' name=\'ryger\' size=\'1\'>
<option value=\"\">Lige meget</option>
<option value=\"Ikke ryger\">Ikke ryger</option>
<option value=\"Fest ryger\">Fest ryger</option>
<option value=\"Ryger\">Ryger</option>
<option value=\"Pibe\">Pibe</option>
<option value=\"Cigar\">Cigar</option>
</select>
</td>
</tr>
</table>
<input type=submit value=Søg>
</form>
</font>
</center>
<% END IF %>
<% IF request.querystring(\"action\") = \"sog2\" THEN %>
<center><font size=2>
<a href=\"profil.asp?action=ledigekon&kon=mand\">Ledige mænd</a>
-
<a href=\"profil.asp?action=ledigekon&kon=kvinde\">Ledige Kvinder</a>
-
<a href=\"profil.asp?action=all&kon=mand\">Alle mænd</a>
-
<a href=\"profil.asp?action=all&kon=kvinde\">Alle kvinder</a>
<br>
<form method=get action=\"profil.asp?action=sog\">Søg profil <input name=text type=text><input type=submit value=Søg></form>
</font>
</center>
<br>
<table width=\"98%\">
<tr>
<td><font size=\"2\">Nick name</font></td>
<td></td>
<td><font size=\"2\">Alder</font></td>
<td><font size=\"2\">Fri text</font></td>
<td><font size=\"2\">Sidst online</font></td>
</tr>
<%
hojde1 = request.querystring(\"hojde1\")
kon = request.querystring(\"kon\")
ledig = request.querystring(\"ledig\")
hojde2 = request.querystring(\"hojde2\")
vagt1 = request.querystring(\"vagt1\")
vagt2 = request.querystring(\"vagt2\")
alder1 = request.querystring(\"alder1\")
alder2 = request.querystring(\"alder2\")
soger = request.querystring(\"soger\")
bygning = request.querystring(\"bygning\")
born = request.querystring(\"born\")
musik = request.querystring(\"musik\")
ryger = request.querystring(\"ryger\")
dim tmpFelter(12), tmpSql(12)
tmpFelter = split(\"hojde1,kon,ledig,hojde2,vagt1,vagt2,alder1,alder2,soger,bygning,born,musik,ryger\",\",\")
for i = 0 to 12
if request(tmpFelter(i)) <> \"\" then
if tmpFelter(i) = \"musik\" then
tmpSql(i) = \" and [\" & tmpFelter(i) & \"] like %\"\" & lcase(request(\" & tmpFelter(i) & \")) & \"\"%\"
elseif tmpfelter(i) = \"hojde1\" or tmpfelter(i) = \"alder1\" or tmpfelter(i) = \"vagt1\" then
tmpSql(i) = \" and [\" & tmpFelter(i) & \"] > \'\"\" & request(\" & tmpFelter(i) & \") & \"\"\'\"
elseif tmpfelter(i) = \"hojde2\" or tmpfelter(i) = \"alder2\" or tmpfelter(i) = \"vagt2\" then
tmpSql(i) = \" and [\" & tmpFelter(i) & \"] < \'\"\" & request(\" & tmpFelter(i) & \") & \"\"\'\"
else
tmpSql(i) = \" and [\" & tmpFelter(i) & \"] = \'\"\" & lcase(request(\" & tmpFelter(i) & \")) & \"\"\'\"
end if
end if
endSql = endSql & tmpSql(i)
next
sql = \"select * from [users] where [date] = \" & cint(1) & endSql & \" order by [id] desc\"
set rs = conn.execute(sql)
%>
<tr>
<td><font size=\"2\"><a href=\"profilvis.asp?ID=<%=RS.Fields(\"id\")%>\"><%=RS.Fields(\"username\")%></a></font></td>
<td>
<%
p_sex = RS.Fields(\"p_sex\")
IF p_sex = \"mand\" THEN %> <img src=\"images/boy.gif\"> <% ELSE %><img src=\"images/girl.gif\"><% END IF %><%
pic = RS.Fields(\"pic\")
IF pic <> \"\" THEN %> <img src=\"images/pic.gif\"><% ELSE %> <% END IF %>
</td>
<td>Alder</td>
<td><font size=\"2\"><%=RS.Fields(\"p_txt\")%></font></td>
<td><font size=\"2\"><%=RS.Fields(\"gammelonlinetid\")%></font></td>
</tr>
</table>
<% END IF %>
