- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 帮忙看看我这个代码错在哪儿? (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=265)
-- 发布时间：2008/9/5 14:30:00
-- 帮忙看看我这个代码错在哪儿?
我想在订单辅料这个表中,在IO/供应商编号这两列中输入数据时,在订购单编号列中,将生产批号表中相对应的订购单编号列的数据调用进来,可我根据LXL老师编写的一个代码修改后不起作用?所以想请帮忙看看.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:跟单系统-1.table |
-- 发布时间：2008/9/5 14:40:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:跟单系统-1.table |
-- 发布时间：2008/9/5 14:43:00
--
错得很离谱啊，何况对于电脑来说，多一个少一个引号都是不行的。
看看这个代码：
If e.DataCol.Name = "IO" OrElse e.DataCol.Name = "供应商编号" Then
Dim dr As DataRow
Dim Filter As String
Filter = "[IO] = \'" & e.DataRow("IO") & "\' And [供应商编号] = \'" & e.DataRow("供应商编号") & "\'"
dr = DataTables("生产批号").Find(Filter)
If dr IsNot Nothing Then
e.DataRow("订购单编号") = dr("订购单编号")
End If
End If
-- 发布时间：2008/9/5 14:51:00
--
哦！明白，第一个语句，我在看帮助时就理解过的，怎么到这儿就不懂了呢。
-- 发布时间：2008/9/5 15:04:00
--
smileboy老师写的不是我所要的，狐爸的对了。我好好研究研究。