以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于窗口中的SQL 数据 修改问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=19995)

--  作者:yangchb1234
--  发布时间:2012/5/26 14:45:00
--  关于窗口中的SQL 数据 修改问题

设计了一个修改密码的按钮,当单击时可以将文本框里的数字改为新密码

 

 

大家看看代码哪里出了问题

 

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
图片点击可在新窗口打开查看

--  作者:sloyy
--  发布时间:2012/5/26 23:09:00
--  

vb程序员用foxtable常犯的错误 Textbox4.value   Textbox1.value 写错了 应该是 :

e.Form.Controls("textbox4").Value 

e.Form.Controls("textbox1").Value


--  作者:狐狸爸爸
--  发布时间:2012/5/28 8:48:00
--  

cmd.CommandText = "update {管理员信息} set [密码] = \'Textbox4.value\' where [编码] = \'" & e.Form.Controls("Textbox1").value & "\'"

 

参考:

 

http://www.foxtable.com/help/topics/1284.htm