select * from sysobjects where xtype='u'

解决方案 »

  1.   

    引用ado对象,
    声明ado对象:
    dim rst as new adodb.redcordset(结果集)
    dim conn as new adodb.redcordset(联接)
    将conn指向数据库,
    用rst读取数据:
    rst.open "Select * from 数据表名字",conn
    从结果集中读写数据
      

  2.   

    如果你不会联接数据库,可以引用一个Ado的部件,然后指定数据库,再把联接属性的字符串拷贝下来,赋给conn对象
      

  3.   

    抱歉,前面写错了,应该是
    dim conn as new adodb.redcordset
      

  4.   

    同意junwhj所說, select * from sysobjects where xtype='u'
      

  5.   

    我也有同样的问题,
    dim rst as new adodb.redcordset(结果集)
    dim conn as new adodb.connection(联接)
    将conn指向数据库,
    用rst读取数据:
    rst.open "Select * from type"
    程序会报错,说是"type"是无效字符,为什麽那?