forbind til database
Simpel databaseforbindelse virker ikke.. Jeg har denne bette kode men det virker ikke..<html>
<head>
<title>Database forbindelse</title>
</head>
<body>
<%
Set Conn = Server.Createobject("ADODB.Connection")
'--- Database forbindelse ---
conn = "DRIVER={Microsoft Access Driver (*.mdb)}; "
conn = conn & "DBQ=" & server.mappath("ugens.mdb")
Conn.Open strDSN
'--- SQL forspøgelse ---
Set RS = Conn.Execute("SELECT * FROM ugens")
%>
<table border="1" width="400">
<%
'--- Udskriv data ---
Do While Not RS.EOF
%>
<tr>
<td><%=RS("Id")%></td>
<td><%=RS("dato")%></td>
<td><%=RS("gerning")%></td>
</tr>
<%
RS.MoveNext
Loop
RS.close
Conn.Close
Set RS = nothing
Set Conn = nothing
%>
</table>
</body>
</html>
