UC知道用VB更新SQL数据库问题
来源：百度知道 编辑：UC知道 时间：2024/09/24 04:23:22
确认更新按键代码:
Private Sub Command2_Click()
Dim sql As String
sql = "update SDS set 单价/吨 = '" & Trim(Text6.Text) & "'"
Adodc1.Recordset.Update
Adodc1.Refresh
End Sub
TEXT6是输入数据文本框,
是不是海缺少什么代码?还是SQL语音引用位置不正确??
Private Sub Command2_Click()
Dim sql As String
sql = "update SDS set 单价/吨 = '" & Trim(Text6.Text) & "'"
Adodc1.Recordset.Update
Adodc1.Refresh
End Sub
TEXT6是输入数据文本框,
是不是海缺少什么代码?还是SQL语音引用位置不正确??
Private Sub Command2_Click()
Dim sql As String
sql = "update SDS set 单价/吨 = '" & Trim(Text6.Text) & "'"
Adodc1.RecordSource=sql '增加这一行
Adodc1.Recordset.Update
Adodc1.Refresh
End Sub
你的sql语句，是将dsd表中所有记录的“单价/吨”字段内容都改掉了
用了ado控件，就没必要用 update的sql语句了
直接给ado控件的fields属性赋值就可以了