<%
Dim adoCon
Dim rsGuestbook
Dim strSQL
Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("auth.mdb")
adoCon.Open "DSN=guestbook"
Set rsGuestbook = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT Sine FROM 2007;"
rsGuestbook.Open strSQL, adoCon
Do While not rsGuestbook.EOF
Response.Write ("<br>")
Response.Write (rsGuestbook("Sine"))
rsGuestbook.MoveNext
Loop
rsGuestbook.Close
Set rsGuestbook = Nothing
Set adoCon = Nothing
%>
I get this issue
"An error occurred on the server when processing the URL. Please contact the system administrator."
why???