Dim Adoact As New ADODBRecordset ACCESS 數據庫的ST表
Dim i As Integer
AdoRstOpen ST DRIVER={MySQL ODBC Driver};SERVER=;DATABASE=mydb;;USER=root;PASSWORD=********;OPTION=; adOpenStatic adLockOptimistic
AdoactOpen st Provider=MicrosoftJetOLEDB;Data Source=C:ksmdb;Persist Security Info=False
Dim tt() As Byte
Dim ss() As Byte
tt = adoactFields()Value
ss = adoactFields()Value
AdoRstAddNew
AdoRstFields()Value = i
AdoRstFields()Value = tt
AdoRstFields()Value = ss
AdoRstUpdate
文本方式查看只有幾個字符
![](http://tw.wingwit.com/Article/UploadFiles/201311/2013111310255465.jpg)
進制方式查看
![](http://tw.wingwit.com/Article/UploadFiles/201311/2013111310255498.jpg)
From:http://tw.wingwit.com/Article/program/net/201311/13595.html