设计了一个修改密码的按钮,当单击时可以将文本框里的数字改为新密码
大家看看代码哪里出了问题
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "update {管理员信息} set [密码] = 'Textbox4.value' where [编码] = 'Textbox1.value'"
If cmd.ExecuteNonQuery=1 Then
Messagebox.show("密码修改成功!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Return
Else
Messagebox.show("密码修改失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
DataTables("管理员信息").Save()
DataTables ("管理员信息_table2").Load()
此主题相关图片如下:1.png