담

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

· 2010-09-11 (토) 10:36:44 · 2425
<%
''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-09-17 조회 3,846
10-09-17 조회 2,278
10-09-16 조회 3,379
10-09-16 조회 2,114
10-09-16 조회 3,250
10-09-16 조회 2,187
10-09-16 조회 3,864
10-09-16 조회 2,117
10-09-16 조회 2,610
10-09-16 조회 2,116
10-09-15 조회 4,438
10-09-15 조회 2,778
10-09-15 조회 2,761
10-09-15 조회 2,773
10-09-15 조회 2,806
10-09-15 조회 2,550
10-09-15 조회 3,259
10-09-15 조회 2,753
10-09-15 조회 2,333
10-09-15 조회 4,182
10-09-15 조회 2,605
10-09-15 조회 2,802
10-09-15 조회 2,510
10-09-15 조회 3,419
10-09-15 조회 3,444
10-09-15 조회 3,088
10-09-15 조회 2,444
10-09-15 조회 2,649
10-09-15 조회 2,317
10-09-15 조회 2,332
10-09-15 조회 2,518
10-09-14 조회 4,050
10-09-11 조회 3,973
10-09-11 조회 2,905
10-09-11 조회 2,426
10-09-11 조회 2,606
10-09-11 조회 2,602
10-09-11 조회 2,481
10-09-11 조회 2,409
10-09-11 조회 2,303
10-09-11 조회 2,663
10-09-11 조회 2,757
10-09-11 조회 2,385
10-09-11 조회 2,385
10-09-11 조회 2,538
10-09-11 조회 3,008
10-09-11 조회 2,514
10-09-08 조회 2,912
10-09-08 조회 2,645
10-09-07 조회 3,420
10-09-07 조회 4,467
10-09-07 조회 3,793
10-09-07 조회 2,336
10-09-07 조회 3,332
10-09-07 조회 3,632
10-09-04 조회 2,901
10-08-29 조회 2,788
10-08-27 조회 4,084
10-08-27 조회 4,103
10-08-20 조회 6,990
10-08-06 조회 2,905
10-07-30 조회 5,672
10-07-27 조회 2,779
10-07-15 조회 3,104
10-07-06 조회 3,173
10-07-01 조회 3,051
10-07-01 조회 2,570
10-07-01 조회 2,798
10-07-01 조회 3,045
10-06-30 조회 2,946
10-06-30 조회 3,803
10-06-30 조회 2,819
10-06-30 조회 2,921
10-06-30 조회 2,375
10-06-30 조회 2,498
10-06-30 조회 2,500
10-06-30 조회 2,442
10-06-30 조회 2,446
10-06-30 조회 2,472
10-06-30 조회 2,619
10-06-30 조회 2,632
10-06-30 조회 4,047
10-06-30 조회 2,395
10-06-30 조회 3,079
10-06-30 조회 2,981
10-06-17 조회 3,089
10-06-16 조회 2,771
10-06-14 조회 3,324
10-06-13 조회 2,007
10-06-11 조회 2,661
10-06-11 조회 2,538
10-06-11 조회 4,269
10-06-11 조회 4,670
10-06-11 조회 3,367
10-06-01 조회 2,836
10-05-31 조회 3,543
10-05-31 조회 2,940
10-05-31 조회 2,509
10-05-22 조회 5,201
10-05-18 조회 2,890