vb怎么更新数据库中一条数据

添加： ’下面这句连接数据库指定表的所有字段 Adodc1.RecordSource = "select * from 库存表" ’下面这句添加记录 Adodc1.Recordset.AddNew 下面4句就是通过4个TEXTBOX控件输入字段的数据，如果是数字类型可以加VAL Adodc1.Recordset.Fields

用一个DO WHILE 循环,如果打开数据库的数据集为rs,主要语句如下:

数据查询语句:sql="select c,d from b where d=123"

rs.open sql,conn,1,3

do while not rs.eof

rs("c")=你设定的值

rs.movenext

loop

rs.update

rs.close

可能有下面两个错误:

1.if 语句是否成立.最好都用 cint()这个函数

2.sql 语句中的库存和商品ID是否用的数字类型.如果是的话你的SQL语句就是错的,比较数字类型的时候不需要加 '' 号

*************************

你先在IF语句里加一个msgbox "1",先看看是否运行.

还有你那个where前面要有个空格

---