Sensibilium
Programmer
I'm trying to connect to my Access 2K Database using Native OLEDB, but I receive the following error as a result of my useless code:
[tt]Microsoft JET Database Engine error '80004005'
Couldn't find installable ISAM.[/tt]
Following is my code (I suspect the SystemDB bit is the problem, but I can't find the solution anywhere):
[tt]<p>Fourth - Native OLEDBProvider<br>
<%
Dim oConn4
Dim oRS4
Dim vP 'Provider String
Set oConn4=Server.CreateObject("ADODB.Connection"
Set oRS4=Server.CreateObject("ADODB.Recordset"
vP = "Provider=Microsoft.Jet.OLEDB.3.51; "
vP = vP & "Data Source=C:\Inetpub\ "
vP = vP & "SystemDB=C:\Inetpub\wwwroot\Fairmont\db\system.mdw; Userid=User; pwd="
oConn4.ConnectionString = vP
oConn4.Open
Response.Write oConn4.Provider
oRS4.ActiveConnection = oConn4
oRS4.Open strSQL
Response.Write "<TABLE BORDER=1><TR><TD>"
Response.Write oRS4.GetString(,-1,vCol,vRow,"&nbsp;"
Response.Write "</TD></TR></TABLE>"
oRS4.Close
Set oRS4=Nothing
oConn4.Close
Set oConn4=Nothing
%>[/tt]
Ahdkaw
"What would you expect from a bunch of monkeys?"
[tt]Microsoft JET Database Engine error '80004005'
Couldn't find installable ISAM.[/tt]
Following is my code (I suspect the SystemDB bit is the problem, but I can't find the solution anywhere):
[tt]<p>Fourth - Native OLEDBProvider<br>
<%
Dim oConn4
Dim oRS4
Dim vP 'Provider String
Set oConn4=Server.CreateObject("ADODB.Connection"
Set oRS4=Server.CreateObject("ADODB.Recordset"
vP = "Provider=Microsoft.Jet.OLEDB.3.51; "
vP = vP & "Data Source=C:\Inetpub\ "
vP = vP & "SystemDB=C:\Inetpub\wwwroot\Fairmont\db\system.mdw; Userid=User; pwd="
oConn4.ConnectionString = vP
oConn4.Open
Response.Write oConn4.Provider
oRS4.ActiveConnection = oConn4
oRS4.Open strSQL
Response.Write "<TABLE BORDER=1><TR><TD>"
Response.Write oRS4.GetString(,-1,vCol,vRow,"&nbsp;"
Response.Write "</TD></TR></TABLE>"
oRS4.Close
Set oRS4=Nothing
oConn4.Close
Set oConn4=Nothing
%>[/tt]
Ahdkaw
"What would you expect from a bunch of monkeys?"