小问题。

qihau 2003-08-23 05:58:20
怎样将后台的数据库中的一个字段的全部数据
用循环或其它方法
写进listbox
...全文
93 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
viena 2003-08-23
  • 打赏
  • 举报
回复
sorry,还有错,忘记移动记录了
set conn = New ADODB.Connection
set rs = New ADODB.Recordset
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\mdb1.mdb;Mode=ReadWrite;Persist Security Info=False"
rs.open "select 字段名 from 表",conn
do while not rs.eof
listbox.Additem rs("字段名")
rs.movenext
loop
viena 2003-08-23
  • 打赏
  • 举报
回复
以上conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mdb1.mdb;Mode=ReadWrite;Persist Security Info=False"中
mdb1.mdb要换成你的实际数据库路径,如C:\mdb1.mdb
viena 2003-08-23
  • 打赏
  • 举报
回复
set conn = New ADODB.Connection
set rs = New ADODB.Recordset
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mdb1.mdb;Mode=ReadWrite;Persist Security Info=False"
rs.open "select 字段名 from 表",conn
do while not rs.eof
listbox.Additem rs("字段名")
loop

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