vb中用adodc怎么获取SQL数据表的一列数据?

来源：百度知道 编辑：UC知道 时间：2024/06/08 10:35:36
我用adodc连接SQL数据库,我想获取SQL表中的一列数据,请问要怎么写循环语句?
Adodc1.ConnectionString = "Driver={SQL Server};Server=" & l1 & ";Database=" & l2 & ";Uid=" & l3 & ";Pwd=" & l4
Adodc1.RecordSource = "select * from table1 "
Adodc1.Refresh
请问下面要怎么循环语句获取表中一列的数据?
我不是这个意思,
我是想获取整列的数据,如:
姓名
张3
李4
王5

我就是想获取
姓名这列的全部数据,然后一个一个的赋值给每一个变量
应该是要一个循环语句?
tmp1=Adodc1.Recordset.Fields("姓名")只能获取第一行的姓名,请问要怎么写循环一个一个的获取呢 ?

请问二楼 的朋友 我想把姓名这列的数据赋值给treeview控件里面,需要怎么写呢?

我不用adodc的,直接使用 ADODB.Connection 和 ADODB.Recordset 对象
Dim strSQL As String
strSQL = "select * from table1"
Dim rdUser As ADODB.Recordset
Set rdUser = ExecSQL(strSQL)
If rdUser.RecordCount > 0 Then
MSGrid_Show.Rows = rdUser.RecordCount + 1
Dim I As Long
For I = 1 To rdUser.RecordCount
rdUser("字段")
rdUser.MoveNext
Next I
End If

for i=1 to adodc1.Recordset.RecordCount
tmp1=Adodc1.Recordset.Fields("姓名")
next

Adodc1.RecordSource = "select * from table1 "
改成
Adodc1.RecordSource = "select 表中的一个字段名 from table1 "