编程论坛 → VB6论坛

求用VB文本框添加数据到SQL

sorla 发布于 2013-03-19 18:40， 473 次点击

数据库我用ADO控件连接的，想用ADO的Addnew，求各位帮忙。
另外在ADO的RecordSource输入什么SQL命令？

4 回复

Artless2013-03-19 19:48

比如
select * from 表

sorla2013-03-19 20:28

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("序号") = Text3.Text
Adodc1.Recordset.Fields("景点名") = Text1.Text
Adodc1.Recordset.Fields("景点信息") = Text2.Text
Adodc1.Recordset.Update
Adodc1.Refresh
MsgBox "添加成功"
End Sub
这段代码运行了就显示错误91 看看问题出在哪里

bczgvip2013-03-19 20:53

至少也要说说是哪一段代码错误吧。

Artless2013-03-20 12:53

以下是引用sorla在2013-3-19 20:28:23的发言：

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("序号") = Text3.Text
Adodc1.Recordset.Fields("景点名") = Text1.Text
Adodc1.Recordset.Fields("景点信息") = Text2.Text
Adodc1.Recordset.Update
Adodc1.Refresh
MsgBox "添加成功"
End Sub
这段代码运行了就显示错误91 看看问题出在哪里

找本书看吧