以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  数据库修改问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50639)

--  作者:qianqian1530
--  发布时间:2014/5/10 11:29:00
--  数据库修改问题
不知道哪里错了,  想修改数据库

\'\'\'

Dim ID As String = e.Form.Controls("Label66").text
Dim 郵便番号 As String =  e.Form.Controls("TextBox1").Value


Dim OldUserName As String
Dim cmd As New SQLCommand
Dim Parts() As String = e.Form.Text.Split("-")
OldUserName = Parts(Parts.Length -1)
cmd.C

cmd.CommandText = "Update {請求書} Set [ID] = \'" & ID 
cmd.CommandText = cmd.CommandText & "\', [郵便番号] = \'" & 郵便番号 & "\' Where [ID]= \'" & OldUserName & "\'" 
If cmd.ExecuteNonQuery = 1 Then \'返回1表示更改成功
    Messagebox.show("OK!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
    Messagebox.show("更改用户失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

--  作者:Bin
--  发布时间:2014/5/10 11:32:00
--  
cmd.CommandText = "Update {請求書} Set [ID] = \'" & ID & "\', [郵便番号] = \'" & 郵便番号 & "\' Where [ID]= \'" & OldUserName & "\'" 

看起来没什么问题,提示什么错误?

把拼接的SQL语句弹出来看看

--  作者:qianqian1530
--  发布时间:2014/5/10 11:35:00
--  
没有提示错误, 直接 弹出对话框, 说   修改失败
--  作者:qianqian1530
--  发布时间:2014/5/10 11:36:00
--  
而且, 添加的时候是可以正常添加,  就是修改不行
--  作者:kunmails
--  发布时间:2014/5/10 11:39:00
--  
cmd.ExecuteNonQuery 的返回值不是1  弹窗看看就知道了!
--  作者:Bin
--  发布时间:2014/5/10 11:41:00
--  
弹出你拼接的SQL语句看看.

把拼接的SQL语句 到SQL语句命令窗口执行看看.

检查一下是否要条件对应的数据

--  作者:逛逛
--  发布时间:2014/5/10 11:42:00
--  
ID 是文本类型吗?
--  作者:qianqian1530
--  发布时间:2014/5/10 12:06:00
--  回复:(Bin)弹出你拼接的SQL语句看看.把拼接的SQL语...
额...不会
--  作者:qianqian1530
--  发布时间:2014/5/10 12:06:00
--  回复:(逛逛)ID 是文本类型吗?
恩是文本
--  作者:qianqian1530
--  发布时间:2014/5/10 12:08:00
--  回复:(kunmails)cmd.ExecuteNonQuery 的返回值不是...
返回值  是 0