数据库导出问题（急！！）

Question

怎么样将access里或SQL server里的数据导出，并以excel的形式存储！

Answer 1

你可以使用sql2000 的企业管理器操作-->所有任务-->导出数据

Answer 2

对于access可以用ado取，用delphi带的excel控件往里写，就是servers里的excelapplication,excelworkbook,excelworksheet

Answer 3

开始－－－》程序－－－》SQL2000－－》导出导入数据－－－》下一步－－－》数据源选择“其它数据源”－－》然后在用户/系统DNS下拉菜单里面选择你要导的数据……以后就不用我说了吧，都是中文。自己看吧

Answer 4

/*******  导出到excel
EXEC master..xp_cmdshell 'bcp SettleDB.dbo.shanghu out c:\temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""'/***********  导入Excel
SELECT * 
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions

Answer 5

操作-->所有任务-->导出数据

Answer 6

我的意思是要在delphi的程序里实现，并不是在accesss和server里实现。

Answer 7

用ado将数据取出放到数据集中，用ole打开excel文件，逐行写入。

Answer 8

先用数据访问控件获得数据 然后再将它们add到一个TStrings中，列之间用#9分隔，最后再调用这个TStrings的SAVETOFILE（'C:\1.XLS'）这样导入很快速具体代码可以搜索一下近3天的帖子 关键字Access  Excel

Answer 9

1.自带:操作-->所有任务-->导出数据
2.程序:EXEC master..xp_cmdshell 'bcp SettleDB.dbo.shanghu out c:\temp1.xls -c -q -S"GNETDATA/GNETDATA" -U"sa" -P""'/***********  导入Excel
SELECT * 
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions

Answer 10

用OLE技术太慢，可以把他导成TXT形式的文件，
当中用，分开
在EXDEL当中打开文本文件就行
例
var
  i:integer;
  str:string;
begin
query.close;
query.sql.clear;
query.sql.add('select * from table');
query.open;
query.first;
whiel not query.eof do
begin
    str:='';
   for i:=0 to query.fieldcount-1
     str:=query.filds[i].asstring+',';
   在这块加上写出一行到一个文本文件就行了  query.next;
end;

Answer 11

我有一个现成的导SQL中数据库的程序，要不要？QQ发给你