Dim rsGeneric as Recordset
Dim cnnGeneric as Connection
set cnnGeneric = new Connection
cnnGeneric.Open "Provider=MS Remote;" _
& "Remote Provider=MSDataShape;" _
& "Remote Server=http://localhost
& "Data Source=Data.mdb
& "User Id=Distributor;Password=trythis1;"
set rsGeneric = new Recordset
strQuery = "Select * from Personnel"
.CursorLocation = adUseClient
.Open strQuery, cnnGeneric, adOpenStatic, adLockReadOnly
.ActiveConnection = nothing
Help me figure out why is this code always produce "Internet Server Error".
Or anybody can help me how to do the same thing. Thank you in advance.