Hente data fra en Access database
Jeg har lavet et script der henter ting ud fra en database.. Det skal lige nævnes at det er lavet ud fra den tutorial på html.dk!Min kode ser således ud:
<html>
<title>Hente data fra database</title>
<head>
</head>
<body>
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("demo.mdb")
Conn.Open DSN
' SQL forespørgsel
strSQL = "Select * From tblDemo Order By Navn"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
' Gennemløb Recordset (rs) med en løkke
Do
' Udskriv værdien af kolonnen Fornavn og fødselsdato
Response.Write "<table style=margin-top: 0; margin-bottom: 0 border=1><tr><TD WIDTH=450
BGCOLOR=FFFFFF>"
Response.Write rs("Fil-navn") & "</td><TD WIDTH=""450"" BGCOLOR=""FFFFFF""><a href=""" &
rs("Fil-adresse") & """>" & rs("Link-navn") & "</a></td>"
' Gå til næste Record i rs
rs.MoveNext
' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF
response.write "</tr></table>"
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
Den kan ses i aktion på:
http://frip.dk/coldice/download/visdb.asp
Men alligevel får jeg fejlen:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/coldice/download/visdb.asp, line 16
