1,216
社区成员
发帖
与我相关
我的任务
分享datalist问题？在线等！！！！！！！！
用这种方式 datalist如何才能显示出数据库中给出的字段值？
Private Sub Form_Load()
//连接数据库的代码如下：
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=mydata;Data Source=dtyhnl"
conn.Open
rs.Open "select * from U_INFO", conn, adOpenDynamic, adLockBatchOptimistic
End Sub
Private Sub Form_Load()
//连接数据库的代码如下：
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=mydata;Data Source=dtyhnl"
conn.Open
rs.Open "select * from U_INFO", conn, adOpenDynamic, adLockBatchOptimistic
End Sub
...全文
请发表友善的回复…
发表回复
dtysam 2004-01-06
- 打赏
- 举报
我试过了datalist1.text里面什么都没有
chenyu5188 2004-01-06
- 打赏
- 举报
同意楼上
lxqlogo0 2004-01-06
- 打赏
- 举报
Set List1.DataSource = rs
Set List1.RowSource = rs
List1.ListField = "fields1"
List1.DataField = "fields1"
Set List1.RowSource = rs
List1.ListField = "fields1"
List1.DataField = "fields1"
