在一个数据库中如何调出里面某一个属性的内容,并放如指定的变量中(如数组或字符串)。比如有个表名为ATT_time,有个属性为员工编号,要把员工编号的内容(比如有001、002、003、004)放到一个动态数组record()或一个字符串中,并得出员工编号的个数。主要是如何放入动态数组中比较麻烦,望解答!!万谢!!!

解决方案 »

  1.   

    dim rs as new adodb.recordset
    dim i as longi=0set rs=con.execute("select count(员工编号) from att_time")
    redim record(rs.fields(0).value)
    set rs=con.execute("select 员工编号 from att_time")
    do while not rs.eof
        record(i)=rs.fields(0).value   
        i=i+1
        rs.movenext
    loop
      

  2.   

    谢谢大哥!!不过我用的是DAO连接数据库,好象上面就有很多属性用不了的,那用DAO怎么样写代码呢??顺便问一下,怎么样结贴?怎么样给分啊??