以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 字符中带符号查找不到?请指教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95974)

--  作者:ouyangfenghuan
--  发布时间:2017/2/9 18:08:00
--  [求助] 字符中带符号查找不到?请指教

型号列中字符内容带符号* 和- 就出错,代码如下

 


            If dr("用料规格") IsNot Nothing Then \'通过用料规格自动提取CLGG材料规格表中型号列的相同内容行的材质列内容

                Dim Filter4 As String

                Filter4 = "[型号] = \'" &  dr("用料规格") & "\'"
MessageBox.Show(filter4)
                If  DataTables("CLGG").Find(Filter4) Is Nothing Then \'如果对应的有加载过
                    DataTables("CLGG").AppendLoad(Filter4) \'则追载明细
                End If
MessageBox.Show(2)
                Dim dr2 As DataRow
                dr2 = DataTables("产品资料表").Find(Filter4)
                If dr2 IsNot Nothing Then
                    dr("材料类型") = dr2("材质")
                End If
            End If

 

 


此主题相关图片如下:1.png
按此在新窗口浏览图片

此主题相关图片如下:2.png
按此在新窗口浏览图片

此主题相关图片如下:3.png
按此在新窗口浏览图片


此主题相关图片如下:4.png
按此在新窗口浏览图片
[此贴子已经被作者于2017/2/9 18:15:36编辑过]

--  作者:有点色
--  发布时间:2017/2/9 18:15:00
--  

你的表【CLGG】或者【产品资料表】肯定有一个表没有列【型号】