- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 错误提示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=8044)
-- 发布时间：2010/9/1 9:14:00
-- 错误提示
请问如下提示是什么意思：
此主题相关图片如下：未命名.gif
此主题相关图片如下：未命名1.gif
-- 发布时间：2010/9/1 9:17:00
--
字符数据和整数数据不能比较，例如 1<> "2" 这样的比较不行，必须 1 <> 2
-- 发布时间：2010/9/1 11:27:00
--
是不是下面代码错误：
Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = \'" & dr("图号") & "\' And [派工单号] = \'" & dr("派工单号") & "\' And [状态]= \'执行\' And [工序_序号] <= " & dr("工序_序号"))
Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = \'" & dr("图号") & "\' And [派工单号] = \'" & dr("派工单号") & "\' And [状态]= \'执行\' And [工序_序号] >= " & dr("工序_序号"))
改成如下行吗？（工序_序号列是字符型列）
Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = \'" & dr("图号") & "\' And [派工单号] = \'" & dr("派工单号") & "\' And [状态]= \'执行\' And [工序_序号] <= \'" & dr("工序_序号")& "\'")
Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)","[图号] = \'" & dr("图号") & "\' And [派工单号] = \'" & dr("派工单号") & "\' And [状态]= \'执行\' And [工序_序号] >= \'" & dr("工序_序号")& "\'")
-- 发布时间：2010/9/1 15:14:00
--
在比较的时候，不是什么都要加单引号的，字符用单引号，日期用#，数值什么也不要。
你需要抽出时间，重读一下帮助，巩固一下基础。
-- 发布时间：2010/9/1 15:23:00
--
工序_序号列如果是字符型，你就不应该用大于等于做比较。
-- 发布时间：2010/9/1 19:13:00
--
我已把数据类型改成数值型了，我再试试看，谢谢
-- 发布时间：2010/9/1 19:29:00
--
大概是这样吧。
Dim Filter As String = "[图号] = \'" & dr("图号") & "\' And [派工单号] = \'" & dr("派工单号") & "\' And [状态]= \'执行\'"
Dim Sum As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)",Filter & " And [工序_序号] <= " & dr("工序_序号"))
Dim Sum1 As Double = Tables("生产工序").Compute("Sum(工艺工时_天数)",Filter & " And [工序_序号] >= " & dr("工序_序号"))