以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  不把数据表加载到系统中(只在数据库中),就可以把 某表的某字段,提取到 ComboBox combolist中?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121124)

--  作者:ycwk
--  发布时间:2018/6/29 15:18:00
--  不把数据表加载到系统中(只在数据库中),就可以把 某表的某字段,提取到 ComboBox combolist中?
能不能用类似如下代码,不把数据表加载到系统中(只在数据库中),就可以把 某表的某字段,提取到  ComboBox           combolist中?




Dim cmd As New SQLCommand     \'前面已声明过cmd,故此处要屏蔽
Dim dt As DataTable
Dim dr As DataRow
cmd.C

cmd.CommandText = "S elect 部门 From {联系方式}"
dt = cmd.ExecuteReader
cb.ComboList=SQLGetComboListString("部门")

--  作者:ycwk
--  发布时间:2018/6/29 15:21:00
--  
下面的代码行吗?

Dim
 cmd As New SQLCommand
Dim
 dt As DataTable
Dim
 cmb As WinForm.ComboBox
cmd.CommandText = "SE LECT DISTINCT 客户 From {订单}"
dt = cmd.ExecuteReader()
cmb = e.Form.Controls(
"ComboBox1")
cmb.ComboList= dt.GetComboListString(
"客户"
)
--  作者:有点甜
--  发布时间:2018/6/29 15:22:00
--  

可以,有什么问题?

 

Dim cmd As New SQLCommand     \'前面已声明过cmd,故此处要屏蔽
Dim dt As DataTable
cmd.CommandText = "Select 部门 From {联系方式}"
dt = cmd.ExecuteReader
\'cb.ComboList=dt.GetComboListString("部门")