我要从SQL SERVER2000中导出数据到文本文件中,用Delphi6实现如下:
sql := ' SELECT * into aaa.txt FROM t1 IN [ODBC][ODBC;Driver=SQL Server;UID=sa;PWD=;SERVER=dhb;DataBase=HASYQ;]';
sqlConn1.connectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=c:\temp';sqlConn1.Connected := True;
sqlConn1.Execute(sql);
这样执行成功,导出数据到aaa.txt,但是,这是整个表导出了,我要加where条件筛选怎么办?应该在这个的基础上怎么加where条件?
sql := ' SELECT * into aaa.txt FROM t1 IN [ODBC][ODBC;Driver=SQL Server;UID=sa;PWD=;SERVER=dhb;DataBase=HASYQ;]';
sqlConn1.connectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=c:\temp';sqlConn1.Connected := True;
sqlConn1.Execute(sql);
这样执行成功,导出数据到aaa.txt,但是,这是整个表导出了,我要加where条件筛选怎么办?应该在这个的基础上怎么加where条件?
' where 条件';不行么?不行的话,用临时表sql := ' SELECT * into #temp FROM t1 IN [ODBC][ODBC;Driver=SQL Server;UID=sa;PWD=;SERVER=dhb;DataBase=HASYQ;] '#13#10 +
' select * into aaa.txt from #temp '#13#10 +
' where 条件 '#13#10 +
' drop table #temp';//以上代码未经测试,呵呵 ______________http://hthunter.vicp.net/