xp professional sp2 + vb6.0 + mysql5.0 + mysql odbc 3.51
使用ado 将access数据库中的表导入到mysql数据库中
dim adorst as new adodb.recordset mysql 数据库的st表
dim adoact as new adodb.recordset access 数据库的st表
dim i as integer
adorst.open “st”, “driver={mysql odbc 3.51 driver};server=127.0.0.1;database=mydb;;user=root;password=********;option=3;”, adopenstatic, adlockoptimistic, -1
adoact.open “st”, “provider=microsoft.jet.oledb.4.0;data source=c:\ks.mdb;persist security info=false”
dim tt() as byte
dim ss() as byte
tt = adoact.fields(1).value
ss = adoact.fields(2).value
adorst.addnew
adorst.fields(0).value = i
adorst.fields(1).value = tt
adorst.fields(2).value = ss
adorst.update
文本方式查看只有几个字符:
16进制方式查看: