以下為原文，這部分內容在IIS6以前的系統運行的很正常，但是系統升級后就是無法啟動，具體是何原因呢？
asp啟動父路徑、啟用32支持，網站目錄及temp設定屬性完全控制，都是設定好的。
但是這個global.asa檔案運行到資料讀取這里就是無法運行，請多多指教了！
<!--
METADATA TYPE="typelib" File="c:\program files\common files\system\ado\msado15.dll"
-->
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
' 以下是引數設定區，網站中使用的某些變數的數值在此設定
Application("_StartDate") = "2019-12-12"
Application("_EndDate") = "2021-12-31"
Application("_StartTime") = Now()
Application("_OnLine") = 0 '初始化在線人數
Application("_OnTotal") = 0 '初始化起始人數
Application("_DBclass") = 1 '設定資料庫型別，0為SQL server，1為Access
Application("_Conn1") = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\DB\DB1.asp")
Application("_Conn2") = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\DB\DB2.asp")
' 建立資料庫鏈接，并設定遇到錯誤跳過繼續執行
On Error Resume Next : Err.Clear
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.str =Application("_Conn1")
Conn.Open Conn.str
' 讀出已經登記的總訪問人數
set rs16=server.createobject("adodb.recordset")
sql16="select top 1 * from OnLine order by ID DESC"
rs16.open sql16,conn,1,1
while not rs16.eof
Application.Lock()
Application("_OnTotal") = rs16("OnTotal")
Application.UnLock()
rs16.MoveNext
wend
rs16.Close : set rs16=nothing
' 關閉資料庫鏈接并結束
Conn.Close: set Conn=nothing
End Sub
Sub Application_OnEnd
End Sub
</SCRIPT>
轉載請註明出處，本文鏈接：https://www.uj5u.com/qianduan/259621.html
標籤：ASP