SQL宝典

-- 读取excel文件

-- sheet名字可能存在问题

-- 文件必需和SQL服务器在同一台机器上

select * from

OPENROWSET('MICROSOFT.JET.OLEDB.4.0'

,'Excel 5.0;HDR=YES;IMEX=2;DATABASE=C:/1.xls',[sheet1$])

 

 

-- 读取csv等文本文件

select * from OpenRowset('MSDASQL', 'Driver={Microsoft Text Driver (*.txt; *.csv)};

DefaultDir=c:/temp;','select * from aaaa.txt')

 

-----------------------------------------------

--SQL语句导入导出大全- -

--TagSQL语句导入导出                                         

 

/*导出到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

 

 

SELECT cast(cast(科目编号as numeric(10,2)) as nvarchar(255))+ 转换后的别名

FROM OpenDataSource( ’Microsoft.Jet.OLEDB.4.0’,

  ’Data Source="c:/test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’)...xactions

 

/** 导入文本文件*/

EXEC master..xp_cmdshell ’bcp "dbname..tablename" in c:/DT.txt -c -Sservername -Usa -Ppassword’

 

/** 导出文本文件*/

EXEC master..xp_cmdshell ’bcp "dbname..tablename" out c:/DT.txt -c -Sservername -Usa -Ppassword’

/**/

EXEC master..xp_cmdshell ’bcp "Select * from dbname..tablename" queryout c:/DT.txt -c -Sservername -Usa -Ppassword’

 

/*导出到TXT文本,用逗号分开*/

exec master..xp_cmdshell ’bcp "库名..表名" out "d:/tt.txt" -c -t ,-U sa -P password’

 

 

BULK INSERT 库名..表名

FROM ’c:/test.txt’

WITH (

    FIELDTERMINATOR =;,

    ROWTERMINATOR = ’/n’

)

 

 

--/* dBase IV文件

select * from

OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’

,’dBase IV;HDR=NO;IMEX=2;DATABASE=C:/’,select * from [客户资料.dbf]’)

--*/

 

--/* dBase III文件

select * from

OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’

,’dBase III;HDR=NO;IMEX=2;DATABASE=C:/’,select * from [客户资料.dbf]’)

--*/

 

--/* FoxPro 数据库

select * from openrowset(’MSDASQL’,

’Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:/’,

select * from [aa.DBF]’)

--*/

 

/**************导入DBF文件****************/

select * from openrowset(’MSDASQL’,

’Driver=Microsoft Visual FoxPro Driver;

SourceDB=e:/VFP98/data;

SourceType=DBF’,

select * from customer where country != "USA" order by country’)

go

/***************** 导出到DBF ***************/

--如果要导出数据到已经生成结构(即现存的)FOXPRO表中,可以直接用下面的SQL语句

 

insert into openrowset(’MSDASQL’,

’Driver=Microsoft Visual FoxPro Driver;SourceType=DBF;SourceDB=c:/’,

select * from [aa.DBF]’)

select * from

 

/*说明:

SourceDB=c:/  指定foxpro表所在的文件夹

aa.DBF        指定foxpro表的文件名.

 */

 

 

/*************导出到Access********************/

insert into openrowset(’Microsoft.Jet.OLEDB.4.0’,

   ’x:/A.mdb’;’admin’;’’,A) select * from 数据库名..B

 

/*************导入Access********************/

insert into Bselet * from openrowset(’Microsoft.Jet.OLEDB.4.0’,

   ’x:/A.mdb’;’admin’;’’,A)

 

*********************  导入xml 文件

 

DECLARE @idoc int

DECLARE @doc varchar(1000)

--sample XML document

SET @doc =

 

 

     

      Customer was very satisfied

     

  

  

     

            Important

            Happy Customer.

     

     

  

 

-- Create an internal representation of the XML document.

EXEC sp_xml_preparedocument @idoc OUTPUT, @doc

 

-- Execute a SELECT statement using OPENXML rowset provider.

SELECT *

FROM OPENXML (@idoc,/root/Customer/Order, 1)

      WITH (oid     char(5),

            amount  float,

            comment ntexttext())

EXEC sp_xml_removedocument @idoc

 

 

/********************导整个数据库*********************************************/

 

bcp实现的存储过程

 

 

/*

 实现数据导入/导出的存储过程

         根据不同的参数,可以实现导入/导出整个数据库/单个表

 调用示例:

--导出调用示例

----导出单个表

exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:/zj.txt’,1

----导出整个数据库

exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:/docman’,1

 

--导入调用示例

----导入单个表

exec file2table ’zj’,’’,’’,’xzkh_sa..地区资料’,’c:/zj.txt’,0

----导入整个数据库

exec file2table ’zj’,’’,’’,’xzkh_sa’,’C:/docman’,0

 

*/

if exists(select 1 from sysobjects where name=’File2Table’and objectproperty(id,’IsProcedure’)=1)

 drop procedure File2Table

go

create procedure File2Table

@servername varchar(200)  --服务器名

,@username varchar(200)   --用户名,如果用NT验证方式,则为空’’

,@password varchar(200)   --密码

,@tbname varchar(500)   --数据库.dbo.表名,如果不指定:.dbo.表名,则导出数据库的所有用户表

,@filename varchar(1000)  --导入/导出路径/文件名,如果@tbname参数指明是导出整个数据库,则这个参数是文件存放路径,文件名自动用表名.txt

,@isout bit      --1为导出,0为导入

as

declare @sql varchar(8000)

 

if @tbname like%.%.%--如果指定了表名,则直接导出单个表

begin

 set @sql=’bcp ’+@tbname

  +case when @isout=1 then ’out ’elseinend

  +’"’+@filename+’" /w’

  +/S ’+@servername

  +case when isnull(@username,’’)=’’then ’’else/U ’+@username end

  +/P ’+isnull(@password,’’)

 exec master..xp_cmdshell @sql

end

else

begin --导出整个数据库,定义游标,取出所有的用户表

 declare @m_tbname varchar(250)

 if right(@filename,1)<>’/’set @filename=@filename+’/’

 

 set @m_tbname=declare #tb cursor for select name from+@tbname+..sysobjects where xtype=’’U’’’

 exec(@m_tbname)

 open #tb

 fetch next from #tb into @m_tbname

 while @@fetch_status=0

 begin

  set @sql=’bcp ’+@tbname+..+@m_tbname

   +case when @isout=1 then ’out ’elseinend

   +’"’+@filename+@m_tbname+’.txt " /w’

   +/S ’+@servername

   +case when isnull(@username,’’)=’’then ’’else/U ’+@username end

   +/P ’+isnull(@password,’’)

  exec master..xp_cmdshell @sql

  fetch next from #tb into @m_tbname

 end

 close #tb

 deallocate #tb 

end

go

 

 

/**********************Excel导到Txt****************************************/

--想用

select * into opendatasource(...) from opendatasource(...)

/*实现将一个Excel文件内容导入到一个文本文件

 

假设Excel中有两列,第一列为姓名,第二列为很行帐号(16)

且银行帐号导出到文本文件后分两部分,前位和后位分开。

 

 

如果要用你上面的语句插入的话,文本文件必须存在,而且有一行:姓名,银行账号,银行账号

然后就可以用下面的语句进行插入

注意文件名和目录根据你的实际情况进行修改.

 

insert into

opendatasource(’MICROSOFT.JET.OLEDB.4.0’

,’Text;HDR=Yes;DATABASE=C:/’

)...[aa#txt]

--,aa#txt)

--*/

select 姓名,银行账号=left(银行账号,8),银行账号=right(银行账号,8)

from

opendatasource(’MICROSOFT.JET.OLEDB.4.0’

,’Excel 5.0;HDR=YES;IMEX=2;DATABASE=c:/a.xls’

--,Sheet1$)

)...[Sheet1$]

 

