三星原装充电器多少钱:VB数据库连接问题,这样写对吗。还用定义全局变量吗

来源:百度文库 编辑:神马品牌网 时间:2024/05/10 09:24:32
这样写提示至少一个参数未指定值,是为什么。还用定义全局变量吗,如果不对请帮改正
Private Sub Command1_Click()
Dim con As ADODB.Connection
Dim zrst As ADODB.Recordset
Set con = New ADODB.Connection
con.CursorLocation = adUseClient
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\sousousou\data\data.mdb;Persist Security Info=False"
con.Open
con.Execute "insert into sousousou(titledata,httpdata) VALUES(ddd,aaa)"
End Sub

Private Sub Command1_Click()
Dim con As new ADODB.Connection
Dim zrst As ADODB.Recordset
dim constring as string
constring= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\sousousou\data\data.mdb;Persist Security Info=False"
con.Open constring
con.Execute "insert into sousousou(titledata,httpdata) VALUES(ddd,aaa)"
End Sub

还有如果你的titledata和httpdata是字符型应该这样写:
con.Execute "insert into sousousou(titledata,httpdata) VALUES(‘ddd’,‘aaa’)"

con.Execute "insert into sousousou(titledata,httpdata) VALUES('ddd','aaa')"

zhangsilong说的对.