Forbindelse til database
Jeg er ved at lære at lave forbindelser til database, men kan ikke få det til at virke? Hvad gør jeg galt. Den siger at en sætning( end if ) var ventetpå linie 24
<html>
<head>
<title>Nyt dokument</title>
</head>
<body>
<%
Dim strConnect
strConnect = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& _
Server.MapPath("database.mdb")
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.open strConnect
Set rs = objConn.execute("SELECT * FROM liste;")
do while not RS.eof
response.write "<hr>"
response.write RS("navn") & "<br>"
response.write RS("id") & "<br>"
RS.movenext
loop
end if
set conn = Nothing
%>
</body>
</html>
