VBA 오류 후 실행 재개

Question

최근에 문제가있었습니다. 액세스 앱의 인터넷 연결이 끊어지며 (분명히 데이터베이스에 연결되어 있음) 3146 오류가 발생합니다. 이 작업은 인터넷 연결이 다시 설정된 후 오류 처리, 복구 및 프로그램 실행을 구현했습니다.

MSDN과 여기 Stackoverflow에서 많은 내용을 읽었으며 문제를 해결하는 명확한 솔루션을 찾을 수 없었습니다.

Answer 1

그래서 나는 해결책을 찾았습니다. 여기 간단한 알고리즘의 개요입니다 : 내가 잃어버린 된 사용자 연결을 알려 X의 시도에 대한 카운터 (그래서 루프는 무한하지 않다), 또는 단순히 MSGBOX를 구현하는 것

Sub name_of_the_sub 
    Dim ...... As .... 
    Dim ...... As .... 
    ... 

Loop_Label: 

    On Error GoTo ErrorHandler 

    {code that might throw an error} 
    ... 

    GoTo Loop_Label 

ErrorHandler: 
    {log your error} 
    {wait for a some time} 
    {connect to data base} 
    Resume Loop_Label: 

End Sub