以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]输入字符串的格式不正确  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90298)

--  作者:huhu
--  发布时间:2016/9/9 11:14:00
--  [求助]输入字符串的格式不正确
.NET Framework 版本:2.0.50727.7905
Foxtable 版本:2016.7.29.1
错误所在事件:窗口,临时版本跟踪表,博达机型,Enter
详细错误信息:
从字符串“邮件通知 like \'%eponver@bdcom.com.cn”到类型“Long”的转换无效。
输入字符串的格式不正确。

代码如下:DataTables("临时版本跟踪表")就是“邮件通知 like \'%eponver@bdcom.com.cn”
请帮忙看看红色的代码怎么改?
Dim kh As WinForm.ComboBox = e.Form.Controls("客户")
Dim bdjx As WinForm.ComboBox = e.Form.Controls("博达机型")


Select Case user.Group
    Case  "录入","审核","协议一组","协议二组","交换组","R驱动组","S驱动组","EPON组","ONU组","网管组","网络组","路由组","PTN应用组","链路组","测试epon","测试switch","测试router"
        If kh.text = "" Then
            bdjx.ComboList=DataTables("临时版本跟踪表").SQLGetComboListString("博达机型",DataTables("临时版本跟踪表").LoadFilter)
        Else
            bdjx.ComboList=DataTables("临时版本跟踪表").SQLGetComboListString("博达机型",DataTables("临时版本跟踪表").LoadFilter And "客户=\'" & kh.text & "\'")
        End If
End Select

--  作者:有点蓝
--  发布时间:2016/9/9 12:29:00
--  
SQLGetComboListString("博达机型",DataTables("临时版本跟踪表").LoadFilter & " And 客户=\'" & kh.text & "\'")