以文本方式查看主题

-  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=121848)

--  作者:xusuyang
--  发布时间:2018/7/13 20:04:00
--  编码求助
If e.DataCol.Name = "购货客户详细信息_订货日期" OrElse e.DataCol.name = "产品详细信息_产品编码" Then
    If e.DataRow.isnull("购货客户详细信息_订货日期") OrElse e.DataRow.isnull("产品详细信息_产品编码") Then
        e.DataRow("购货客户详细信息_订货单编码") = Nothing
    Else
        e.DataRow("购货客户详细信息_订货单编码") = GetPinyin(e.DataRow("购货客户详细信息_订货日期"), 1) & GetPinyin(e.DataRow("购货客户详细信息_省市"), 1)  & GetPinyin(e.DataRow("购货客户详细信息_地区"), 1) & GetPinyin(e.DataRow("购货客户详细信息_公司简称"), 1) & GetPinyin(e.DataRow("购货客户详细信息_订货人"), 1)  & e.DataRow("产品详细信息_产品编码").replace("*", "*")
    End If
End If

--  作者:有点蓝
--  发布时间:2018/7/13 20:34:00
--  
代码有什么问题?运行有什么错误?