Set objError = Server.GetLastError
Dim ASPError_Number
Dim ASPError_Source
Dim ASPError_Category
Dim ASPError_File
Dim ASPError_Line
Dim ASPError_Column
Dim ASPError_Description
Dim sErrMsg, sQuery
ASPError_Number = Hex(objError.Number)
ASPError_Source = Server.HTMLEncode(objError.Source)
ASPError_Category = objError.Category
ASPError_File = objError.File
ASPError_Line = objError.Line
ASPError_Column = objError.Column
ASPError_Description = objError.Description
On Error Resume Next
Call Object
If Err.Number <> 0 Then
Response.Write "오류내용 : " & err.Description
Response.End
End if
'먹고 사는 일 > Web' 카테고리의 다른 글
iframe 사용하기 (0) | 2010.02.12 |
---|---|
RSS 가져오기 (HTML 가져오기) (0) | 2010.02.12 |
ASP 이용 XML Load (0) | 2010.02.12 |
ActiveX 추가하기 (javascript) (0) | 2010.02.12 |
VB Script DB 연결 (0) | 2010.02.12 |