Galt ???
Hvad er der galt ??<% Response.Buffer = True %>
<html><head>
<title>Søgeresultat</title>
</head><body>
<script language=javascript>
function se(id,h,b) {
window.open(\"popup.asp?id=\"+id,\"new\",
\"resizable=0,scrollbars=1,toolbar=0,location=0,menubar=0,status=0,width=\"+b+\",height=\"+h)
}
</script>
<%
\' Henter værdien fra soeg.htm
strKeyword = Trim(Request.Form(\"Keyword\"))
If Len(strKeyword) = 0 Then
\' Hvis der ikke er skrevet i feltet
Response.Clear
Response.Redirect(\"search.htm\")
Else
\' Hvis der er skrevet i feltet
strKeyword = Replace(strKeyword,\"\'\",\"\'\'\")
End If
\' Opbygger en dynamisk SQL streng
strSQL = \"SELECT Navn, Tilmobil, Setgange FROM ringetoner WHERE\"
strSQL = strSQL & \" (Navn LIKE \'%\" & strKeyword & \"%\')\"
\' Skaber DSNLess forbindelse til DBen
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"XXXX\")
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open strDSN
\' Skaber et recordset udfra SQL strengen
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
\' Hvis der er fundet poster på søgningen
Response.Write \"<p>Søgeresultat</p>\"
Response.Write \"<table border=1>\"
Response.Write \"<tr><th>Navn</th><th>Telefon</th><th>Hits</th></tr>\"
Do While Not rs.EOF
Response.Write \"<tr><td>\" & rs(\"navn\") & \"</td>\"
Response.Write \"<td>\" & rs(\"tilmobil\") & \"</td>\"
Response.Write \"<td>\" & rs(\"setgange\") & \"</td></tr>\"
rs.MoveNext
Loop
Response.Write \"</table>\"
Else
\' Hvis der ikke er fundet poster på søgningen
Response.Write \"<p>Der er ikke fundet noget på denne søgning</p>\"
End If
\' Rydder op efter os
myConn.Close
Set myConn = Nothing
%>
</body></html>
når jeg lægger:
<a href=\'java script:se(\"<% = rs(\"id\") %>
efter den her linje:
Response.Write \"<tr><td>\" & rs(\"navn\") & \"</td>\"
så virkre den også opstår FEJL :(
på forhånd tak for hjælpen :)
