99999久久久久久亚洲,欧美人与禽猛交狂配,高清日韩av在线影院,一个人在线高清免费观看,啦啦啦在线视频免费观看www

熱線電話：13121318867

登錄
首頁精彩閱讀通過SQL語句直接實現(xiàn)Excel與數(shù)據(jù)庫的導入導出
通過SQL語句直接實現(xiàn)Excel與數(shù)據(jù)庫的導入導出
2018-01-01
收藏

通過SQL語句直接實現(xiàn)Excel與數(shù)據(jù)庫的導入導出

導入/導出Excel
1.--從Excel文件中,導入數(shù)據(jù)到SQL數(shù)據(jù)庫中,很簡單,直接用下面的語句:
/*===================================================================*/
--如果接受數(shù)據(jù)導入的表已經(jīng)存在

insert into 表 select * from 
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c: est.xls',sheet1$)

--如果導入數(shù)據(jù)并生成表

select * into 表 from 
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c: est.xls',sheet1$)

/*===================================================================*/

2.--從SQL數(shù)據(jù)庫中,導出數(shù)據(jù)到Excel:
--如果從SQL數(shù)據(jù)庫中,導出數(shù)據(jù)到Excel,如果Excel文件已經(jīng)存在,而且已經(jīng)按照要接收的數(shù)據(jù)創(chuàng)建好表頭,就可以簡單的用:

insert into OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c: est.xls',sheet1$)
select * from 表


--如果Excel文件不存在,也可以用BCP來導成類Excel的文件,注意大小寫:
--導出表的情況

EXEC master..xp_cmdshell 'bcp 數(shù)據(jù)庫名.dbo.表名 out "c: est.xls" /c -/S"服務器名" /U"用戶名" -P"密碼"'

--導出查詢的情況

EXEC master..xp_cmdshell 'bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout "c: est.xls" /c -/S"服務器名" /U"用戶名" -P"密碼"'

/*--說明:
c:/test.xls  為導入/導出的Excel文件名.
sheet1$      為Excel文件的工作表名,一般要加上$才能正常使用.
--*/
 

3.--建立存儲過程，導出真正的Excel文件（用此方法導出的Excel文件在用于導入時不會報錯）

--下面是導出真正Excel文件的方法:（請將一下所有代碼復制到存儲過程中）

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_exporttb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_exporttb]
GO

/*--數(shù)據(jù)導出EXCEL
 
 導出表中的數(shù)據(jù)到Excel,包含字段名,文件為真正的Excel文件
 ,如果文件不存在,將自動創(chuàng)建文件
 ,如果表不存在,將自動創(chuàng)建表
 基于通用性考慮,僅支持導出標準數(shù)據(jù)類型

--鄒建 2003.10(引用請保留此信息)--*/

/*--調(diào)用示例

 p_exporttb @tbname='地區(qū)資料',@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)

--參數(shù)檢測
if isnull(@fname,'')='' set @fname=@tbname+'.xls'

--檢查文件是否已經(jīng)存在
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

--數(shù)據(jù)庫創(chuàng)建語句
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+'"'


--連接數(shù)據(jù)庫
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0 goto lberr

/*--如果覆蓋已經(jīng)存在的表,就加上下面的語句
--創(chuàng)建之前先刪除表/如果存在的話
select @sql='drop table ['+@tbname+']'
exec @err=sp_oamethod @obj,'execute',@out out,@sql
--*/

--創(chuàng)建表的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 lberr

exec @err=sp_oadestroy @obj

--導入數(shù)據(jù)
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)

return

lberr:
 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
 


if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_exporttb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_exporttb]
GO

/*--數(shù)據(jù)導出EXCEL
 
 導出查詢中的數(shù)據(jù)到Excel,包含字段名,文件為真正的Excel文件
 如果文件不存在,將自動創(chuàng)建文件
 如果表不存在,將自動創(chuàng)建表
 基于通用性考慮,僅支持導出標準數(shù)據(jù)類型

--鄒建 2003.10(引用請保留此信息)--*/

