以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 后台数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93943) |
-- 作者:cuicuibing -- 发布时间:2016/12/11 16:42:00 -- 后台数据 Dim tb As Table = Tables("派工_table3") Dim cur,cur1 As String Dim dt As DataTable cur = tb.Current("派工单号") cur1 = tb.current("类型编号") cmd.commandText = "Se lect * From {工资表} where 派工单号= \'" & cur & "\' and 类型编号 = \'" & cur2 & "\'" dt = cmd.ExecuteReader(True) Dim ss2 As String = cmd.ExecuteNonQuery MessageBox.Show("找到行数:"& ss2 &"") 为什么这里显示是-1. 代表是什么。工资表里边确实有符合这2个条件的记录 另外: Dim ss2 As Double = cmd.ExecuteNonQuery MessageBox.Show("找到行数:"& ss2 &"") 红字的表达式应该怎么写正确
|
-- 作者:有点色 -- 发布时间:2016/12/11 16:50:00 -- Dim ss2 As String = dt.datarows.count |
-- 作者:cuicuibing -- 发布时间:2016/12/11 16:52:00 -- Dim ss2 As Double = dt.datarows.count MessageBox.Show("找到行数:"& ss2 &"") 红字的表达式应该怎么写正确 |
-- 作者:有点色 -- 发布时间:2016/12/11 16:53:00 -- 你写得没有问题啊 |
-- 作者:cuicuibing -- 发布时间:2016/12/11 16:58:00 -- cmd2.commandText = "Sele ct * From {装箱标准} Where 地点 = \'"& r1("工段") &"\'" dt2 = cmd1.ExecuteReader() If dt2.DataRows.Count = 0 Then MessageBox.Show("无此标准!") Return ElseIf dt2.DataRows.Count > 1 Then MessageBox.Show("标准不是唯一的!") Return End If r1("工资标准")= dt2.DataRows(0)("标准") 代码执行到 r1("工资标准")= dt2.DataRows(0)("标准"),这里提示,列“标准”不属于表 。 但是装箱标准里边 有 标准 这一列 什么原因
|
-- 作者:小马甲 -- 发布时间:2016/12/11 16:59:00 -- 注意前后空格。 |
-- 作者:有点色 -- 发布时间:2016/12/11 17:01:00 -- 你在数据库里面的列名是什么?直接去看数据库。
如果是表达式列,你是不能直接使用的,表达式列是不存放在数据库里面的。 |
-- 作者:cuicuibing -- 发布时间:2016/12/11 17:09:00 -- Dim ss As Double = dt.datarows.count MessageBox.Show("Visual Basic一点不难!"& ss &"") 这个ss,比实际行数多吗?
|
-- 作者:有点色 -- 发布时间:2016/12/11 17:30:00 -- 回复8楼,你查询到的是多少行,得到的count就是多少行。 |
-- 作者:cuicuibing -- 发布时间:2016/12/11 17:57:00 -- 不好意思,代码有误,差的跟手工差的不一样 |