Cerating new record using ADO

[fizikas]

Hi, i wont to create new record in remote accsess db using ADO. I'm
using this code:

Dim cnn As ADODB.Connection

Dim rs As ADODB.Recordset

Set cnn = New ADODB.Connection

Set rs = New ADODB.Recordset

cnn.Open "Provider=MS Remote;Remote Server=http://www.xyx.com;" &
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & "Data
Source=c:\Inetpub\wwwroot\biblio.mdb;"

rs.Open "SELECT * From USERS", cnn, adOpenDynamic, adLockBatchOptimistic

rs.AddNew

rs("NAME") = "Jon"

rs("PHONENR") = "004900145245"

rs.Update

MsgBox rs.RecordCount

everything is ok, but untill my programm running. After new connection i
detected that record was not addet. Whats wrong?



PS. Sorry form my English.
--
Posted via http://dbforums.com

[Jerry Boone]

If you are getting connected, then it sounds like the permissions on the
file may be set to "read only".

There could be many possible reasons. How close are you to the database?
Do you have network access to the file or is it hosted by your ISP?

"fizikas" <me*********@dbforums.com> wrote in message
news:35****************@dbforums.com...

Hi, i wont to create new record in remote accsess db using ADO. I'm
using this code:

Dim cnn As ADODB.Connection

Dim rs As ADODB.Recordset

Set cnn = New ADODB.Connection

Set rs = New ADODB.Recordset

cnn.Open "Provider=MS Remote;Remote Server=http://www.xyx.com;" &
"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & "Data
Source=c:\Inetpub\wwwroot\biblio.mdb;"

rs.Open "SELECT * From USERS", cnn, adOpenDynamic, adLockBatchOptimistic

rs.AddNew

rs("NAME") = "Jon"

rs("PHONENR") = "004900145245"

rs.Update

MsgBox rs.RecordCount

everything is ok, but untill my programm running. After new connection i
detected that record was not addet. Whats wrong?



PS. Sorry form my English.
--
Posted via http://dbforums.com