Hi
Hopefully someone can help - many thanks in advance.
I am running Windows 7 Ultimate IIS 7.5, Access2007 and have tried to use the code on page 475 "testing our data store" but keep getting the HTTP 500 error. Is this a problem with my IIS configuration? - I have checked the coding zillions of times and can find no errors see below
Code:
<%Option Explicit%>
<html>
<head>
<title>Testing our connection</title>
</head>
<body>
<%
Dim adOpenForwardOnly, adLockReadOnly, adCmdTable
adOpenForwardOnly = 0
adLockReadOnly = 1
adCmdTable = 2
Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.Recordset")
Dim strDatabaseType
strDatabaseType = "Access"
'strDatabaseType = "MSDE"
If strDatabaseType = "Access" Then
objConn.Open "Provider=Microsoft.Jet.OLEDB.*;" & "Data Source=E:\ASP\databases\Movie2000.mdb;" & "Persist Security Info=False"
Else
objConn.Open "Provider=SQLOLEDB;Persist Security Info=False;" & "User ID=sa;Initial Catalog=Movie;" & "Initial File name=E:\MSSQL7\Data\Movie2000.mdf"
End If
objRS.Open "Movies", objConn, adOpenForwardOnly, adLockReadOnly, adCmdTable
While Not objRS.EOF
Response.Write objRS("Title") & "<br>"
objRS.MoveNext
Wend
objRS.Close
objConn.Close
Set objRS = Nothing
Set objConn = Nothing
%>
</body>
</html>
The code shows no problems until I get to the "If Then" bit then stops. IIS is running and will allow me to display another very simple page with a link to this page but the link gives me the error message as above
Thanks again for any help
