淺析ASP中的Debug類(lèi)--VBScript(3)_ASP教程

教程Tag：暫無(wú)Tag,歡迎添加,賺取U幣!

推薦：解讀ASP網(wǎng)站Server object error的方法
癥狀：訪問(wèn)asp網(wǎng)頁(yè)的時(shí)候出現(xiàn)如下錯(cuò)誤: Server object error ''ASP 0178 : 80070005'' Server.CreateObject Access Error /_fpclass/fpdbrgn1.inc, line 99 The call to Server.C

Next
End If
Next

tbl = MakeTable(tbl)
if Request.Cookies.count <= 0 then DivSetNo = 2
tmp = replace(replace(replace(DivSets(DivSetNo),"#sectname#","COOKIES"),"#title#","COOKIES"),"#data#",tbl)
Response.Write replace(tmp,"|", vbcrlf)
end sub

'******************************************************************************************************************
'* PrintSummaryInfo
'******************************************************************************************************************
Private Sub PrintSummaryInfo(byval DivSetNo)
dim tmp, tbl
tbl = AddRow(tbl, "Time of Request",dbg_RequestTime)
tbl = AddRow(tbl, "Elapsed Time",DateDiff("s", dbg_RequestTime, dbg_FinishTime) & " seconds")
tbl = AddRow(tbl, "Request Type",Request.ServerVariables("REQUEST_METHOD"))
tbl = AddRow(tbl, "Status Code",Response.Status)
tbl = AddRow(tbl, "Script Engine",ScriptEngine & " " & ScriptEngineMajorVersion & "." & ScriptEngineMinorVersion & "." & ScriptEngineBuildVersion)
tbl = MakeTable(tbl)
tmp = replace(replace(replace(DivSets(DivSetNo),"#sectname#","SUMMARY"),"#title#",&quo

分享：如何使ASP跳出本次進(jìn)入下一次循環(huán)
看下面的Java代碼，目的是為了當(dāng)i是3的時(shí)候，就不做輸出，直接跳到下一個(gè)循環(huán)。以下為引用的內(nèi)容： int i = 0; w