.NET开发过程中易被忽视的问题
让我们谈谈数据库连接的问题，在Oracle数据库里，一般默认的数据库连接数最多也就100多来个，不会超过200个,即使你改变这个连接数，但无论怎样，它的连接数是有限的，不可能无限地供你消耗。 [Sample-02] 说到这，有人就问啦，我在开发环境下测试一点问题都没有呀？是呀，你是没有问题，我想问的是，你开发环境的测试数据有几笔？ Public Shared Function getOEMPN(ByVal psPN As String, ByRef OEMPN As String) As BSResult
0001 Dim clsResult As New BSResult 0002 Try 0003 clsResult.ResultID = -1 0004 Dim dtResult As New DataTable 0005 Dim Sql As String = String.Empty 0006 Dim clsOraDb As New clsOraClienDb 0007 Dim strConn As String = ConfigurationManager.ConnectionStrings("ConnectionString").ConnectionString 0008 clsOraDb.Open(strConn) 注释：这里Open后，后面看不到 clsOraDb.Close 0009 Sql = "SELECT SATBMMBRND.OEMPN FRUNO FROM SATBMMBRND WHERE SATBMMBRND.MATNO = :MATNO" 0010 Dim params() As OracleParameter = {New OracleParameter("MATNO", psPN)} 0011 If clsOraDb.FillDataTable(Sql, dtResult, params) = False Then 0012 Return clsResult 0013 End If 0014 If dtResult Is Nothing Then 0015 Return clsResult 0016 End If 0017 If dtResult.Rows.Count > 0 Then 0018 OEMPN = dtResult.Rows(0)("FRUNO").ToString() 0019 Else 0020 OEMPN = "" 0021 End If 0022 clsResult.ResultID = 1 0088 clsOraDb.Close 注释：后面看到 clsOraDb.Close 0023 Return clsResult 0024 Catch ex As Exception 0099 clsOraDb.Close 注释：程序异常也看到 clsOraDb.Close 0025 clsResult.ResultID = -1 0026 Return clsResult 0028 Throw ex 0027 End Try End Function |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
