以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=56030) |
-- 作者:kaiyu -- 发布时间:2014/8/28 9:22:00 -- [求助] Dim dt As Table = Tables("物料清单表") Dim boms() As String Dim lst As new List(of String) For Each dr As Row In dt.Rows Dim s As String = Cstr(dr("ID")) lst.Add(s) msgbox(lst) Next 我想获取物料清单表里的ID列生成一个数组,这样做为什么不行(ID列为整型数据) |
-- 作者:Bin -- 发布时间:2014/8/28 9:23:00 -- lst是集合 你怎么能 msgbox(一个集合呢?) msgbox(lst.Count) 倒是可以的.
|
-- 作者:Bin -- 发布时间:2014/8/28 9:24:00 -- 而且狐表本事就有getValues 函数可以直接获得一个列的集合 |
-- 作者:kaiyu -- 发布时间:2014/8/28 9:31:00 -- 问题是这列数据类型为整型,我想把它生成一个数组,用到SQL里做查询条件where ID in 数组,老是提示出错 |
-- 作者:有点甜 -- 发布时间:2014/8/28 9:34:00 -- 以下是引用kaiyu在2014-8-28 9:31:00的发言:
问题是这列数据类型为整型,我想把它生成一个数组,用到SQL里做查询条件where ID in 数组,老是提示出错
完整代码发上来,说明哪里出错。 |
-- 作者:Bin -- 发布时间:2014/8/28 9:35:00 -- 提问请直接抓重点,绕半天发现问的根本不是这个. Dim s As String = DataTables("物料清单表").GetComboListString("ID") where ID in (\'" & s.replace("|","\',\'") & "\')" |
-- 作者:kaiyu -- 发布时间:2014/8/28 9:37:00 -- Dim dt As Table = Tables("物料清单表") Dim s As String s = Tables("GY物料清单表").DataTable.GetComboListString("ID") Dim boms() As String = s.Split("|") Dim cmd As new SQLCommand cmd.C cmd.CommandText ="select * from {物料清单明细表} where ID in boms" rdt = cmd.ExecuteReader |
-- 作者:kaiyu -- 发布时间:2014/8/28 9:38:00 -- 少发了一个数据源 |
-- 作者:有点甜 -- 发布时间:2014/8/28 9:39:00 -- Dim dt As Table = Tables("物料清单表") |