2017-03-26 84 views

回答

1
Dim Conn As New ADODB.Connection 
Conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & server & ";DATABASE=" & database & ";UID=" & user & ";PWD=" & pass & ";PORT=" & port & ";" 
Conn.Open() 
Conn.Execute("insert into tblname (fld1,fld2) values('"& textVal &"',"& numericVal &")") 
Conn.Close() 
Conn = Nothing 

粘贴.vb文件并编辑connectionstring &插入字符串。 祝你好运..

+0

而;添加COM参考Microsoft ActiveX数据对象6.x库 – Emre

相关问题