數據閱讀器與連接必須關閉錯誤

Question

我有這個奇怪的錯誤，我還找不到解決方案。每當我必須在數據庫中插入數據時，我都有一個函數。它的實際工作，因爲當我檢查數據庫條目，他們實際上在那裏。

但是我有這個煩人的錯誤「已經有一個打開的數據閱讀器與連接必須關閉」。我找不到一個方法來閱讀它。

這是函數：

Sub InputDataValues(ByVal StrQwery As String) 
    Try 
     myconn.Open() 
     Dim stquery As String = StrQwery 
     Dim smd As MySqlCommand 
     smd = New MySqlCommand(stquery, myconn) 
     smd.ExecuteReader() 

     smd.ExecuteReader().Close()//I added this when I wanted to get rid if the mistake 
     myconn.Close() 

    Catch ex As Exception 
     Dim ErrorMessage As String = "alert('" & ex.Message.ToString() & "');" 
     Page.ClientScript.RegisterStartupScript(Me.GetType(), "ErrorAlert", ErrorMessage, True) 
     myconn.Close() 
    End Try 
    myconn.Close() 
End Sub 

這是我怎麼稱呼它幾次下來代碼：

InputDataValues(StrQwery) 

如果有人凸輪給我一個提示，我將不勝感激。

這是怎麼看當我把它改成的ExecuteNonQuery

Sub InputDataValues(ByVal StrQwery As String) 
    Try 
     myconn.Open() 
     Dim stquery As String = StrQwery 
     Dim retValue As Integer 
     Dim smd As MySqlCommand 
     smd = New MySqlCommand(stquery, myconn) 
     retValue = smd.EndExecuteNonQuery() 

     myconn.Close() 

    Catch ex As Exception 
     Dim ErrorMessage As String = "alert('" & ex.Message.ToString() & "');" 
     Page.ClientScript.RegisterStartupScript(Me.GetType(), "ErrorAlert", ErrorMessage, True) 
     myconn.Close() 
    End Try 
    myconn.Close() 
End Sub 

Answer 1

你可以使用的ExecuteNonQuery取代的ExecuteReader因爲你只是插入數據。 在你coede，我的猜測是每次你調用ExecuteReader你得到一個新的閱讀器，所以你應該打電話給你創建的第一個關閉。