求用VB文本框添加数据到SQL - VB6论坛 - 编程论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 求用VB文本框添加数据到SQL

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 473 人关注过本帖

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

只看楼主加入收藏

sorla

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
帖　子：2
专家分：0
注　册：2013-3-19
结帖率：0

收藏

已结贴√ 问题点数：20 回复次数：4

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

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

搜索更多相关主题的帖子: 文本框　

发帖时间

2013-03-19 18:40

Artless

帅哥哟，离线，有人找我吗？

Rank: 19

Rank: 19

Rank: 19

Rank: 19

Rank: 19

Rank: 19

等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8

收藏

得分:10

比如
select * from 表

无知

发帖时间

2013-03-19 19:48

sorla

帅哥哟，离线，有人找我吗？

Rank: 1

等　级：新手上路
帖　子：2
专家分：0
注　册：2013-3-19

收藏

得分:0

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 看看问题出在哪里

发帖时间

2013-03-19 20:28

bczgvip

帅哥哟，离线，有人找我吗？

Rank: 14

Rank: 14

Rank: 14

Rank: 14

等　级：贵宾
威　望：66
帖　子：1310
专家分：5312
注　册：2009-2-26

收藏

得分:10

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

发帖时间

2013-03-19 20:53

Artless

帅哥哟，离线，有人找我吗？

Rank: 19

Rank: 19

Rank: 19

Rank: 19

Rank: 19

Rank: 19

等　级：贵宾
威　望：103
帖　子：4211
专家分：28888
注　册：2009-4-8

收藏

得分:0

以下是引用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 看看问题出在哪里

找本书看吧

无知

发帖时间

2013-03-20 12:53

快速回复：求用VB文本框添加数据到SQL

关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有，并保留所有权利。

Powered by Discuz, Processed in 0.024706 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved