如何在VB中实现向ACCESS数据库添加数据？ - 编程论坛

#2

yms1232005-01-21 23:18

这个论坛置顶贴里原来贴过数据库的教程，不只跑哪去了。这个也不是一两句话就说得明白的，只能告诉楼主这个一般用ADO的技术来实现是比较好的办法。引用微软的ADO组件，里面两个对象一个是连接对象用来连接数据库。另一个记录集对象可以操作数据库，并实现添加删除查找数据的功能。

#3

jackie06632005-10-13 15:14

#4

老鸟a2005-10-13 15:27

哦

#5

qgh6032012-11-23 14:29

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