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
文本方式查看只有幾個字符

進制方式查看

From:http://tw.wingwit.com/Article/program/net/201311/13595.html