2017-10-06 3 views
0

나는 HTTP 엔드 포인트로 데이터를 전송하는 코드의 조각을했다해보십시오 catch 블록

Set xhr = CreateObject("MSXML2.XMLHTTP") 
xhr.Open "POST", URL, False 
xhr.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 

Data = "volumeDate=" & URLEncode(VolumeDate) & "&" & "volume=" & URLEncode(Volume) 
xhr.Send Data 

나는 그것이 URL 또는 그 경우 연결 didnt는 경우 처리 할 수있는 시도의 catch 블록을 갖고 싶어 200에서 다른 것을 반환했습니다.

어떻게해야합니까?

+0

VBA에서는 Try/Catch를 사용할 수 없습니다. [다음은 매우 비슷한 질문입니다] (https://stackoverflow.com/questions/30188584/vba-try-and-catch-ms-outlook). – MatSnow

+1

VBA에는 오류 처리 기능이 있으며 응답의 '상태'를 확인할 수 있습니다. VBA는 VB.Net 또는 다른 언어가 아니기 때문에 VBA에서 약간의 인터넷 검색을해야합니다. –

답변

0

VBA의 오류 처리는 On Error 문을 기반으로합니다. 자세한 내용은 Error Handling In VBA을 참조하십시오.

VBA 매크로 대신 COM 추가 기능을 만드는 것이 좋습니다. 오류 코드를 쉽게 확인하고 예외를 정상적으로 처리 할 수 ​​있습니다. 신속하게 시작하려면 Walkthrough: Creating Your First VSTO Add-In for Outlook을 참조하십시오.

관련 문제