以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码调试错误求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147448)

--  作者:段虎成
--  发布时间:2020/3/17 10:09:00
--  代码调试错误求助
老师您好,我编写的一段代码在调试过程中总是出现错误,请帮忙看一下好么,谢谢!附件已经上传!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:代码调试错误.zip


--  作者:有点蓝
--  发布时间:2020/3/17 10:34:00
--  
先看看:http://www.foxtable.com/webhelp/topics/1522.htm
再看看:http://www.foxtable.com/webhelp/topics/1284.htm
if e.datacol.name = "TP续签首年客户信息_客户名称"

If e.DataRow("TP续签首年客户信息_客户名称") IsNot Nothing  Then \'指的是销售报表中的认证日期不为空时执行以下代码

    Dim dr As DataRow

    With DataTables("销售报表")

        dr = .find("客户名称 = \'" & e.DataRow("TP续签首年客户信息_客户名称") & "\' And 项目名称 = \'诚信通新签\'")

    End With

    e.DataRow("TP续签首年提成人员及金额_新签人员") = dr("签约人")

End If

end if



--  作者:段虎成
--  发布时间:2020/3/17 10:52:00
--  

谢谢老师!明白了!