Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection.
Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection.
Rate Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection.
(1(1 Vote))
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
Transfer a Database from SQL 6.5 to MS Access, using ADO controls and using a ODBC connection. Comments
No comments yet — be the first to post one!
Post a Comment