/*--調(diào)用示例

 p_exporttb @sqlstr='select * from 地區(qū)資料'
  ,@path='c:',@fname='aa.xls',@sheetname='地區(qū)資料'
--*/
create proc p_exporttb
@sqlstr varchar(8000),   --查詢語句,如果查詢語句中使用了order by ,請加上top 100 percent
@path nvarchar(1000),   --文件存放目錄
@fname nvarchar(250),   --文件名
@sheetname varchar(250)=''  --要創(chuàng)建的工作表名,默認為文件名
as 
declare @err int,@src nvarchar(255),@desc nvarchar(255),@out int
declare @obj int,@constr nvarchar(1000),@sql varchar(8000),@fdlist varchar(8000)

--參數(shù)檢測
if isnull(@fname,'')='' set @fname='temp.xls'
if isnull(@sheetname,'')='' set @sheetname=replace(@fname,'.','#')

--檢查文件是否已經(jīng)存在
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

--數(shù)據(jù)庫創(chuàng)建語句
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+'"'

--連接數(shù)據(jù)庫
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0 goto lberr

--創(chuàng)建表的SQL
declare @tbname sysname
set @tbname='##tmp_'+convert(varchar(38),newid())
set @sql='select * into ['+@tbname+'] from('+@sqlstr+') a'
exec(@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 tempdb..syscolumns a left join tempdb..systypes b on a.xtype=b.xusertype
where b.name not in('image','uniqueidentifier','sql_variant','varbinary','binary','timestamp')
 and a.id=(select id from tempdb..sysobjects where name=@tbname)

if @@rowcount=0 return

select @sql='create table ['+@sheetname
 +']('+substring(@sql,2,8000)+')'
 ,@fdlist=substring(@fdlist,2,8000)

exec @err=sp_oamethod @obj,'execute',@out out,@sql
if @err<>0 goto lberr

exec @err=sp_oadestroy @obj

--導入數(shù)據(jù)
set @sql='openrowset(''MICROSOFT.JET.OLEDB.4.0'',''Excel 8.0;HDR=YES
   ;DATABASE='+@path+@fname+''',['+@sheetname+'$])'

exec('insert into '+@sql+'('+@fdlist+') select '+@fdlist+' from ['+@tbname+']')

set @sql='drop table ['+@tbname+']'
exec(@sql)
return

lberr:
 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

4.--在.net中導出到Excel的簡單實例.

(1).添加引用Microsoft Excel 11.0 Object Library (在COM中)

(2).在web.config的上<system.web>里加

<identity impersonate="true"/> 

//此句為了使用戶能在本地打開文檔，identify屬性規(guī)定了身份驗證的模式，一般情況下為false，這樣安全性較高

(3).在Text.aspx上加Button1控件

(4).在cs頁面添加 using Microsoft.Office.Interop.Excel;

(5).添加單擊事件,在這里處理將數(shù)據(jù)庫中的數(shù)據(jù)導入excel,代碼如下:

//定義方法GetData(),返回一個數(shù)據(jù)表 
private System.Data.DataTable GetData() 
{ 
      SqlConnection conn= new SqlConnection(@"Server=XJIE;Initial Catalog=Northwind;Uid=sa;Pwd=xjie;"); 
      SqlDataAdapter adapter= new SqlDataAdapter("select  CompanyName 用戶名,ContactTitle 聯(lián)系主題,Address 住宅地址,ContactName 聯(lián)系人,Phone 電話,City 城市 from Customers order by CustomerID desc",conn); 
      DataSet ds= new DataSet(); 
      try 
      { 
   adapter.Fill(ds,"Customer"); 
      } 
      catch(Exception ex) 
      { 
   MessageBox.Show(ex.ToString()); 
      } 
      return ds.Tables[0]; 
} 


