1、如何成功把 EXCEL 表的数据导入到 SQL 数据库，代码如何编写 tags: 如何 成功 excel 数据 导入 sql 数据库 代码 编写 唯一下载软件下载,软件,下载,共享,共享软件,免费,免费软件,汉化, 汉化补丁,游戏, 游戏下载,软件教程,软件新闻,软件资讯,操作系统,邮件.如何成功把 EXCEL 表的数据导入到 SQL 数据库，代码如何编写 http:/ /*= 导入/导出 Excel 的基本方法=*/ 从 Excel 文件中, 导入数据到 SQL 数据库中,很简单, .如何成功把 EXCEL 表的数据导入到 SQL 数据库，代码如何编写 . 摘要：如何成功把 EXCEL表的数
2、据导入到 SQL 数据库， 代码如何编写 点击此处阅读全文. 发表于 2006 年 04 月05 日 11:21:00 | 评论(loading.) Powered by: Copyright gjcxywwx.DTS 能从文本文件或 OLE DB 数据源（例如，Microsoft Access 2000 数据库）将数据导入到 SQL Server 中。或者，也可以从 SQL Server 将数据导出到 OLE DB . 用 DTS 是肯定可以的，而且可以自动生成 VB 代码。我也不知道如何用 SQL 语句实现，关注！Top .例如： 导入和导出数据。 DTS 能从文本文件或 OLE DB 数
3、据源（例如，Microsoft Access 2000 数据库 ）将数据导入到 SQL Server 中。或者，也可以从 SQL Server 将数据 . 用DTS 是肯定可以的，而且可以自动生成 VB 代码。我也不知道如何用 SQL 语句实现，关注！ . gjcxywwx 2006-06-19T10:26:00Z VB 操作 LotusNotes 数据库 Wed, 24 May 2006 04:07:00 +0800 . gjcxywwx 2006-04-05T11:28:00Z 如何成功把 EXCEL 表的数据导入到 SQL 数据库，代码如何编写 Wed, 05 Apr 2006 19:2
4、1:00 +0800 .如何成功把 EXCEL 表的数据导入到 SQL 数据库，代码如何编写 . 导出表中的数据到 Excel,包含字段名,文件为真正的 Excel 文件,如果文件不存在,将自动创建文件,如果表不存在, 将自动创建表基于通用性考虑,仅支持导出标准数据类型-邹建 2003.10-*/导出查询中的数据 .引用链接 推荐给朋友 Del.icio.us 收藏到 QQ 书签 添加到雅虎收藏 :本文的相关评价及说明信息: /*= 导入/ 导出 Excel 的基本方法 =*/从 Excel 文件中,导入数据到 SQL 数据库中 ,很简单,直接用下面的语句:/*=*/-如果接受数据导入的表已经
5、存在insert into 表 select * from OPENROWSET(MICROSOFT.JET.OLEDB.4.0,Excel 5.0;HDR=YES;DATABASE=c:test.xls,sheet1$)-如果导入数据并生成表select * into 表 from OPENROWSET(MICROSOFT.JET.OLEDB.4.0,Excel 5.0;HDR=YES;DATABASE=c:test.xls,sheet1$)/*=*/-如果从 SQL 数据库中 ,导出数据到 Excel,如果 Excel 文件已经存在,而且已经按照要接收的数据创建好表头,就可以简单的用:in
6、sert into OPENROWSET(MICROSOFT.JET.OLEDB.4.0,Excel 5.0;HDR=YES;DATABASE=c:test.xls,sheet1$)select * from 表-如果 Excel 文件不存在 ,也可以用 BCP 来导成类 Excel 的文件,注意大小写:-导出表的情况EXEC masterxp_cmdshell bcp 数据库名.dbo.表名 out “c:test.xls“ /c -/S“服务器名“ /U“用户名“ -P“密码“-导出查询的情况EXEC masterxp_cmdshell bcp “SELECT au_fname, au_l
7、name FROM pubsauthors ORDER BY au_lname“ queryout “c:test.xls“ /c -/S“服务器名“ /U“用户名“ -P“密码“/*-说明:c:test.xls 为导入/导出的 Excel 文件名.sheet1$ 为 Excel 文件的工作表名 ,一般要加上$ 才能正常使用.-*/-上面已经说过,用 BCP 导出的是类 Excel 文件,其实质为文本文件,-要导出真正的 Excel 文件.就用下面的方法/*-数据导出 EXCEL导出表中的数据到 Excel,包含字段名 ,文件为真正的 Excel 文件,如果文件不存在,将自动创建文件,如果表不
8、存在,将自动创建表基于通用性考虑,仅支持导出标准数据类型-邹建 2003.10-*/*-调用示例p_exporttb tbname=地区资料,path=c:,fname=aa.xls-*/if exists (select * from dbo.sysobjects where id = object_id(Ndbo.p_exporttb) and OBJECTPROPERTY(id, NIsProcedure) = 1)drop procedure dbo.p_exporttbGOcreate proc p_exporttbtbname sysname, -要导出的表名path nvarch
9、ar(1000), -文件存放目录fname nvarchar(250)= -文件名,默认为表名asdeclare err int,src nvarchar(255),desc nvarchar(255),out intdeclare obj int,constr nvarchar(1000),sql varchar(8000),fdlist varchar(8000)-参数检测if isnull(fname,)= set fname=tbname+.xls-检查文件是否已经存在if right(path,1)0 goto lberrexec err=sp_oamethod obj,open,
10、null,constrif err255 then 255 else a.length end as varchar)+)when b.name in(tynyint,int,bigint,tinyint) then intwhen b.name in(smalldatetime,datetime) then datetimewhen b.name in(money,smallmoney) then moneyelse b.name endFROM syscolumns a left join systypes b on a.xtype=b.xusertypewhere b.name not
11、in(image,text,uniqueidentifier,sql_variant,ntext,varbinary,binary,timestamp)and object_id(tbname)=idselect sql=create table +tbname+(+substring(sql,2,8000)+),fdlist=substring(fdlist,2,8000)exec err=sp_oamethod obj,execute,out out,sqlif err set path=path+create table #tb(a bit,b bit,c bit)set sql=pat
12、h+fnameinsert into #tb exec masterxp_fileexist sql-数据库创建语句set sql=path+fnameif exists(select 1 from #tb where a=1)set constr=DRIVER=Microsoft Excel Driver (*.xls);DSN=;READONLY=FALSE+;CREATE_DB=“ +;DATABASE=+sql+“-连接数据库exec err=sp_oacreate adodb.connection,obj outif err0 goto lberr-创建表的 SQLdeclare t
13、bname sysnameset tbname=#tmp_+convert(varchar(38),newid()set sql=select * into +tbname+ from(+sqlstr+) aexec(sql)select sql=,fdlist=select fdlist=fdlist+,+a.name+,sql=sql+,+a.name+ +case when b.name in(char,nchar,varchar,nvarchar) thentext(+cast(case when a.length255 then 255 else a.length end as va
14、rchar)+)when b.name in(tynyint,int,bigint,tinyint) then intwhen b.name in(smalldatetime,datetime) then datetimewhen b.name in(money,smallmoney) then moneyelse b.name endFROM tempdbsyscolumns a left join tempdbsystypes b on a.xtype=b.xusertypewhere b.name not in(image,text,uniqueidentifier,sql_varian
15、t,ntext,varbinary,binary,timestamp)and a.id=(select id from tempdbsysobjects where name=tbname)select sql=create table +sheetname+(+substring(sql,2,8000)+),fdlist=substring(fdlist,2,8000)exec err=sp_oamethod obj,execute,out out,sqlif err0 goto lberrexec err=sp_oadestroy obj-导入数据set sql=openrowset(MI
16、CROSOFT.JET.OLEDB.4.0,Excel 5.0;HDR=YES;DATABASE=+path+fname+,+sheetname+$)exec(insert into +sql+(+fdlist+) select +fdlist+ from +tbname+)set sql=drop table +tbname+exec(sql)returnlberr:exec sp_oageterrorinfo 0,src out,desc outlbexit:select cast(err as varbinary(4) as 错误号,src as 错误源,desc as 错误描述select sql,constr,fdlistgo
