.NET开发

本类阅读TOP10

·NHibernate快速指南(翻译)
·vs.net 2005中文版下载地址收藏
·【小技巧】一个判断session是否过期的小技巧
·VB/ASP 调用 SQL Server 的存储过程
·?dos下编译.net程序找不到csc.exe文件
·通过Web Services上传和下载文件
·学习笔记(补)《.NET框架程序设计(修订版)》--目录
·VB.NET实现DirectDraw9 (2) 动画
·VB.NET实现DirectDraw9 (1) 托管的DDraw
·建站框架规范书之——文件命名

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
在ASP.NET中,向数据库批量插入数据

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

       

   我们平时的开发过程中,经常要向数据库插入数据,有时可能要进行很多次类似的操作,比如向数据库中的同一个表同时插入若干数据,即批量插入数据。

向数据库中批量插入数据,可以将若干条数据一次插入道数据库,提高程序的执行效率,也可以减少我们的工作量。

批量插入数据,可以采用一下两种方法。

一、利用事务(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

利用以上的两种方法,都可以完成向数据库批量插入数据。




相关文章

相关软件