各位朋友,本人有这样一个需求不知是否可以实现,望高手指点一二。昨天有位朋友帮我耐心解答了,不过执行后的结果不是最终的需求,再麻烦大家了,谢谢。 现有一部分数据(excel文件),想让其内容导入到数据库某一表中,表中有卡号、总金额、总积分这三列需特殊处理,如果从EXCEL中导入的数据卡号有重复的,那么总金额、总积分采用累加,其他列内容全部替换。不知可否实现,谢谢大家了。 例如 A EXCEL表格
表名:POS
字段 ID 卡号 金额 积分 ........
1 001 10 10
2 002 10 10
3 003 10 10
---------------------------
B 数据库
表名:VIP
字段 ID 卡号 金额 积分 ........
1 002 20 20
2 003 20 20
3 004 20 20
最后要求的结果是 表名:VIP
字段 ID 卡号 金额 积分 ........
1 001 30 30
2 002 30 30
3 003 30 30
4 004 20 20
表名:POS
字段 ID 卡号 金额 积分 ........
1 001 10 10
2 002 10 10
3 003 10 10
---------------------------
B 数据库
表名:VIP
字段 ID 卡号 金额 积分 ........
1 002 20 20
2 003 20 20
3 004 20 20
最后要求的结果是 表名:VIP
字段 ID 卡号 金额 积分 ........
1 001 30 30
2 002 30 30
3 003 30 30
4 004 20 20
解决方案 »
- 弱弱的问一下,mssql可以监听多个端口吗,比如1433,和1212等等
- 急,急,急 删除重复数据
- SQL Server 批量创建表
- 数据库,所有任务 - 脱机 以后别人就不能访问了吗?相当于断开数据库跟别人的连接?
- sql server job不执行的问题
- 求大虾编写SQL查询语句
- 一般性网络错误的问题的问题
- Mssql2000定时备份远程数据库到本机问题。
- 请问高手,SQLServer表的字段数目有什么限制吗?
- sql server 何如将前面是数字后面是字母的字段进行升序排列
- 将excel表格数据导入SQL SERVER数据库
- 向 substring 函数传递了无效的 length 参数
2.用语句的方式参考如下:
SQL SERVER 和EXCEL的数据导入导出
1、在SQL SERVER里查询Excel数据:
-- ======================================================
SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
下面是个查询的示例,它通过用于 Jet 的 OLE DB 提供程序查询 Excel 电子表格。
SELECT *
FROM OpenDataSource ( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------2、将Excel的数据导入SQL server :
-- ======================================================
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
实例:
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------3、将SQL SERVER中查询到的数据导成一个Excel文件
-- ======================================================
T-SQL代码:
EXEC master..xp_cmdshell 'bcp 库名.dbo.表名out c:\Temp.xls -c -q -S"servername" -U"sa" -P""'
参数:S 是SQL服务器名;U是用户;P是密码
说明:还可以导出文本文件等多种格式
实例:EXEC master..xp_cmdshell 'bcp saletesttmp.dbo.CusAccount out c:\temp1.xls -c -q -S"pmserver" -U"sa" -P"sa"'
EXEC master..xp_cmdshell 'bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout C:\ authors.xls -c -Sservername -Usa -Ppassword'
在VB6中应用ADO导出EXCEL文件代码:
Dim cn As New ADODB.Connection
cn.open "Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;WD=123;"
cn.execute "master..xp_cmdshell 'bcp "SELECT col1, col2 FROM 库名.dbo.表名" queryout E:\DT.xls -c -Sservername -Usa -Ppassword'"
------------------------------------------------------------------------------------------------4、在SQL SERVER里往Excel插入数据:
-- ======================================================
insert into OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Temp.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...table1 (A1,A2,A3) values (1,2,3)T-SQL代码:
INSERT INTO
OPENDATASOURCE('Microsoft.JET.OLEDB.4.0',
'Extended Properties=Excel 8.0;Data source=C:\training\inventur.xls')...[Filiale1$]
(bestand, produkt) VALUES (20, 'Test')
-------------------------------------------------------------------------------------------------本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/htl258/archive/2009/04/05/4049019.aspx
3.最后在SQL查询分析器中用SQL语句来处理你想要的最终结果.
【分析】:
首先先检查一下你用来导入的Excel表是否已经打开,如果打开了,请关闭后重试一下。
还 是不行的话,继续往下看。如果你用来数据库操作的sql语句是用striing字符串保存的,且其中包含着.xsl文件的存放路径。那么问题可能就出在这 个路径上。您是否值用了一个斜杠"\"。如果只有一个斜杠的话,在运行前,错误列表中会提示"无法识别转义序列"。一旦运行,该提示就会消失,可能您就是 因为这样而没有注意到这错误。
SQL SERVER 和EXCEL的数据导入导出
1、在SQL SERVER里查询Excel数据:
-- ======================================================
SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
下面是个查询的示例,它通过用于 Jet 的 OLE DB 提供程序查询 Excel 电子表格。
SELECT *
FROM OpenDataSource ( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------2、将Excel的数据导入SQL server :
-- ======================================================
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
实例:
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------3、将SQL SERVER中查询到的数据导成一个Excel文件
-- ======================================================
T-SQL代码:
EXEC master..xp_cmdshell 'bcp 库名.dbo.表名out c:\Temp.xls -c -q -S"servername" -U"sa" -P""'
参数:S 是SQL服务器名;U是用户;P是密码
说明:还可以导出文本文件等多种格式
实例:EXEC master..xp_cmdshell 'bcp saletesttmp.dbo.CusAccount out c:\temp1.xls -c -q -S"pmserver" -U"sa" -P"sa"'
EXEC master..xp_cmdshell 'bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout C:\ authors.xls -c -Sservername -Usa -Ppassword'
在VB6中应用ADO导出EXCEL文件代码:
Dim cn As New ADODB.Connection
cn.open "Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;WD=123;"
cn.execute "master..xp_cmdshell 'bcp "SELECT col1, col2 FROM 库名.dbo.表名" queryout E:\DT.xls -c -Sservername -Usa -Ppassword'"
------------------------------------------------------------------------------------------------4、在SQL SERVER里往Excel插入数据:
-- ======================================================
insert into OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Temp.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...table1 (A1,A2,A3) values (1,2,3)T-SQL代码:
INSERT INTO
OPENDATASOURCE('Microsoft.JET.OLEDB.4.0',
'Extended Properties=Excel 8.0;Data source=C:\training\inventur.xls')...[Filiale1$]
(bestand, produkt) VALUES (20, 'Test')
-------------------------------------------------------------------------------------------------
可以先把excel的数据导入到一个临时表,然后再从临时表中通过计算更新或插入到数据库的B表中
导出表中的数据到Excel,包含字段名,文件为真正的Excel文件
,如果文件不存在,将自动创建文件
,如果表不存在,将自动创建表
基于通用性考虑,仅支持导出标准数据类型--邹建 2003.10(引用请保留此信息)--*//**//*--调用示例 p_exporttb @tbname='地区资料',@path='c:',@fname='aa.xls'
--*/
create proc p_exporttb
@tbname sysname, --要导出的表名
@path nvarchar(1000), --文件存放目录
@fname nvarchar(250)='' --文件名,默认为表名
as
declare @err int,@src nvarchar(255),@desc nvarchar(255),@out int
declare @obj int,@constr nvarchar(1000),@sql varchar(8000),@fdlist varchar(8000)--参数检测
if isnull(@fname,'')='' set @fname=@tbname+'.xls'--检查文件是否已经存在
if right(@path,1)<>'' set @path=@path+''
create table #tb(a bit,b bit,c bit)
set @sql=@path+@fname
insert into #tb exec master..xp_fileexist @sql--数据库创建语句
set @sql=@path+@fname
if exists(select 1 from #tb where a=1)
set @constr='DRIVER={Microsoft Excel Driver (*.xls)};DSN='''';READONLY=FALSE'
+';CREATE_DB="'+@sql+'";DBQ='+@sql
else
set @constr='Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties="Excel 8.0;HDR=YES'
+';DATABASE='+@sql+'"'
--连接数据库
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0 goto lberrexec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0 goto lberr/**//*--如果覆盖已经存在的表,就加上下面的语句
--创建之前先删除表/如果存在的话
select @sql='drop table ['+@tbname+']'
exec @err=sp_oamethod @obj,'execute',@out out,@sql
--*/--创建表的SQL
select @sql='',@fdlist=''
select @fdlist=@fdlist+',['+a.name+']'
,@sql=@sql+',['+a.name+'] '
+case
when b.name like '%char'
then case when a.length>255 then 'memo'
else 'text('+cast(a.length as varchar)+')' end
when b.name like '%int' or b.name='bit' then 'int'
when b.name like '%datetime' then 'datetime'
when b.name like '%money' then 'money'
when b.name like '%text' then 'memo'
else b.name end
FROM syscolumns a left join systypes b on a.xtype=b.xusertype
where b.name not in('image','uniqueidentifier','sql_variant','varbinary','binary','timestamp')
and object_id(@tbname)=id
select @sql='create table ['+@tbname
+']('+substring(@sql,2,8000)+')'
,@fdlist=substring(@fdlist,2,8000)
exec @err=sp_oamethod @obj,'execute',@out out,@sql
if @err<>0 goto lberrexec @err=sp_oadestroy @obj--导入数据
set @sql='openrowset(''MICROSOFT.JET.OLEDB.4.0'',''Excel 8.0;HDR=YES;IMEX=1
;DATABASE='+@path+@fname+''',['+@tbname+'$])'exec('insert into '+@sql+'('+@fdlist+') select '+@fdlist+' from '+@tbname)returnlberr:
exec sp_oageterrorinfo 0,@src out,@desc out
lbexit:
select cast(@err as varbinary(4)) as 错误号
,@src as 错误源,@desc as 错误描述
select @sql,@constr,@fdlist
go
exec('insert into '+@sql+'('+@fdlist+') select '+@fdlist+' from '+@tbname)你把这一句改成update试试
V.金额 =V.金额 +P.金额,V.积分 =V.积分 +P.积分
FROM VIP V
JOIN (SELECT ID,卡号,SUM(金额) 金额,SUM(积分) 积分 FROM POS GROUP BY ID,卡号) P
ON V.ID=P.ID AND V.卡号=P.卡号
1、在SQL SERVER里查询Excel数据:
-- ======================================================
SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
下面是个查询的示例,它通过用于 Jet 的 OLE DB 提供程序查询 Excel 电子表格。
SELECT *
FROM OpenDataSource ( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------2、将Excel的数据导入SQL server :
-- ======================================================
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
实例:
SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions
-------------------------------------------------------------------------------------------------3、将SQL SERVER中查询到的数据导成一个Excel文件
-- ======================================================
T-SQL代码:
EXEC master..xp_cmdshell 'bcp 库名.dbo.表名out c:\Temp.xls -c -q -S"servername" -U"sa" -P""'
参数:S 是SQL服务器名;U是用户;P是密码
说明:还可以导出文本文件等多种格式
实例:EXEC master..xp_cmdshell 'bcp saletesttmp.dbo.CusAccount out c:\temp1.xls -c -q -S"pmserver" -U"sa" -P"sa"'
EXEC master..xp_cmdshell 'bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout C:\ authors.xls -c -Sservername -Usa -Ppassword'
在VB6中应用ADO导出EXCEL文件代码:
Dim cn As New ADODB.Connection
cn.open "Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;WD=123;"
cn.execute "master..xp_cmdshell 'bcp "SELECT col1, col2 FROM 库名.dbo.表名" queryout E:\DT.xls -c -Sservername -Usa -Ppassword'"
------------------------------------------------------------------------------------------------4、在SQL SERVER里往Excel插入数据:
-- ======================================================
insert into OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Temp.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...table1 (A1,A2,A3) values (1,2,3)T-SQL代码:
INSERT INTO
OPENDATASOURCE('Microsoft.JET.OLEDB.4.0',
'Extended Properties=Excel 8.0;Data source=C:\training\inventur.xls')...[Filiale1$]
(bestand, produkt) VALUES (20, 'Test')
A EXCEL表格
表名:POS
字段 ID 卡号 金额 积分 ........
1 001 10 10
2 002 10 10
3 003 10 10
---------------------------
B 数据库
表名:VIP
字段 ID 卡号 金额 积分 ........
1 002 20 20
2 003 20 20
3 004 20 20
最后要求的结果是 表名:VIP
字段 ID 卡号 金额 积分 ........
1 001 30 30
2 002 30 30
3 003 30 30
4 004 20 20
UPDATE V SET
V.金额 =V.金额 +P.金额,V.积分 =V.积分 +P.积分
FROM VIP V
JOIN (
SELECT ID,卡号,SUM(金额) 金额,SUM(积分) 积分
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source="c:\POS.xls";
User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
GROUP BY ID,卡号) P
ON V.ID=P.ID AND V.卡号=P.卡号
警告: 聚合或其它 SET 操作消除了空值。(所影响的行数为 0 行)
V.金额 =V.金额 +P.金额,V.积分 =V.积分 +P.积分
FROM VIP V
JOIN (
SELECT ID,卡号,SUM(ISNULL(金额,0)) 金额,SUM(ISNULL(积分,0)) 积分
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source="c:\POS.xls";
User ID=Admin;Password=;Extended properties=Excel 5.0')...[Sheet1$]
GROUP BY ID,卡号) P
ON V.ID=P.ID AND V.卡号=P.卡号
UPDATE v SET
V.xfje =V.xfje +P.xfje,V.jf =V.jf +P.jf
FROM hyxx V
JOIN (
SELECT ID,kh,SUM(xfje) xfje,SUM(jf) jf
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source="d:\share.xls";
User ID=Admin;Password=;Extended properties=Excel 5.0')...[sheet1$]
WHERE ID IS NOT NULL
GROUP BY ID,kh) P
ON V.kh=P.kh set identity_insert hyxx on
INSERT hyxx(ID,Address,BOXSC,BZ,CARDID,CARDTYPE,CSRQ,CZJE,czy,DHCS,DQ,DQCS,DQDATE,DW,FKFD,HYLB,HYLX,hyzp,id2,iDATE,JF,JSHYSL,JSRID,JSRName,JSSms,KH,lastupdate,LastXFSJ,LJJF,Name,Psw,PSW2,PYM,SendSMS,sp_code,sp_LastSJ,TCHY,TCYG,Tel,TEMPLB,XB,XFCS,XFJE,YWYID,YWYName,ZCS,ZFZDY1,ZFZDY2,ZFZDY3,ZFZDY4,ZFZDY5,ZFZDY6,ZFZDY7,ZFZDY8,ZJE,ZT)
SELECT ID,Address,BOXSC,BZ,CARDID,CARDTYPE,CSRQ,cast(CZJE as money),czy,DHCS,DQ,DQCS,DQDATE,DW,FKFD,HYLB,HYLX,cast(hyzp as varbinary(8000)),id2,iDATE,JF,JSHYSL,JSRID,JSRName,JSSms,KH,lastupdate,LastXFSJ,LJJF,Name,Psw,PSW2,PYM,SendSMS,sp_code,sp_LastSJ,TCHY,TCYG,Tel,TEMPLB,XB,XFCS,XFJE,YWYID,YWYName,ZCS,ZFZDY1,ZFZDY2,ZFZDY3,ZFZDY4,ZFZDY5,ZFZDY6,ZFZDY7,ZFZDY8,cast(ZJE as money),ZT
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0','Data Source="d:\share.xls";
User ID=Admin;Password=;Extended properties=Excel 5.0')...[sheet1$] AS P
WHERE ID IS NOT NULL
AND NOT EXISTS(
SELECT 1 FROM hyxx
WHERE kh=P.kh)
set identity_insert hyxx off
select * from hyxx