ASP常用函數:Trace()

復制代碼 代碼如下:
<% 
'//---- 輸入字符串並結束當前頁面(調試用),函數可以也命名為Debug  ----// 

Function Trace(s) 
    On Error Resume Next 
    Response.Write(s & vbCrLf) 
    Response.End() 
End Function 
%> 

下面的是個修改升級版,還在測試中...

復制代碼 代碼如下:
<% 
'//---- 輸入字符串並結束當前頁面(調試用)  ----// 

Function Trace(s) 
    On Error Resume Next 
    If IsArray(s) Then 
        For i = 0 To UBound(s) 
            Response.Write(s(i) & vbCrLf) 
        Next 
    Else 
        Response.Write(s & vbCrLf) 
    End If 
    Response.End() 
End Function 
%>