MS-Access Remote connection

[srisa]

Hello,
This is the code I am using to connect to a access database remotely.
(Actually I am connecting to database on the same machine. I couldn't get hold of a person with a dbms and net connection on his machine , to try remote connection)

Private Sub Command1_Click()
Set conn = New ADODB.Connection
'Set rs = New ADODB.Recordset
On Error GoTo dberror
 
With conn
  .ConnectionString = " PROVIDER = MS Remote ; " _
                     & "Remote Server = http://x.x.x.x;" _
                     & "Remote Provider = Microsoft.Jet.OLEDB.4.0 ;" _
                     & "Data Source = d:\nse\nsedata.mdb" _
                     & "User Id=Admin;Password=;"
  .Open
  
End With
'rs.Open "todaydeal", conn, adOpenKeyset, adLockOptimistic, adCmdTable
MsgBox ("successfully opened the connection")
Exit Sub
dberror:
  MsgBox ("error connecting to database")
Print Err.Source
Print Err.Number
Print Err.Description
End Sub

This part works fine.
When I uncomment the statements involving recordsets, then I am getting the error:
microsoft ado/rds
8447
internet server error
I didn't post the actual ip address. May be I am getting paranoid , but I was not sure if it was the right thing to do.
What is it that I should do?
Thank you.