以文本方式查看主题

-  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=131209)
--  作者：hongyefor
--  发布时间：2019/2/20 11:51:00
--  这个代码怎么写才对？

.NET Framework 版本：2.0.50727.8800
Foxtable 版本：2018.10.9.1
错误所在事件：
详细错误信息：
无法在 System.Int32 和 System.String 上执行“=”操作。

 

 

代码如下：

cmd.CommandText = "****** DISTINCT 所在部门 From {员工信息}"
dt = cmd.ExecuteReader()
cmb = e.Form.Controls("ComboBox1")
Dim idx1 As String = dt.SQLGetComboListString("_Identify","所在部门= \'" & cmb.Text & "\' ")
Tables("历史工资表_工资报表").Filter = "序号 In (\'" & idx1.Replace("|", "\',\'") & "\')"

 

在按“所在部门”查找员工，如果("历史工资表_工资报表").所在部门里没有员工会出现错误，请问怎么写代码解决问题
--  作者：y2287958
--  发布时间：2019/2/20 12:00:00
--  
判断一下idx1
--  作者：有点蓝
--  发布时间：2019/2/20 12:13:00
--  
Dim idx1 As String = dt.SQLGetComboListString("_Identify","所在部门= \'" & cmb.Text & "\' ")
if idx1 > "" then
Tables("历史工资表_工资报表").Filter = "序号 In (" & idx1.Replace("|", ",") & ")"
else
Tables("历史工资表_工资报表").Filter = "false"
end if