您的位置:首页 > 数据库 > MySQL

使用用VB处理MYSQL数据库中二进制数据问题

2006-07-11 11:10 531 查看
'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进制方式查看:

内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