资源描述:
《Microsoft Sql Server2005导入导出表格集锦.pdf》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、insertinto表select*fromOPENROWSET('MICROSOFT.JET.OLEDB.4.0','Excel5.0;HDR=YES;DATABASE=c:test.xls',sheet1$)--如果导入数据并生成表select*into表fromOPENROWSET('MICROSOFT.JET.OLEDB.4.0','Excel5.0;HDR=YES;DATABASE=c:test.xls',sheet1$)/*============================================
2、=======================*/--如果从SQL数据库中,导出数据到Excel,如果Excel文件已经存在,而且已经按照要接收的数据创建好表头,就可以简单的用:insertintoOPENROWSET('MICROSOFT.JET.OLEDB.4.0','Excel5.0;HDR=YES;DATABASE=c:test.xls',sheet1$)select*from表--如果Excel文件不存在,也可以用BCP来导成类Excel的文件,注意大小写:--导出表的情况EXECmaster..xp_cmdshe
3、ll'bcp数据库名.dbo.表名out"c:test.xls"/c-/S"服务器名"/U"用户名"-P"密码"'--导出查询的情况EXECmaster..xp_cmdshell'bcp"SELECTau_fname,au_lnameFROMpubs..authorsORDERBYau_lname"queryout"c:test.xls"/c-/S"服务器名"/U"用户名"-P"密码"'/*--说明:c:test.xls为导入/导出的Excel文件名.sheet1$为Excel文件的工作表名,一般要加上$才能正常使用.-
4、-*/--下面是导出真正Excel文件的方法:ifexists(select*fromdbo.sysobjectswhereid=object_id(N'[dbo].[p_exporttb]')andOBJECTPROPERTY(id,N'IsProcedure')=1)dropprocedure[dbo].[p_exporttb]GO/*--数据导出EXCEL导出表中的数据到Excel,包含字段名,文件为真正的Excel文件,如果文件不存在,将自动创建文件,如果表不存在,将自动创建表基于通用性考虑,仅支持导出标准数据类型--
5、邹建2003.10(引用请保留此信息)--*//*--调用示例p_exporttb@tbname='地区资料',@path='c:',@fname='aa.xls'--*/createprocp_exporttb@tbnamesysname,--要导出的表名@pathnvarchar(1000),--文件存放目录@fnamenvarchar(250)=''--文件名,默认为表名asdeclare@errint,@srcnvarchar(255),@descnvarchar(255),@outintdeclare@objint
6、,@constrnvarchar(1000),@sqlvarchar(8000),@fdlistvarchar(8000)--参数检测ifisnull(@fname,'')=''set@fname=@tbname+'.xls'--检查文件是否已经存在ifright(@path,1)<>''set@path=@path+''createtable#tb(abit,bbit,cbit)set@sql=@path+@fnameinsertinto#tbexecmaster..xp_fileexist@sql--数据库创建语句se
7、t@sql=@path+@fnameifexists(select1from#tbwherea=1)set@constr='DRIVER={MicrosoftExcelDriver(*.xls)};DSN='''';READONLY=FALSE'+';CREATE_DB="'+@sql+'";DBQ='+@sqlelseset@constr='Provider=Microsoft.Jet.OLEDB.4.0;ExtendedProperties="Excel8.0;HDR=YES'+';DATABASE='+@sql+'"'-
8、-连接数据库exec@err=sp_oacreate'adodb.connection',@objoutif@err<>0gotolberrexec@err=sp_oamethod@obj,'open',null,@constrif@err<>0gotolberr/*--如果