I am trying to establish an ADODB Connection to a hosted web site database but am getting lost. The following code seems to work down to opening the SQL Select statement, where I get the message "Internet Server Error: Module/Object Not Found". (I assume that I should be using the 192.168.1.1 address, or should this be the actual IP address for the hosted web site?)Hoping someone can please tell me how to resolve? Thanks
Private Sub test2()
Dim strConString As String
Dim strsql As String
strConString = "Provider=MS Remote;" & _
"Remote Server=http://192.168.1.1;" & _
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=e:\inetpub\111111\db\VacancyUpload.mdb;Persist Security Info=False"
'initialize connection object variable
Set adoConn = New ADODB.Connection
adoConn.Open strConString, "admin", "password
If adoConn.State = adStateOpen Then
MsgBox "Sorry. Connection to Web site not currently available."
strsql = "Select * from TblWebUpload"
'initialize recordset object variable
Set adoRst = New ADODB.Recordset
.Open strsql, adoConn 'ERROR 8209 OCCURS HERE
Note. If you will have multiple concurrent users connecting to the data, you may experience frequent data file corruption with Access. It's been documented that corruption is related to, among other factors, excessive delays or outright interruptions associated with updates. Since internet connections are inherently prone to delays, you might have issues.
"Lisa, in this house, we obey the laws of thermodynamics!" - Homer Simpson
"I have my standards. They may be low, but I have them!" - Bette Middler
"It's a book about a Spanish guy named Manual. You should read it." - Dilbert