Sql 如何更新单个字段值?
我使用MS Access数据库和具有字段的表stock:Sql 如何更新单个字段值?,sql,vb6,Sql,Vb6,我使用MS Access数据库和具有字段的表stock: 品牌名称 型号名称 股票 现在我想更新特定产品的库存价值。为此,我有两个输入框 我使用下面的代码 Private Sub cmddelstock_Click() Dim a As String Dim b As Integer a = InputBox("ENTER THE MODEL NAME HERE") b = Val(InputBox("ENTER NEW STOCK VALUE OF THE MODEL")) Ad
- 品牌名称
- 型号名称
- 股票
Private Sub cmddelstock_Click()
Dim a As String
Dim b As Integer
a = InputBox("ENTER THE MODEL NAME HERE")
b = Val(InputBox("ENTER NEW STOCK VALUE OF THE MODEL"))
Adodc1.RecordSource = "UPDATE stock SET Stock='b' where Model_Name='a' "
Adodc1.Refresh
我遇到的错误是from子句中的语法错误。
我不通过代码连接到数据库,而是通过右键单击然后转到属性连接到数据库。在这里,我使用连接字符串=microsoft jet oledb 4.0
然后在记录源选项卡命令type=1-adcmd type
我执行更新库存
现在,我应该在命令文本中使用什么?的.RecordSource属性就是:从中填充ADODBGrid的源。因此,您不能使用此属性发出
Update
SQL命令(顺便说一句,该命令本身有一些语法错误)
您需要将SQL字符串放入处理底层数据的类的某种.Execute子类中
我不熟悉ADO(我只使用DAO),但在DAO中这看起来像
dbStockDatabase.Execute "UPDATE Stock SET Stock.Stock=" & b & " WHERE Stock.Model_Name='" & a & "'"
在此语法中:
Adodc1.RecordSource = "UPDATE stock SET Stock='b' where Model_Name='a' "
a和b不是variabel,而是其字符,请将其更改为:
"UPDATE stock SET Stock='" & b & "' where Model_Name='" & a & "'"