--如果你想直接插入并生成文本文件,就要用bcp

 

declare @sql varchar(8000),@tbname varchar(50)

 

--首先将excel表内容导入到一个全局临时表

select @tbname=’[##temp’+cast(newid() as varchar(40))+’]’

 ,@sql=select 姓名,银行账号=left(银行账号,8),银行账号=right(银行账号,8)

into+@tbname+from

opendatasource(’’MICROSOFT.JET.OLEDB.4.0’’

,’’Excel 5.0;HDR=YES;IMEX=2;DATABASE=c:/a.xls’’

)...[Sheet1$]’

exec(@sql)

 

--然后用bcp从全局临时表导出到文本文件

set @sql=’bcp "’+@tbname+’" out "c:/aa.txt" /S"(local)" /P"" /c’

exec master..xp_cmdshell @sql

 

--删除临时表

exec(drop table+@tbname)

 

 

--bcp将文件导入导出到数据库的存储过程:

 

 

/*--bcp-二进制文件的导入导出

 

 支持image,text,ntext字段的导入/导出

 image适合于二进制文件;text,ntext适合于文本数据文件

 

 注意:导入时,将覆盖满足条件的所有行

  导出时,将把所有满足条件的行也出到指定文件中

 

 此存储过程仅用bcp实现

邹建2003.08-----------------*/

 

/*--调用示例*/

--数据导出

 exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:/zj1.dat’

 

--数据导出

 exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:/zj1.dat’,’’,0

--*/

if exists (select * from dbo.sysobjects where id = object_id(N’[dbo].[p_binaryIO]’) and OBJECTPROPERTY(id, N’IsProcedure’) = 1)

drop procedure [dbo].[p_binaryIO]

GO

 

Create proc p_binaryIO

@servename varchar (30),--服务器名称

@username varchar (30), --用户名

@password varchar (30), --密码

@tbname varchar (500),  --数据库..表名

@fdname varchar (30),  --字段名

@fname varchar (1000), --目录+文件名,处理过程中要使用/覆盖:@filename+.bak

@tj varchar (1000)=’’,  --处理条件.对于数据导入,如果条件中包含@fdname,请指定表名前缀

@isout bit=1   --1导出((默认),0导入

AS

declare @fname_in varchar(1000) --bcp处理应答文件名

 ,@fsize varchar(20)   --要处理的文件的大小

 ,@m_tbname varchar(50)  --临时表名

 ,@sql varchar(8000)

 

--则取得导入文件的大小

if @isout=1

 set @fsize=’’

else

begin

 create table #tb(可选名varchar(20),大小int

  ,创建日期varchar(10),创建时间varchar(20)

  ,上次写操作日期varchar(10),上次写操作时间varchar(20)

  ,上次访问日期varchar(10),上次访问时间varchar(20),特性int)

 insert into #tb

 exec master..xp_getfiledetails @fname

 select @fsize=大小from #tb

 drop table #tb

 if @fsize is null

 begin

  print文件未找到

  return

 end

 

end

 

--生成数据处理应答文件

set @m_tbname=’[##temp’+cast(newid() as varchar(40))+’]’

set @sql=select * into+@m_tbname+from(

 select null as 类型

 union all select 0 as 前缀

 union all select+@fsize+as 长度

 union all select null as 结束

 union all select null as 格式

 ) a’

exec(@sql)

select @fname_in=@fname+’_temp’

 ,@sql=’bcp "’+@m_tbname+’" out "’+@fname_in

 +’" /S"’+@servename

 +case when isnull(@username,’’)=’’then ’’

  else ’" /U"’+@username end

 +’" /P"’+isnull(@password,’’)+’" /c’

exec master..xp_cmdshell @sql

--删除临时表

set @sql=drop table+@m_tbname

exec(@sql)

 

if @isout=1

begin

 set @sql=’bcp "select top 1 ’+@fdname+’from ’

  +@tbname+case isnull(@tj,’’) when ’’then ’’

   else ’where ’+@tj end

  +’" queryout "’+@fname

  +’" /S"’+@servename

  +case when isnull(@username,’’)=’’then ’’

   else ’" /U"’+@username end

  +’" /P"’+isnull(@password,’’)

  +’" /i"’+@fname_in+’"’

 exec master..xp_cmdshell @sql

end

else

begin

 --为数据导入准备临时表

 set @sql=select top 0 ’+@fdname+into

  +@m_tbname+from+@tbname

 exec(@sql)

 

 --将数据导入到临时表

 set @sql=’bcp "’+@m_tbname+’" in "’+@fname

  +’" /S"’+@servename

  +case when isnull(@username,’’)=’’then ’’

   else ’" /U"’+@username end

  +’" /P"’+isnull(@password,’’)

  +’" /i"’+@fname_in+’"’

 exec master..xp_cmdshell @sql

 

 --将数据导入到正式表中

 set @sql=update+@tbname

  +set+@fdname+=b.+@fdname

  +from+@tbname+’a,

  +@m_tbname+’b’

  +case isnull(@tj,’’) when ’’then ’’

   elsewhere+@tj end

 exec(@sql)

 

 --删除数据处理临时表

 set @sql=drop table+@m_tbname

end

 

--删除数据处理应答文件

set @sql=’del ’+@fname_in

exec master..xp_cmdshell @sql

 

go

 

 

/*导入文本文件*/

EXEC master..xp_cmdshell ’bcp "dbname..tablename" in c:/DT.txt -c -Sservername -Usa -Ppassword’

 

--改为如下,不需引号

EXEC master..xp_cmdshell ’bcp dbname..tablename in c:/DT.txt -c -Sservername -Usa -Ppassword’

 

/* 导出文本文件*/

EXEC master..xp_cmdshell ’bcp "dbname..tablename" out c:/DT.txt -c -Sservername -Usa -Ppassword’

--此句需加引号

 

/*创建一个自定义函数,用来group by 以下数据

A    1

B    2

A   3

B    4

要得到以下样式:

A   1,3

B   2,4 */

Create FUNCTION dbo.GetMenth

(

    @p1 nvarchar(1000)

)

RETURNS varchar(8000)

AS

BEGIN

    -- Declare the return variable here

    DECLARE @Result varchar(8000)

    set @Result= ''

    select  @Result=@Result+','+rtrim(FK_CC)  from CCAssignmentHistory

     where   FK_Client=@p1 

    -- Add the T-SQL statements to compute the return value here

    SELECT @Result =stuff(@Result,1,1,'')

 

    -- Return the result of the function

    RETURN @Result

 

END

GO

if exists(select * from sysobjects where name='#temp') drop table #temp

select dbo.GetMenth(FK_Client) as Oldcc,FK_Client into #temp from CCAssignmentHistory  group by FK_Client

-- 修改数据

Update Client set Oldcc=tbl.Oldcc

from

(

    select FK_Client,Oldcc from #temp

)tbl

where tbl.FK_Client=Client.PKID

/*从一系列字符串里得到数字,比如:由io4muio465n4k54p得到:*/

declare @a varchar(100)

declare @i int

set @i=1

set @a='4fskfhsdk4432fjsdl'

while @i <=len(@a)

begin

if(ascii(substring(@a,@i,1))>=48 and ascii(substring(@a,@i,1))<=57)

print substring(@a,@i,1)

set @i=@i+1

end

/*

Autor: Stone.Yang

Date: 2008-08-21

Description: 自定义函数用来更改client表里的OldCC,Oldcc存储的值格式为'3,134,204' ,先更改为'[3,24][134,24][204,17,48,50,58,64,66,69,71,73,75]',第一个数字为FK_CC,其他的值都是相应的地区权限fk_dictionary

Test:  select dbo.f_split('3,134,204',',')

*/

/*创建个自定义函数用来Split(@p1,@p2) 字符串*/

Create   function   f_split

(

    @c   nvarchar(max),

    @split   varchar(2) 

)  

 returns  nvarchar(max)

  as 

    begin   

       Declare @center nvarchar(max)

       Declare @fk_c nvarchar(max)

       Declare @re nvarchar(max)

       Set @re='' 

      while(charindex(@split,@c)<>0)       

        begin 

           Set @fk_c=''    /*每次循环后让fk_cc为空*/

           Set @center=''    /*每次循环后让centers为空*/

           set @fk_c= substring(@c,1,charindex(@split,@c)-1) /*获得FK_CC*/

           select @center=@center+','+ ltrim(fk_dictionary) from UserDataPermission where fk_user=@fk_c  /*获得中心*/

           set @re=@re+'['+@fk_c+@center+']'   

           set   @c   =   stuff(@c,1,charindex(@split,@c),'')  /*每次循环后让第一个','及其前的字符为空,然后让@c再重新循环下去*/

        end 

      Set @center=''  /*每次循环后让centers为空*/

      Set @fk_c=@c    /*循环完成后fk_cc=@c*/

      select @center=@center+','+ ltrim(fk_dictionary) from UserDataPermission where fk_user=@fk_c 

      set @re=@re+'['+@fk_c+@center+']'

 

      return   @re

    end  

  go

--Test:   select dbo.f_split('3,134,204',',')

 

Begin transaction

Update client set oldcc=tbl.result

from

(

select pkid,dbo.f_split(oldcc,',') as result from client where oldcc is not null

)tbl

where client.pkid=tbl.pkid

 

commit

 

select oldcc from client where oldcc is not null

 

--rollback

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值