先看看:
http://www.foxtable.com/webhelp/topics/1522.htm再看看:
http://www.foxtable.com/webhelp/topics/1284.htmif 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