各位大神,小妹这次被迫做个asp的东西,是拿的韩国人做的蹩脚程序,数据库要求改成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
%>
<% 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) |