以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助代码借在何处?(解决)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=7810)

--  作者:shixia
--  发布时间:2010/8/8 11:46:00
--  求助代码借在何处?(解决)

“入库”和“入库明细”表中没有设置表达式列,设置了一个关联。表“入库”中DataColChanged有代码如下:

If e.DataCol.Name = "入库日期" Then    
    Dim st As String = "RK-" &  Format(e.DataRow("入库日期"),"yyyymmdd") & Format(e.DataRow("编号"),"000")
    e.DataRow("入库单编号")=st
    e.DataRow("金额")=DataTables("入库明细").Compute("Sum(金额)","入库单编号=" & e.DataRow("入库单编号"))   
End If

这段代码执行后出现错误提示:未找到列[RK]。但是项目中没有[RK]列,不知错在何处?

 

现在不是开发版

 


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table

[此贴子已经被作者于2010-8-8 12:03:09编辑过]

--  作者:czy
--  发布时间:2010/8/8 11:58:00
--  
e.DataRow("金额")=DataTables("入库明细").Compute("Sum(金额)","入库单编号 = \'" & e.DataRow("入库单编号") & "\'")   

--  作者:shixia
--  发布时间:2010/8/8 12:04:00
--  
谢谢,这个低级错误已犯了多次图片点击可在新窗口打开查看