高手救命，高分相送（可再加分，绝不食言，失信的不是人）。数据库资料表的资料导出成text文本文件格式。

Question

adodb.recordset有个SAVE方法.如果是SQL SERVER,可以考虑BCP.

Answer 1

我所说的是在软件运行到某个功能时，单击一个[备份]按钮，就能完成上面数据导出，然后又压缩。我现在可以导出资料到txt文本文件，但是直接压缩不知道怎幺解决。你说的BCP是直接在数据库中执行的，我现在是在VB下实现上面的功能。

Answer 2

可能是我的问题没有叙述清楚，误导大家，现在的要求是在VB下编程实现。我们不让用户使用数据库的。只是他在使用软件的时候某些资料表他可以通过软件的某个功能转换成 .txt 格式，并且压缩。谢谢你们！

Answer 3

Access中有export功能。
自己编一段程序也行，很简单的，2重循环就行了。

Answer 4

Text 转换为 Access MDB 
Text 文件类型在很多软件中都为一般应用程序与数据库之间架起一座桥梁。你可以使用 Text ISAM 
驱动程序和 SQL 来把 Text 文件转换成 Access MDB 数据库文件，首先，为文本文件创建一个 SCHEMA.INI
文件。然后，你可以使用下面的代码来实现转换：
Dim db As Database, tbl as TableDef
Set db = DBEngine.CreateDatabase(App.Path & "/mymdb.mdb", dbLangGeneral, dbVersion_0)
Set tbl = db.CreateTableDef("Temp")
tbl.Connect = "Text;database=c:\vbpj\data"
tbl.SourceTableName = "Customer#txt"
db.TableDefs.Append tbl
db.Execute "Select Temp.* into NewTable from Temp"
db.TableDefs.Delete tbl.Name
db.Close
Set tbl = Nothing
Set db = Nothing

Answer 5

楼上各位的帖子回答的是如何导出，可楼主已经会了。要压缩，你有如下办法：
1：买一个压缩控件，如Component One公司的ZIP控件
2：买WINZIP的开发包
3：找一个很老的命令行执行的PKZIP/PKUNZIP或者ARJ，通过SHELL命令给你的文件打包

Answer 6

去下载压缩控件：
URL http://www.winimage.com/zLibDll/cmp-z-it.zip

Answer 7

To : (你不帮我谁帮我？) 
如何才能得到Text ISAM驱动程序。我这里没有，能否给我一份。
To：All
谢谢你们的帮助！有没有更好一点的建议！
我现在导出后用特殊字符在TEXT文本做标记，然后导入就通过检测特殊字符来把一个个值赋给表中，
这样可以实现，但太慢了，导入值到一个表要等半天，何况要导入多个表呢！