正在阅读：用AdoDataSet实现数据表的导入导出用AdoDataSet实现数据表的导入导出

2004-08-10 10:08 出处：CSDN 作者：zhxfzhxf1 责任编辑：linjixiong

　　Delphi中的AdoDataSet是支持ADO访问的主要组件，它支持从数据表直接获取数据，支持用SQL语句获取数据。最重要的是，它定义和实现了两个重要的例程：

　　procedure LoadFromFile(const FileName: WideString);它从文件中加载数据集。

　　procedure SaveToFile(const FileName: String = ''; Format: TPersistFormat = pfADTG);它将数据集保存到文件中。Format确定文件中数据集的保存格式，可以使用的有pfADTG (Advanced Data Tablegram format)、pfXML（Extendable Markup Language）。

　　因此AdoDataSet是实现导入导出的良好的基础。

　　1.数据表的导出

　　导出数据表的操作如下：

　　1）打开数据表，设置需要导出的条件；

　　2）使用AdoDataSet，调用SaveToFile导出记录；

　　下面是一个导出操作的示例（假定导出指定数据表的全部记录）。

　　procedure ExportData(strFileName, strTableName: string);

　　begin

　　with AdoDataSet1 do

　　begin

　　Close;

　　CommandText := ‘select * from ’ + strTableName;