以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  SQLFind问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=122304)

--  作者:lfz123
--  发布时间:2018/7/22 22:24:00
--  SQLFind问题
DataTables("身份证籍贯编码")是外部表,设置初始不加载表,在员工信息表的DataColChanged中设置如下代码: 籍贯编码出不来?,恢复到原来不是动态加载模式时又正常了
图片点击可在新窗口打开查看此主题相关图片如下:步骤一.png
图片点击可在新窗口打开查看
Select Case e.DataCol.name
    Case "身份证"
        If e.DataRow.IsNull("身份证") Then
            e.DataRow("籍贯") = Nothing
        Else
            Dim bm As String = e.DataRow("身份证").SubString(0,6)
            Dim dr As DataRow = DataTables("身份证籍贯编码").sqlFind("籍贯编码 = \'" & bm & "\'")
            If dr IsNot Nothing Then
                e.DataRow("籍贯") = dr("籍贯")
            End If
        End If
End Select

--  作者:有点甜
--  发布时间:2018/7/22 23:14:00
--  

代码和设置,肯定是没问题的。

 

如果有问题请做个实例发上来测试。


--  作者:lfz123
--  发布时间:2018/7/23 11:29:00
--  回复:(有点甜)代码和设置,肯定是没问题的。&nbs...
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2_201807231129.zip


--  作者:有点甜
--  发布时间:2018/7/23 11:44:00
--  
数据库一起发上来才能测试。
--  作者:lfz123
--  发布时间:2018/7/23 13:24:00
--  回复:(有点甜)数据库一起发上来才能测试。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试数据库.zip


--  作者:有点甜
--  发布时间:2018/7/23 14:48:00
--  

要改成这样

 

            Dim dr As DataRow = DataTables("身份证籍贯编码").SQLFind("籍贯编码 = " & bm & "")


--  作者:lfz123
--  发布时间:2018/7/23 17:58:00
--  回复:(有点甜)要改成这样   &n...
明白了,知道是什么原因了,要注意看下数据类型属于那种,很容易被我忽略了,谢谢老师!