26          End While

27          sw.Stop()

28          Loger.Info("Reading z02j form sql sever used", sw.Elapsed.TotalSeconds.ToString())

 

二，采用 DataAdapter 实现批量插入

 

VB.NET

 1          sw.Start()

 2          ''''Read Z02J from SQL Server

 3          Dim sqlCmd As New SqlCommand()

 4          sqlCmd.Connection = sqlConnection

 5          sqlCmd.CommandText = "SELECT * FROM   Z02J"

 6

 7          Dim sqlDr As SqlDataReader

 8          sqlDr = sqlCmd.ExecuteReader()

 9

10          Dim cmdInsertZ02J As New OracleCommand()

11          cmdInsertZ02J.Connection = oraConnection

12          cmdInsertZ02J.CommandText = BuildSQLStatement(SQLType.Insert,"z02j")

13

14          Dim dtSqlZ02J As New DataTable

15          dtSqlZ02J.Columns.Add("plantLever")

16          dtSqlZ02J.Columns.Add("material")

17          dtSqlZ02J.Columns.Add("oldMaterialNum")

18          dtSqlZ02J.Columns.Add("materialDescription")

19

20          Dim plantLever, material, oldMaterialNum, materialDescription As Object

21          While sqlDr.Read()

22              plantLever = ReadSqlDataReader(sqlDr, 0, "")

23              material = ReadSqlDataReader(sqlDr, 1, "")

24              oldMaterialNum = ReadSqlDataReader(sqlDr, 2, "")

25              materialDescription = ReadSqlDataReader(sqlDr, 3, "")

26              dtSqlZ02J.Rows.Add(plantLever, material, oldMaterialNum, materialDescription)

27          End While

28          sw.Stop()

 

    希望这篇Oracle 数据的批量插入（2）的文章能够对您有所帮助，如果您觉得这篇网站维护教程有用的话，别忘了推荐给您的朋友哦！如果您有好的经验方法，不妨拿出来和大家一起分享：假如每个人都拿出一个经验，那么我们都将额外的获取一堆他人的经验。
请记住本站永久域名：（黑客防线网安服务器维护方案维护基地）Www.Rongsen.Com.Cn