-- 匯入excel到sql資料庫的方法
select * into xlimport6
from opendatasource('microsoft.jet.oledb.4.0',
'data source=c:/abc.xls;
extended properties=excel 8.0') //[sheet1$]
select * into xlimport7
from openrowset('microsoft.jet.oledb.4.0',
'excel 8.0;database=c:/abc.xls', [sheet1$])
select * into xlimport8
from openrowset('microsoft.jet.oledb.4.0',
'excel 8.0;database=c:/abc.xls',
'select * from [sheet1$]'
sql匯出到excel
1）匯出整個表：
use bcp, write out a csv file, :-), something like
xp_cmdshell "bcp ..out c:/file.csv -usa -p-c"
2）匯出表的部分內容：
no need to use a temporary table, you can use straight sql statement like this
master..xp_cmdshell 'bcp "select * from pubs.dbo.t1" queryout c:/t1.csv -c -t, -usa -p[password] -s[server name]'
[+red]excel怎樣匯入匯出資料庫[+black]
//匯出資料到excel
procedure copydbdatatoexcel(target: tdbgrid);
varicount, jcount: integer;
sheet: variant;
begin
screen.cursor := crhourglass;
begin
end;
//通過ole建立excel物件
tryexcept
screen.cursor := crdefault;
exit;
end;
if not target.datasource.dataset.active then
begin
screen.cursor := crdefault;
exit;
end;
target.datasource.dataset.first;
for icount := 0 to target.columns.count - 1 do
begin
sheet.cells[1, icount + 1] := target.columns.items[icount].title.caption;
end;
jcount := 1;
while not target.datasource.dataset.eof do
begin
for icount := 0 to target.columns.count - 1 do
begin
sheet.cells[jcount + 1, icount + 1] := target.columns.items[icount].field.asstring;
end;
inc(jcount);
target.datasource.dataset.next;
end;
screen.cursor := crdefault;
end;
procedure tfrmmain.button1click(sender: tobject);
var i,j:integer;
opendialog1:topendialog;
s0,s1,s2:string;
begin
tryopendialog1:=topendialog.create(self);
opendialog1.initialdir:=extractfiledir(paramstr(0));//檔案的打存放初始路徑
if opendialog1.execute then
begin
tryexcept
messagebox(0,'excel 可能沒有安裝！!','提示！',mb_ok);
exit;
end;
try
null,null,null,null,null,null,null,null,null,null,null,null,0);//開啟指定的excel 檔案
except
begin
exit;
end;
end;
excelworksheet1.connectto(excelworkbook1.worksheets[1] as _worksheet);
//excelworksheet1與excelworkbook1建立連線
//開始從excel中取數，取完數後關閉excel
for i:=1 to 10000 do//最大取值10000
begin
if trim(excelworksheet1.cells.item[i+1,1])<>'' then
begin
s0:= excelworksheet1.cells.item[i+1,1];
s1:= excelworksheet1.cells.item[i+1,2];
s2:= excelworksheet1.cells.item[i+1,3];
with qry do
begin
close;
sql.clear;
sql.add('insert into xsz(pzno,pno,tcount,inday)values('+
''''+s0+''''+','+''''+s1+''''+','+''''+s2+''''+','+''''+datetostr(date)+''')');
execsql;
end;
end
end;
end;
with qryxsz do
begin
sql.clear;
sql.add('select * from xsz order by pzno,pno,tcount,inday');
open;
end;
for j:=0 to grdxsz.columns.count do
grdxsz.columns[j].width:=64;//縮小寬度
messagebox(0,'檔案已經匯入資料庫！','完成！',mb_ok);
except
exit;
// messagebox(0,'檔案已經匯入資料庫失敗！','完成！',mb_iconerror+mb_ok);
end;
end;
tryif qryxsz.recordcount<1 then exit;
copydbdatatoexcel(grdxsz);
except
// messagebox(0,'請安裝excel軟體，再使用本功能。','提示',mb_ok);
exit;
end;
這是我在乙個對帳系統中用到的將兩張excel表中的資料到如資料庫進行相應處理後再匯出excel.
excel匯入資料庫
在你的 中增加一列，利用excel的公式自動生成sql語句 concatenate 函式 具體方法如下 1 增加一列 假設是d列 2 在第一行的d列，就是d1中輸入公式 concatenate insert into table col1,col2,col3 values a1,b1,c1,3 此時...
Excel匯入資料庫
一 在excel中 新建一列,如把列名定為ab,下面放你的資料，比如1，2，3 二 開啟sql企業管理器，右擊你所需要匯入的資料庫，選擇匯入資料，下一步，資料來源選擇microsoft eccel 97 2000,選擇excel檔案繼續下一步，往下按，選擇sheet1 或者2，3 看你把資料放在那一...
excel匯入資料庫
日常工作中，感覺一些基礎知識需要做下筆記，可能是剛畢業的緣故吧，還保持著做筆記的習慣，但根據以往經驗，紙質筆記最多保持一年，過後想找已是難過登天。電子版筆記感覺很不錯，尤其是發布到網路中。筆記內容是本人遇到的感覺可能會有些用的東西，很是瑣碎，記錄在中，僅供學習參考。1 將資料庫中的內容顯示到乙個窗體...