Provokerende fejl!!
Jeg skal have den til at markere når menu("id") er request("page_id"). Men det virker ikke.. Hvad går galt?<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../db/menu.mdb")
Conn.Open DSN
set menu = conn.execute("select * from index")
page_id = request("page_id")
response.write page_id
do until menu.eof
idet = menu("id")
if not page_id = idet then
response.write menu("site_name") & " " & idet & "<br>"
else
response.write "<b>" & menu("site_name") & " " & idet & "<br></b>"
end if
menu.movenext
loop
%>
