[.NET] VB.net 越吃越多的記憶體...

看板Visual_Basic作者i1537時間15年前 (2010/07/27 18:56)推噓6(6推 0噓 16→)

留言22則, 5人參與討論串1/1

請輸入專案類型(網站專案或者應用程式專案)：應用程式專案各位好有個會吃記憶體的問題想跟各位請教程式碼如下: ==================================START======================================== Imports System.Data Imports System.Data.OleDb Public Class Form1 Dim conn As New OleDbConnection Dim insertstring As String Dim cmd As New OleDbCommand Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load conn.ConnectionString = "Provider=MSDAORA.1;Data Source=myserver;Persist Security Info=True;Password=pwd;User ID=user" conn.Open() Dim str1 As String = "Select * from Table01" Dim adapter1 As OleDbDataAdapter = New OleDbDataAdapter(str1, conn) Dim dataset1 As DataSet = New DataSet() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick '1s TextBox1.Text = Now.Hour & ":" & Now.Minute & ":" & Now.Second cmd.CommandText = "Insert Into Table01(Time,DATA1)Values( '" & TextBox1.Text & "' , 100 )" cmd.Connection = conn cmd.ExecuteNonQuery() End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If Timer1.Enabled = True Then Timer1.Enabled = False Else Timer1.Enabled = True End If End Sub End Class ===================================END========================================= 目前程式可以正常執行但是在工作管理員中會發現整個程式不斷在吃記憶體會慢慢的增加請問我有寫錯嗎或是有什方法可以解決此問題我試過 dispose 無法釋放資源謝謝 PS: VB.net 2010 + ORACLE 10g -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.32.205.238

推

jimmy701010

07/27 18:59, , 1^F

07/27 18:59, 1^F

→

i1537

07/27 19:39, , 2^F

07/27 19:39, 2^F

→

nobody1

07/27 22:03, , 3^F

07/27 22:03, 3^F