我在Web.config设置了
<add key="OracleConnection.ConnectionString" value="Provider=OraOLEDB.Oracle;Persist Security Info=true;User ID=bmpj;password=bmpj;Data Source=hnfs9"/>Global.asax类:
Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
    ' 在应用程序启动时激发
    getOracleConnString() '得到Oracle数据库连接字符串
    Application("strConnection") = StrDBConn
End Sub
 Public Sub getOracleConnString()
        StrDBConn = System.Configuration.ConfigurationSettings.AppSettings.GetValues("OracleConnection.ConnectionString").GetValue(0)
    End Subvb类:
Imports System.Data
Imports System.Data.OleDb
Imports System.ExceptionPublic Class dbFun
    Inherits System.Web.UI.Page    Public StrDBConn As String
    Private objDBConnect As OleDb.OleDbConnection    
    '得到连接oracle数据字符串过程
    Public Sub getDBConnStr()
        StrDBConn = System.Web.HttpContext.Current.Application("strConnection").ToString()
    End Sub    '判断登陆用户是否有效
    Public Function getLoginInfo(ByVal userName As String, ByVal userPSW As String) As String
        Dim strCommandText = "select * from bmpj_yhb"
        objDBConnect = New OleDbConnection(StrDBConn)
        Try
            objDBConnect.Open()
        Catch objError As Exception            Return objError.Message + "| " + objError.Source().ToString()        End Try
    End FunctionEnd Class执行显示:拒绝访问。| Microsoft OLE DB Service Components 有高手能告诉我这是什么错误引起的吗?我该怎么修改?