vb引用ADO对象如何对数据库里的数据修改
这是编辑用户信息的确认编辑按钮PrivateSubCommand1_Click()DimupuserAsString'用来存储修改SQL的字符串DimjiluAsInte...
这是编辑用户信息的确认编辑按钮
Private Sub Command1_Click()
Dim upuser As String '用来存储修改SQL的字符串
Dim jilu As Integer '用来存储在datagrid里选择的编号的变量
jilu = Val(Text1.Text) '通过text1.text得到数据编号来修改数据库
MsgBox jilu '测试是否成功得到编号
upuser = "update 记录 set 姓名='" & (Text2.Text) & "' where 编号='jilu'" 'text2.text输入姓名用来修改
cnn.Execute upuser
MsgBox "成功"
End Sub
请前辈指点一下,这样写总是出现错误已经可以得到julu这个变量里的数字,可是执行到cnn.Execute upuser 会有错误提示标准表达式中数据类型不匹配!!
我的SQL语句那有错误~?
是为了通过判断编号用Text2.Text对数据的姓名进行修改 展开
Private Sub Command1_Click()
Dim upuser As String '用来存储修改SQL的字符串
Dim jilu As Integer '用来存储在datagrid里选择的编号的变量
jilu = Val(Text1.Text) '通过text1.text得到数据编号来修改数据库
MsgBox jilu '测试是否成功得到编号
upuser = "update 记录 set 姓名='" & (Text2.Text) & "' where 编号='jilu'" 'text2.text输入姓名用来修改
cnn.Execute upuser
MsgBox "成功"
End Sub
请前辈指点一下,这样写总是出现错误已经可以得到julu这个变量里的数字,可是执行到cnn.Execute upuser 会有错误提示标准表达式中数据类型不匹配!!
我的SQL语句那有错误~?
是为了通过判断编号用Text2.Text对数据的姓名进行修改 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询