2017-03-29 101 views
1

我有以下連接字符串類VB.NET中的連接字符串問題?

Imports System.Data.SqlClient 

Public Class DBConnection 
    Sub GetConnection() 
     Dim CrmsConn As New SqlConnection(System.Configuration.ConfigurationManager.ConnectionStrings("crmsConnectionString").ConnectionString) 

    End Sub 

End Class 

我試圖從上面的類調用連接字符串如下:

Dim dbcon As DBConnection 
Dim con As New SqlConnection(dbcon.GetConnection()) 

但它有dbcon.GetConnection附近的一個錯誤() 。 解決方案是什麼?

+1

今後考慮包括錯誤。有幾個可能發生的錯誤。我已經刪除了欺騙鏈接,因爲提供的答案可以解決您的問題。 – Bugs

回答

1

GetConnection是一個子類。這意味着它不會返回任何內容,也不會嘗試使用不確定的返回值。 (這是一個編譯時錯誤,直到你解決它,你不能產生任何可執行代碼)

使它成爲一個功能和公共

Public Function GetConnection() as SqlConnection 
    return New SqlConnection(System.Configuration.ConfigurationManager.ConnectionStrings("crmsConnectionString").ConnectionString) 
End Function 

,然後用它(但先創建類的實例否則在運行時一個空引用異常發生時)

' Create the instance of the DBConnection class and ... 
Dim dbcon As DBConnection = new DBConnection() 

' ... get the connection 
Dim con as SqlConnection = dbcon.GetConnection() 

最後記得要使用一次性周圍物體使用聲明這樣

Using con = dbCon.GetConnection() 
    .... 
End Using 
+0

作品有幫助的描述。 – usminuru