以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Fill SQL 语句求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109757)

--  作者:baiheinet
--  发布时间:2017/11/18 19:02:00
--  Fill SQL 语句求助
Dim Lst As New List(Of String) 
Lst = DataTables("TASK_明细").GetValues("Drw_NO") 

Tables("Task_文档").Fill("Sel * From {Drawing_Index} where  [DocumentNo] In " & Lst & """" ,"SQL", False)

上面代码运行错误 请问怎么写才是正确的

[此贴子已经被作者于2017/11/18 19:03:00编辑过]

--  作者:有点甜
--  发布时间:2017/11/19 16:53:00
--  

Dim Lst As List(Of String)
Lst = DataTables("TASK_明细").GetValues("Drw_NO")

Tables("Task_文档").Fill("Select * From {Drawing_Index} where  [DocumentNo] In (\'" & String.Join("\',\'", Lst.ToArray) & "\')" ,"SQL", False)