我創建了一個VB.Net應用程序,它將從excel文件中讀取並將數據放入一個表中。 我用了一個有3列和65000行的Excel表格。 在開始讀取excel之前,我的機器的CPU使用率約爲15%,但在讀取期間CPU使用率跳至95%。 我不知道它爲什麼會發生?有人可以幫我解決這個問題嗎? 以下是我寫的代碼:從excel文件讀取時CPU使用率達到100%?
Private Sub readFromExcel(ByVal fileName As String, ByVal sheetName As String)
Dim connString As String = "data source=XE; user=test; password=test"
Dim con As New OracleConnection(connString)
Dim str1 As String
Dim str2 As String
Dim str3 As String
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
xlApp = New Excel.ApplicationClass
xlWorkBook = xlApp.Workbooks.Open(fileName)
xlWorkSheet = xlWorkBook.Worksheets(sheetName)
Dim x As Integer
Dim y As Integer
Dim i As Integer
x = xlWorkSheet.Rows.Count()
y = xlWorkSheet.Columns.Count()
Try
For i = 1 To x - 1
'MsgBox(xlWorkSheet.Cells(i, 0).value)
str1 = xlWorkSheet.Cells(i, 1).value
str2 = xlWorkSheet.Cells(i, 2).value
str3 = xlWorkSheet.Cells(i, 3).value
insertData()
Next
Catch ex As Exception
MsgBox(ex.Message())
Finally
con.Close()
xlWorkBook.Close()
End Try
End Sub
Private Sub insertData()
Dim str As String
str = "insert into test_import values('" + str1 + "'," + str2 + "," + str3 + ")"
Dim cmd As New OracleCommand()
cmd.CommandText = str
cmd.Connection = con
cmd.ExecuteNonQuery()
End Sub
thx提前。
你的代碼是什麼樣的? – APrough 2012-04-05 12:06:52
從excel中讀取和單獨插入65k記錄只需要一些CPU電源,這就是全部... – Mr47 2012-04-05 12:18:22
我嘗試了沒有插入和jus 1000行也,那時候它也會達到最大。 – 2012-04-05 12:21:13