如何把数据库一张表的部分数据导入datatable

dycadrtf

对数据库的一些操作都已经完成
Dim sql
Dim empid,dormid,bedid
sql= "select  empid,dormid,bedid  from empdorm"
rs.open sql,conn

如何把 rs("empid")里面的数据写入datatable呢？

dycadrtf

在线等，有点急啊

xiaonan

while  not rs.eof
        empid=  rs("empid").value                          
        datatable.setcurrentrow(i)
        datatable.value("empid","Global")=empid

         i=i+1
       rs.movenext                  
wend

angelia_liu

学习了