담

DB서버문제발생시 우회하기

· 2010-09-11 (토) 10:36:44 · 2460
<%
''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
''관리자에게 메일로 통보
ufMailSend("Primary Server")

Err.Clear
DbConn. ConnectionString = "SERVER=(서버명); Database=(DB명); UID=(ID);
PWD=(비빌번호)"
DbConn.Open
End If

''Secondry DB의 연결도 실패할경우 에러 메시지를 출력한다.
''다른 서버가 더존재하면 Secondry 루틴을 다시 만든다.
If Err.Number <> 0 Then
''관리자에게 메일로 통보
ufMailSend("Secondry Server")

''에러 메시지 출력
Response.write "DB 서버 에러 발생"
Response.End
End If

''메일 보내기 Function
Function ufMailSend (Server_Name)
Dim objMail
SET objMail = Server.CreateObject("CDONTS.NewMail")
With objMail
.To = "[email protected]"
.From = "[email protected]"
.Subject = "DB 연결 에러발생"
.Body = "에러 발생 시간 : "& New &" <br> 에러 발생 서버 : "& Server_Name
.BodyFormat = 0 ''내용 형식(HTML : 0, Text : 1)
.MailFormat = 0 ''메일 형식(MIME : 0, Text : 1)
.Send
End With
Set objMail = Nothing
End Function

''On Error Goto 0 를 이용하여 에러 처리를 불가능하게 한다.
On Error Goto 0
%>
 
[이 게시물은 관리자님에 의해 2011-10-31 16:46:12 기타에서 이동 됨]
|
댓글을 작성하시려면 로그인이 필요합니다.

프로그램

8,188건
+
제목 글쓴이 날짜 조회
10-10-27 조회 3,270
10-10-27 조회 2,923
10-10-27 조회 2,165
10-10-26 조회 3,267
10-10-26 조회 2,252
10-10-26 조회 2,147
10-10-26 조회 2,159
10-10-25 조회 2,087
10-10-24 조회 2,275
10-10-24 조회 2,320
10-10-24 조회 2,611
10-10-24 조회 4,775
10-10-24 조회 3,286
10-10-23 조회 2,236
10-10-23 조회 3,041
10-10-22 조회 2,081
10-10-22 조회 2,231
10-10-22 조회 3,413
10-10-22 조회 3,140
10-10-22 조회 2,164
10-10-21 조회 2,474
10-10-21 조회 2,414
10-10-21 조회 2,448
10-10-21 조회 2,599
10-10-21 조회 2,340
10-10-21 조회 2,343
10-10-21 조회 2,249
10-10-21 조회 2,420
10-10-21 조회 2,356
10-10-21 조회 2,987
10-10-21 조회 2,126
10-10-20 조회 2,096
10-10-20 조회 2,825
10-10-19 조회 2,843
10-10-19 조회 2,677
10-10-19 조회 2,236
10-10-19 조회 2,968
10-10-19 조회 2,369
10-10-19 조회 2,992
10-10-19 조회 3,410
10-10-19 조회 2,969
10-10-19 조회 9,030
10-10-19 조회 2,561
10-10-19 조회 2,713
10-10-19 조회 2,488
10-10-18 조회 2,605
10-10-18 조회 2,512
10-10-18 조회 2,586
10-10-18 조회 2,283
10-10-18 조회 3,416
10-10-17 조회 2,414
10-10-17 조회 2,286
10-10-17 조회 2,992
10-10-17 조회 2,761
10-10-16 조회 2,428
10-10-16 조회 2,331
10-10-16 조회 2,427
10-10-16 조회 2,789
10-10-16 조회 2,165
10-10-15 조회 2,271
10-10-14 조회 2,441
10-10-14 조회 3,247
10-10-13 조회 2,429
10-10-13 조회 2,563
10-10-13 조회 2,282
10-10-13 조회 2,303
10-10-12 조회 2,731
10-10-12 조회 3,033
10-10-12 조회 2,310
10-10-12 조회 2,782
10-10-11 조회 2,954
10-10-09 조회 2,379
10-10-09 조회 2,231
10-10-07 조회 2,568
10-10-07 조회 2,499
10-10-07 조회 2,212
10-10-07 조회 2,537
10-10-07 조회 2,671
10-10-07 조회 2,668
10-10-06 조회 4,629
10-10-06 조회 2,095
10-10-06 조회 2,857
10-10-06 조회 2,224
10-10-06 조회 3,052
10-10-06 조회 2,043
10-10-06 조회 2,292
10-10-05 조회 2,186
10-10-05 조회 2,233
10-10-05 조회 3,141
10-10-05 조회 4,455
10-10-05 조회 3,386
10-10-05 조회 3,349
10-10-05 조회 2,188
10-10-05 조회 2,423
10-10-05 조회 2,282
10-10-04 조회 2,080
10-10-04 조회 2,464
10-10-04 조회 2,176
10-10-04 조회 2,698
10-10-04 조회 1,957