Fejl!
Jeg har denne her side der skriver alle landsdelene ud:------------------Landsdel.asp--------------------------
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("foto.mdb")
Conn.Open DSN
strSQL = "Select * From TblLandsdel Order by Lid"
Set rs = Conn.Execute(strSQL)
response.write "<table border=""0"" cellspacing=""0"" cellpadding=""3""><tr><td valign=""top"">"
while not rs.eof
strNavn = rs("Lid")
response.write "</td></tr><tr><td valign=""top"">"
response.write "</td><td valign=""top"">"
strLink = "<font size=1 face=Verdana, Arial, Helvetica, sans-serif color=#000000><a href='vis.asp?id=" & rs("Lid")& "'>" & strNavn & "</a></font>"
Response.Write "<br>" & strLink
rs.MoveNext
wend
response.write "</ul></td></tr></table>"
%>
------------------Landsdel.asp SLUT---------------------
Derefter vil jeg gerne havde vis.asp til at skrive alle de byer med landsdel Iden ud . F.eks. Fyn - Odense
-----------------------Vis.asp--------------------------
<!--#INCLUDE FILE="adovbs.inc" -->
<!--#INCLUDE FILE="conn.inc" -->
<% strSQL = "Select * From TblBy where Lid = " & Request.Querystring("Lid")
Set rs = Conn.Execute(strSQL) %>
<% Response.Write"<table border=0 cellspacing=0 width=350><tr><td valign=top><b>" & rs("Lid") &"</b>" %>
<%
Response.Write "<br>" & rs("Lid") & "<br>"
Response.Write "</td></tr></table>"
Conn.Close
Set Conn = Nothing
%>
-----------------Vis.asp SLUT------------------
Det virker ikke jeg får denne fejl:
Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket "Lid =".
/natfoto/dropdownboks/vis.asp, line 10
Hvad gør jeg forkert
