更改记录?急!!! 我的表中有“编号”“价钱”我要把所有编号一样的价钱都增加15%怎么办呢?谢谢啦,请各位老大指教! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 update table set 价钱=价钱*1.15 where 编号='***' sql = "update jhtj set 单进价=单进价 * Text1.Text where 商品编号='" & ext3.Text & "'"这句话哪里不对呀! sql = "update jhtj set 单进价=单进价 * val(Text1.Text) where 商品编号='" & ext3.Text & "'" 改成这样:"update jhtj set 单价=单价*val(text1.text) where 商品编号='" & text3.Text & "'" 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这段代码提示只少有一个参数没有指定值是怎么回事呀 你这段代码有问题吧,怎么会把 update 语句作为数据源??? 用VB写的程序来调用VC的动态库,为什么断点进不去? 请教如何用回车键移动光标 在VB中 SQL语句操作数据库的问题 怎么用TreeView做公司组织等级那种树呢!从数据库中调用数据! 求解:图片在stdPicture到内存场景中并缩放适应屏幕的方法 重回CSDN,高分求"产品销售管理系统"源代码 请大家发表一下自己的看法:“开发纪实(胡伟武):我们的龙芯1号 ” 50分求救!!!!!请问,如何用VB新建一个ACCESS的表啊,字段为fld1,fld2,fld3,fld4 恳请各位仁兄赐教 如何修改注册表内的IP? 关于combo控件的一点小问题 简单的问题 急阿!
update table set 价钱=价钱*1.15 where 编号='***'
这句话哪里不对呀!
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
这段代码提示只少有一个参数没有指定值是怎么回事呀