Foxtable(狐表)用户栏目专家坐堂 → Update语句问题,请帮看看,谢谢!


  共有5368人关注过本帖树形打印复制链接

主题:Update语句问题,请帮看看,谢谢!

帅哥哟,离线,有人找我吗?
delxkjhgq
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
Update语句问题,请帮看看,谢谢!  发帖心情 Post By:2013/7/18 14:31:00 [只看该作者]

dim dd as string= "[商品编号] = '" & spbh & "'"

cmd.CommandText = "Update {Users} Set dd Where [序号]= '" & UserName & "'"
 
那个常量是一串字符串(第一句是打个比方),下面那条那DD的格式是怎么写的,找不到答案,谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/7/18 14:35:00 [只看该作者]

dim dd as string= "[商品编号] = '" & spbh & "'"

cmd.CommandText = "Update {Users} Set “ & dd  & “ Where [序号]= '" & UserName & "'"

[此贴子已经被作者于2013-7-18 14:36:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
delxkjhgq
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
  发帖心情 Post By:2013/7/18 14:39:00 [只看该作者]

cmd.CommandText = "Update {Users} Set " & dd & "Where [序号]= " & i

 

忘了后面也有个变量,提示  至少有一个参数没有指定值。谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/18 14:40:00 [只看该作者]

可能因为你USERNAME为空.

 回到顶部
帅哥哟,离线,有人找我吗?
delxkjhgq
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
  发帖心情 Post By:2013/7/18 14:46:00 [只看该作者]

我用MSG  提示   DD= [商品编号]= ‘55555555’      I=3    真找不到哪里有问题了。图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/18 14:51:00 [只看该作者]

以下是引用delxkjhgq在2013-7-18 14:46:00的发言:
我用MSG  提示   DD= [商品编号]= ‘55555555’      I=3    真找不到哪里有问题了。图片点击可在新窗口打开查看

什么意思,摸不着头脑,你弹出一下你拼接的整段SQL语句看看.

 回到顶部
帅哥哟,离线,有人找我吗?
delxkjhgq
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
  发帖心情 Post By:2013/7/18 14:55:00 [只看该作者]

Dim dr As List(of Row) = Tables("收货界面_Table1").GetCheckedRows()
If dr.Count = 0 Then
    MessageBox.Show("请先选择!","提示")
    Return
End If
If MessageBox.Show("确认修改" & dr.count & "条记录", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
    For Each r As Row In Tables("收货界面_Table1").GetCheckedRows
        Dim i As Long = r("序号")
        
        Dim spbh As String = e.Form.Controls("TextBox1").Value
        Dim pc As String = e.Form.Controls("TextBox2").Value
        Dim xl As Integer = e.Form.Controls("TextBox3").Value
        
        Dim dd As String
        If spbh <> "" Then
            dd= "[商品编号] = '" & spbh & "'"
        ElseIf pc <> "" Then
            dd= dd & " , [批次] = '" & pc & "'"
        ElseIf xl <> "" Then
            dd= dd & " , [数量] = '" & xl & "'"
        End If
        MessageBox.Show(i)
       MessageBox.Show(dd)
        Dim cmd As New SQLCommand
        cmd.C
        cmd.CommandText = "Update {Users} Set " & dd & "Where [序号]= " & i
        cmd.ExecuteNonQuery()
    Next
End If

 回到顶部
帅哥哟,离线,有人找我吗?
delxkjhgq
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
  发帖心情 Post By:2013/7/18 14:59:00 [只看该作者]

倒数第5条记录有问题,没复制全。请帮看看,谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/18 15:01:00 [只看该作者]

你弹出一下你拼接的整段SQL语句看看. 即可知道问题所在.  要不你就上个例子吧.

 回到顶部
帅哥哟,离线,有人找我吗?
delxkjhgq
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1013 威望:0 精华:0 注册:2012/11/6 14:55:00
  发帖心情 Post By:2013/7/18 15:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:未命名.bmp
图片点击可在新窗口打开查看

 回到顶部
总数 11 1 2 下一页