VB Forum / Database Access / April 2008

My company has a VB6 application that accesses SQL Server 2005. Our
consultants demo this application from laptops that have SQL Express
installed. Periodically we need to repopulate the "demo" databases with data
from our development server. This should be done by the consultants who will
NOT have intimate knowledge of SQL Server therefore I built a small VB
application to:

1. Persist data from the development server to XML files
2. Open an ADO recordset with the XML files as the source, connect to the
"target" server (on the laptop) and update the recordset.

(Assume I have already cleared the target tables and reset IDENTITY counters)

Everything works except my .UpdateBatch() call when connected to the
"target" server - I do NOT get an error, the data simply doesn't appear.

Below is a sample of the code I use to import the XML file.

Dim adoRS As New ADODB.Recordset

With adoRS
 .Open "C:\Data\Address.xml", , adOpenStatic, adLockBatchOptimistic,
adCmdFile
 .ActiveConnection = strConn '< this is a valid connection string to my
target database, I have also tried an open ADODB.Connection object
 .UpdateBatch '< update appears to fail but no error generated
 Set .ActiveConnection = Nothing
 .Close
End With

I do not understand why the table is not populated.
I did notice that the XML file has a reference to the DB name on the old
server, the DB name on the target server will be different.

Any help greatly appreciated.

Regards,

Jim Leach