|
HTML
Javascript
Flash Actionscript
PHP
mySQL
ASP
MS-SQL
Linux
Others
Ziwoo Board
Portfolio
About
|
 |
 ASP |
| 작성 |
2007-03-20 14:33:30 추천: 81 조회: 3840 |
| 제목 |
에러발생을 무시하는 On Error Resume Next |
| 이름(ID) |
지우 (ziwoo)
|
|
<%
'On Error Resume Next를 사용하여 에러처리를 가능하게 한다.
On Error Resume Next
Dim Dbconn
Set DbConn = Server.CreateObject("ADODB.Connection")
DbConn.Provider = "SQLOLEDB"
DbConn.ConnectionString = "SERVER=(서버명); Database=(DB명); UID=(ID); PWD=(비빌번호)"
DbConn.Open
'에러가 나면 Secondry DB로 연결을 시도한다.
If Err.Number <> 0 Then
Err.Clear
DbConn. ConnectionString = "SERVER=(서버명); Database=(DB명); UID=(ID); PWD=(비빌번호)"
DbConn.Open
End If
'Secondry DB의 연결도 실패할경우 에러 메시지를 출력한다.
'다른 서버가 더존재하면 Secondry 루틴을 다시 만든다.
If Err.Number <> 0 Then
'에러 메시지 출력
Response.write "DB 서버 에러 발생"
Response.End
End If
'On Error Goto 0 를 이용하여 에러 처리를 불가능하게 한다.
On Error Goto 0
%>
|
 |
|
| 우키(220.93.111.230)
2009-03-04 15:52:06
|
|
| 필요한 자료인데 잘 사용하겠습니다.. 까먹을수도 있으니 제 블로그에 퍼갈께요^^ 감사합니다~ |
|
|
|
|
Contact Phone Number
