下面是我数据库的连接文件<%
Dim objOraSession,objOraDb
Dim strDbUser,strDbPwd,strDbConnSub ConnectOracleDB()
    On Error Resume Next
    strDbUser            = "数据库用户"
    strDbPwd            = "数据库密码"
    strDbConn            = "数据库名称"
    Set objOraSession    = Server.CreateObject("OracleInProcServer.XOraSession")
    Set objOraDB        = objOraSession.OpenDatabase(strDbConn,strDbUser & "/" & strDbPwd,0)    If Err.Number>0 Then
        Response.Write "<font color=red>错误 :" & err.description & "</font>"
        Response.End
    End If
End Sub
Sub EndOracleDB()
    Set objOraDB        = Nothing
    Set objOraSession    = Nothing
End Sub
%>strSql 是我的sql语句,然后我使用以下两句执行,都报错
objOraDb.dbEXECUTESQL(strSql)
objOraDb.DbCreateDynaset(strSql)
错误来源: Microsoft VBScript 运行时错误
错误代码: 438
错误说明: 对象不支持此属性或方法请问该如何写sql执行语句。