相关代码 |
|
VB支持SQL语言的SELECT ... INTO语句,这使得你可以将一种数据库轻松地转换为另一种格式,也可以在同一种格式的数据库中进行转换。下面我们以将.MDB格式转换为Excel形式为例。 首先,打开.MDB文件。如 Dim dbSource As Database Set dbSource = OpenDatabase("MY.MDB") 然后使用SELECT ... INTO语句转换文件。 dbSource.Execute("SELECT * INTO my IN 'c:\documents\xldata.xls' 'EXCEL 5.0;' FROM table1") 这里,IN子句后面是转换后的数据库文件名,'EXCEL 5.0;'表示Excel 5.0/95格式,也可以是其他VB支持的格式。 SELECT ... INTO建立新的表或数据库,而如果要将数据追加到已经存在的数据库中,可以使用INSERT ... INTO语句。
相关资源 |
|