| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3492 人关注过本帖
标题:如何在VB中实现向ACCESS数据库添加数据?
只看楼主 加入收藏
nameqjf
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2005-1-6
收藏
 问题点数:0 回复次数:4 
如何在VB中实现向ACCESS数据库添加数据?
同上
搜索更多相关主题的帖子: 数据库 ACCESS 
2005-01-21 18:36
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
这个论坛置顶贴里原来贴过数据库的教程,不只跑哪去了。这个也不是一两句话就说得明白的,只能告诉楼主这个一般用ADO的技术来实现是比较好的办法。引用微软的ADO组件,里面两个对象一个是连接对象用来连接数据库。另一个记录集对象可以操作数据库,并实现添加删除查找数据的功能。
2005-01-21 23:18
jackie0663
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2005-10-13
收藏
得分:0 
2005-10-13 15:14
老鸟a
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2005-10-13
收藏
得分:0 

2005-10-13 15:27
qgh603
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2012-11-22
收藏
得分:0 
Private Sub Command1_Click()
 Dim c As String
 Dim i As Integer
 Dim m As String, n As String

 Set Rs = Conn.Execute("select * from 销售表 where 工作令='" & Text1(0).Text & "'")
  SQL = "Insert Into [销售表](销售人员,工作令,出厂编号,位号,型号,面积,板片数量,板片材质,胶垫数量,胶垫材质,胶垫数量,标准,装箱) Values('" & Combo1(0).Text & "','" & Text1(0).Text & "','" & Text1(1).Text & "','" & Text1(2).Text & "','" & Combo1(1).Text & "','" & Text1(3).Text & "','" & Text1(4).Text & "','" & Text1(5).Text & "','" & Text1(6).Text & "','" & Text1(7).Text & "','" & m & "','" & n & "')"
 conn.Execute SQL
这样添加为什么报错了
 Rs.Fields(0) = Trim(Combo1(0).Text)
这中添加也不行
这是为什么呢?谢谢
 Rs.Close
2012-11-23 14:29
快速回复:如何在VB中实现向ACCESS数据库添加数据?
数据加载中...
 
   



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

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016142 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved