alleycraine
Programmer
We have a VB app that connects to Oracle. It was doing just fine until we had to modify the code because the XP users could not get connect to Oracle - See code below.
Now on only a few users machines When I try to run the application that connects to Oracle I get the Error 1114- could not load sqresus.dll.
Tried to re-install oracle client with no use.
The DB is Oracle 8i.
yesno = MsgBox("Is your system an XP system?", vbYesNo)
Set gOCnn = New ADODB.Connection
uid = clean_string(DLOOKUP("Oracle_User", "tbl_Environment_ref"))
pw = clean_string(DLOOKUP("Oracle_pw", "tbl_Environment_ref"))
With gOCnn
If yesno = vbNo Then
.ConnectionString = "Driver={Oracle ODBC Driver};" & _
"Dbq=Jidb;Uid=" & uid & ";Pwd=" & pw
Else
.ConnectionString = "Driver={Oracle in Oracle9};" & _
"Dbq=Jidb;Uid=" & uid & ";Pwd=" & pw
End If
.Open
End With
Oh, to connect to Oracle we have our Tnsnames file in the same directory location as the exe. This has been working fine.
Now on only a few users machines When I try to run the application that connects to Oracle I get the Error 1114- could not load sqresus.dll.
Tried to re-install oracle client with no use.
The DB is Oracle 8i.
yesno = MsgBox("Is your system an XP system?", vbYesNo)
Set gOCnn = New ADODB.Connection
uid = clean_string(DLOOKUP("Oracle_User", "tbl_Environment_ref"))
pw = clean_string(DLOOKUP("Oracle_pw", "tbl_Environment_ref"))
With gOCnn
If yesno = vbNo Then
.ConnectionString = "Driver={Oracle ODBC Driver};" & _
"Dbq=Jidb;Uid=" & uid & ";Pwd=" & pw
Else
.ConnectionString = "Driver={Oracle in Oracle9};" & _
"Dbq=Jidb;Uid=" & uid & ";Pwd=" & pw
End If
.Open
End With
Oh, to connect to Oracle we have our Tnsnames file in the same directory location as the exe. This has been working fine.