在我們平時的開發過程中,經常要向資料庫插入資料,有時可能要進行很多次類似的操作,比如向資料庫中的同一個表同時插入若幹資料,即批量插入資料。
向資料庫中批量插入資料,可以将若幹條資料一次插入道資料庫,提高程式的執行效率,也可以減少我們的工作量。
批量插入資料,可以采用一下兩種方法。
一、利用事務(transaction)
‘定義執行批量插入資料的函數,參數為insert SQL語句的數組
sub ExeTransaction (Byval Sqlstrlist as string())
dim Conn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Tax.mdb"
dim trans as OledbTransaction=Nothing
try
if conn.State=connectionstate.closed then
conn.open()
end if
dim cmd as oledbCommand=new oledbcommand()
cmd.connection=conn
cmd.commandtype=commandtype.text
trans=conn.begintransaction()
cmd.transaction=trans
dim I as integer
for I=0 to Sqlstrlist.GetupperBound(0)
cmd.commandtext= Sqlstrlist(i) ‘取得參數(數組)中的值
cmd.executenonquery()
next
trans.commit()
catch ex as oledbexception
trans.rollback()
fanlly
conn.close()
end try
end sub
二、利用dataset
public sub Insert()
‘建立datatable資料源
dim dt as DataTable=New DataTable()
dim dr as DataRow
dt.columns.add(new DataColumn(“name”))
dim j as Integer
for j =0 to 10
dr=dt.newrow()
dr(0)=”name”+j.tostring
dt.rows.add(dr)
next
dim Conn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Tax.mdb"
conn.open()
dim MyAdapter as Oledbdataadapter=new OleDataAdapter()
….
dim cmd as Oledbcommand=New Oledbcommand(“Insert Into table(name) values (@name)”,conn)
cmd.parameters.item(“@name”).SourceColumns=dt.columns(“name”).columnsName
myadapter.update(dt)
conn.close()
end sub
利用以上的兩種方法,都可以完成向資料庫批量插入資料。
--下面是在SQL中,直接用SQL語句讀取幾種常見的檔案格式中的資料
--
--
--
--
bulk insert
有一檔案[D:/msql/bulk.txt]内容如下.以空格分隔.
01 gwf dongguang CSDN.net
02 sxl dongguangeric CSDN.net
--建表:
if object_id('tbulk') is not null drop table tbulk
create table tbulk(id int,name varchar(100),addr varchar(100),tag varchar(10))
Go
--批次處理
bulk insert tbulk from 'D:/msql/bulk.txt'
with (
fieldterminator=' ' --列分隔符
-- rowterminator='/n' --行分隔符
)
--結果
select * from tbulk