



时间:2011-06-28 关注公众号 来源:中国IT实验室
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进制方式查看:
文章内容来源于网络,不代表本站立场,若侵犯到您的权益,可联系我们删除。(本站为非盈利性质网站)
电话:13918309914
QQ:1967830372
邮箱:rjfawu@163.com