如何将数据库中的记录导出到TXT文本???

我用paradox做的数据库,想将记录通过日期查询导出到TXT文本。
请问该如何实现????
---------------------------------------------------------------

SQL2000的BCP命令:
控制台下
bcp "pubs.authors" out "authors.txt" -c -q -U"sa" -P"password"
此时表输出成文本文件了
---------------------------------------------------------------

bcp 实用工具在 SQL Server 实例和数据文件之间以用户指定的格式复制数据。

如果需要详细的资料,可以看一下MS SQL SERVER的关于“BCP实用工具”的内《
---------------------------------------------------------------

{ //事件开始
a:TextFile;
i,num:int;
if (SaveDialog1->Execute) then ///文件保存控件
{
if (FileExists(SaveDialog1->FileName)) then //如果文件存在
{
AssignFile(a,SaveDialog1->FileName); //关联文件变量
Rewrite(a); //读写文件
table1->open; //打开表
num=table1->Fields->Count()-1; //字段数
for(i=0;i

 1<num;i++) write(a,table1-="" {="">Fields[i]-&gt;FieldName()+';'); //写入字段名   
 2}   
 3writeln(a,''); //写入回车   
 4while (!table1-&gt;eof())   
 5{   
 6for (i=0;i<num;i++) write(a,table1-="" {="">Fields[i]-&gt;AsString()+';'); ///写入内容   
 7}   
 8writeln(a,''); //写入回车   
 9table1-&gt;Next(); //下一条记录   
10}   
11table1-&gt;close();   
12}   
13CloseFile(a);   
14}   
15}   
16}</num;i++)></num;i++)>
Published At
Categories with 数据库类
Tagged with
comments powered by Disqus