by Victor Francisco Cajarito (3 Submissions)
Category: Databases/Data Access/DAO/ADO
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Tue 16th January 2001
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection.
VBcoders
Private Sub CMDTrasfer_Click()
ADODC1.recordsource = "SELECT * from T1" 'SQL 6.5 DB must be connected to ODBC
ADODc1.refresh ' refresh the T1
ADODC2.recordsource = "SELECT * from Transfer" 'Access Database
ADODC2.refresh
'Start
on error resume next 'technique to control the loop while transfer
for i = 0 then Adodc1.recordset.eof
adodc2.recordset.addnew
adodc2.recordset!Field1 = adodc1.recordset!Field1
adodc2.recordset!Field2 = adodc1.recordset!Field2
adodc2.recordset!Field3 = adodc1.recordset!Field3
adodc2.recordset!Field4 = adodc1.recordset!Field4
adodc1.recordset.movenext ' read the next record from SQL 6.5
adodc2.recordset.update 'Update the table from Access
next i
adodc1.refresh
adodc2.refresh
End sub
No comments have been posted about Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection.. Why not be the first to post a comment about Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection..
