| 发表于:2007-08-27 15:55:475楼 得分:0 |
public function getalltable(byval con as oledbconnection) as datatable 'dim dbschema as new oledb.oledbschemaguid 'dim dbtablenames as new datatable 'dbtablenames = con.getoledbschematable(dbschema.tables, new object() {nothing, nothing, nothing, "table "}) dim dbtablenames as datatable = con.getoledbschematable(oledbschemaguid.tables, new object() {nothing, nothing, nothing, "table "}) return (dbtablenames) end function 调用以上函数可以返回access中的表 | | |
|