private void Button1_Click(object sender, System.EventArgs e) 
{ 
      Application excel= new Application(); 
      int rowIndex=1; 
      int colIndex=0; 

      excel.Application.Workbooks.Add(true); 
     
      DataTable table=GetData(); 
      
      //將所得到的表的列名,賦值給單元格 
      foreach(DataColumn col in table.Columns) 
      { 
   colIndex++;  
   excel.Cells[1,colIndex]=col.ColumnName;     
      } 

      //同樣方法處理數(shù)據(jù) 
      foreach(DataRow row in table.Rows) 
      { 
   rowIndex++; 
   colIndex=0; 
   foreach(DataColumn col in table.Columns) 
   { 
         colIndex++; 
         excel.Cells[rowIndex,colIndex]=row[col.ColumnName].ToString(); 
   } 
      } 
      //不可見,即后臺處理 
      excel.Visible=true; 
}

數(shù)據(jù)分析咨詢請掃描二維碼

若不方便掃碼，搜微信號：CDAshujufenxi

數(shù)據(jù)分析師資訊
更多

OK
客服在線
立即咨詢
客服在線
立即咨詢
') } function initGt() { var handler = function (captchaObj) { captchaObj.appendTo('#captcha'); captchaObj.onReady(function () { $("#wait").hide(); }).onSuccess(function(){ $('.getcheckcode').removeClass('dis'); $('.getcheckcode').trigger('click'); }); window.captchaObj = captchaObj; }; $('#captcha').show(); $.ajax({ url: "/login/gtstart?t=" + (new Date()).getTime(), // 加隨機數(shù)防止緩存 type: "get", dataType: "json", success: function (data) { $('#text').hide(); $('#wait').show(); // 調(diào)用 initGeetest 進行初始化 // 參數(shù)1：配置參數(shù) // 參數(shù)2：回調(diào)，回調(diào)的第一個參數(shù)驗證碼對象，之后可以使用它調(diào)用相應的接口 initGeetest({ // 以下 4 個配置參數(shù)為必須，不能缺少 gt: data.gt, challenge: data.challenge, offline: !data.success, // 表示用戶后臺檢測極驗服務器是否宕機 new_captcha: data.new_captcha, // 用于宕機時表示是新驗證碼的宕機 product: "float", // 產(chǎn)品形式，包括：float，popup width: "280px", https: true // 更多配置參數(shù)說明請參見：http://docs.geetest.com/install/client/web-front/ }, handler); } }); } function codeCutdown() { if(_wait == 0){ //倒計時完成 $(".getcheckcode").removeClass('dis').html("重新獲取"); }else{ $(".getcheckcode").addClass('dis').html("重新獲取("+_wait+"s)"); _wait--; setTimeout(function () { codeCutdown(); },1000); } } function inputValidate(ele,telInput) { var oInput = ele; var inputVal = oInput.val(); var oType = ele.attr('data-type'); var oEtag = $('#etag').val(); var oErr = oInput.closest('.form_box').next('.err_txt'); var empTxt = '請輸入'+oInput.attr('placeholder')+'！'; var errTxt = '請輸入正確的'+oInput.attr('placeholder')+'！'; var pattern; if(inputVal==""){ if(!telInput){ errFun(oErr,empTxt); } return false; }else { switch (oType){ case 'login_mobile': pattern = /^1[3456789]\d{9}$/; if(inputVal.length==11) { $.ajax({ url: '/login/checkmobile', type: "post", dataType: "json", data: { mobile: inputVal, etag: oEtag, page_ur: window.location.href, page_referer: document.referrer }, success: function (data) { } }); } break; case 'login_yzm': pattern = /^\d{6}$/; break; } if(oType=='login_mobile'){ } if(!!validateFun(pattern,inputVal)){ errFun(oErr,'') if(telInput){ $('.getcheckcode').removeClass('dis'); } }else { if(!telInput) { errFun(oErr, errTxt); }else { $('.getcheckcode').addClass('dis'); } return false; } } return true; } function errFun(obj,msg) { obj.html(msg); if(msg==''){ $('.login_submit').removeClass('dis'); }else { $('.login_submit').addClass('dis'); } } function validateFun(pat,val) { return pat.test(val); }