也许这是完全错误的做事方式,如果是这样,您能否指出我正确(优雅)的方式。:)
我的 vb.net 项目中有一个模块。该模块处理数据库连接。这个想法是让其他模块在需要创建连接时使用这个模块。
对于每种数据库类型,我都有打开数据库连接的功能。作为一个例子,我有这个功能可以打开一个 oracle 连接。
Friend Function OracleConnection(ByVal HostAddress As String, ByVal PortNumber As String, ByVal DBName As String, ByVal UserId As String, ByVal Password As String) As OracleConnection
Try
OracleConnection = New OracleConnection("Data Source=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=" & HostAddress & ")(PORT=" & PortNumber & "))(LOAD_BALANCE=yes)(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=" & DBName & ")(FAILOVER_MODE=(TYPE=select)(METHOD=BASIC)(RETRIES=180)(DELAY=5))));User Id=" & UserId & ";Password=" & Password & ";")
OracleConnection.Open()
OracleConnection = OracleConnection
Catch ex As OracleException
MsgBox(ex.Message, MsgBoxStyle.Critical)
OracleConnection = Nothing
End Try
Return OracleConnection
End Function
创建连接似乎工作正常。我遇到的问题是我现在不确定如何关闭此函数创建的连接。