我的表中有“编号”“价钱”
我要把所有编号一样的价钱都增加15%
怎么办呢?谢谢啦,请各位老大指教!

解决方案 »

  1.   


    update table set 价钱=价钱*1.15 where 编号='***'
      

  2.   

    sql = "update jhtj set 单进价=单进价 * Text1.Text where  商品编号='" & ext3.Text & "'"
    这句话哪里不对呀!
      

  3.   

    sql = "update jhtj set 单进价=单进价 * val(Text1.Text) where  商品编号='" & ext3.Text & "'"
      

  4.   

    改成这样:"update jhtj set 单价=单价*val(text1.text) where 商品编号='" & text3.Text & "'"
      

  5.   

    Dim cn As New ADODB.Connection
            cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\guanli.mdb;Persist Security Info=False;Jet OLEDB:Database Password=sys_tem"
            cn.Open
        Dim rs As New ADODB.Recordset
        Dim sql As String
        '    rs.CursorLocation = 3 '客户端游标
            sql = "update jhtj set 单进价=单进价 * val(Text1.Text) where  商品编号='" & Text3.Text & "'"
            rs.Open sql, cn, adOpenKeyset, adLockBatchOptimistic
            Set fudong.DataGrid2.DataSource = rs
    这段代码提示只少有一个参数没有指定值是怎么回事呀
      

  6.   

    你这段代码有问题吧,怎么会把  update 语句作为数据源???