asp连接oracle Provider (0x80004005) 未指定的异常
日期：2014-05-16 浏览次数：20920 次
asp连接oracle Provider (0x80004005) 未指定的错误
各位大神，小女子这次被迫做个asp的东西，是拿的韩国人做的蹩脚程序，数据库要求从sqlserver改成oracle，改了之后一堆问题，逐个解决中，然后就很不幸的卡在这里了，已经在网上百度了一下午了，很多方法都试过了 。 最大的疑惑就是为什么前面打开登录网页连接数据库时没有问题，登录进去就这样了，跪求大神指点。
报错：Provider (0x80004005)
未指定的错误
/index.asp, line 148
连接代码
Set db = Server.CreateObject("ADODB.Connection")
Ap_Connect = "Driver={microsoft odbc for oracle};uid=scott;pwd=tiger;server=shaka"
db.Open Ap_Connect
具体代码如下（报错的就是代码的最后一行）
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<% Response.CharSet = "utf-8" %>
PMDS- PSTS
<%
'/// SYSTEM OPEN DATE QRY
SQL = "SELECT SYSTEM_YEAR FROM PMDS_SYSTEM"
SET RS_TIME = DB.EXECUTE(SQL)
SYS_DATES = LEFT(RS_TIME(0),10)
RS_TIME.CLOSE
SET RS_TIME = NOTHING
'/// SYSTEM OPEN DATE QRY
SQL = "select to_char(sysdate,'yyyy-mm-dd') from dual" '///修改 1"
SET RS_TIME = DB.EXECUTE(SQL)
SYS_DATE = LEFT(RS_TIME(0),10)
RS_TIME.CLOSE
SET RS_TIME = NOTHING
'///
SQL = "SELECT SYSTEM_START, SYSTEM_END FROM PMDS_SYSTEM"
SET RS_SYS = DB.EXECUTE(SQL)
SYSTEM_START = RS_SYS("SYSTEM_START")
SYSTEM_END = RS_SYS("SYSTEM_END")
RS_SYS.CLOSE
SET RS_SYS = Nothing
'//// SYSTEM OPEN IF
IF SYSTEM_START <= SYS_DATE AND SYSTEM_END >= SYS_DATE THEN
ELSE %>
<script language="JavaScript">
<!--
//window.document.location.href="/index_con.asp"
//-->
</script>
<%
'RESPONSE.END
END IF
%>
<body topmargin="0" leftmargin="0">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr><td height="6............................/<table>
<%
IF REQUEST.COOKIES("EMP_NUMB") <> "" THEN
'//// ???? ??? ???? ?? ?? (????? ????? ?? ???? ?? ??) ////
SQL = "SELECT * FROM PMDS_USER WHERE EXE_YEAR='" & REQUEST.COOKIES("EXE_YEAR") & "' AND EMP_NUMB='" & REQUEST.COOKIES("EMP_NUMB") & "'"
SET RS_PRO = DB.EXECUTE(SQL)
各位大神，小女子这次被迫做个asp的东西，是拿的韩国人做的蹩脚程序，数据库要求从sqlserver改成oracle，改了之后一堆问题，逐个解决中，然后就很不幸的卡在这里了，已经在网上百度了一下午了，很多方法都试过了 。 最大的疑惑就是为什么前面打开登录网页连接数据库时没有问题，登录进去就这样了，跪求大神指点。
报错：Provider (0x80004005)
未指定的错误
/index.asp, line 148
连接代码
Set db = Server.CreateObject("ADODB.Connection")
Ap_Connect = "Driver={microsoft odbc for oracle};uid=scott;pwd=tiger;server=shaka"
db.Open Ap_Connect
具体代码如下（报错的就是代码的最后一行）
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<% Response.CharSet = "utf-8" %>
PMDS- PSTS
<%
'/// SYSTEM OPEN DATE QRY
SQL = "SELECT SYSTEM_YEAR FROM PMDS_SYSTEM"
SET RS_TIME = DB.EXECUTE(SQL)
SYS_DATES = LEFT(RS_TIME(0),10)
RS_TIME.CLOSE
SET RS_TIME = NOTHING
'/// SYSTEM OPEN DATE QRY
SQL = "select to_char(sysdate,'yyyy-mm-dd') from dual" '///修改 1"
SET RS_TIME = DB.EXECUTE(SQL)
SYS_DATE = LEFT(RS_TIME(0),10)
RS_TIME.CLOSE
SET RS_TIME = NOTHING
'///
SQL = "SELECT SYSTEM_START, SYSTEM_END FROM PMDS_SYSTEM"
SET RS_SYS = DB.EXECUTE(SQL)
SYSTEM_START = RS_SYS("SYSTEM_START")
SYSTEM_END = RS_SYS("SYSTEM_END")
RS_SYS.CLOSE
SET RS_SYS = Nothing
'//// SYSTEM OPEN IF
IF SYSTEM_START <= SYS_DATE AND SYSTEM_END >= SYS_DATE THEN
ELSE %>
<script language="JavaScript">
<!--
//window.document.location.href="/index_con.asp"
//-->
</script>
<%
'RESPONSE.END
END IF
%>
<body topmargin="0" leftmargin="0">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr><td height="6............................/<table>
<%
IF REQUEST.COOKIES("EMP_NUMB") <> "" THEN
'//// ???? ??? ???? ?? ?? (????? ????? ?? ???? ?? ??) ////
SQL = "SELECT * FROM PMDS_USER WHERE EXE_YEAR='" & REQUEST.COOKIES("EXE_YEAR") & "' AND EMP_NUMB='" & REQUEST.COOKIES("EMP_NUMB") & "'"
SET RS_PRO = DB.EXECUTE(SQL)
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
