2017-10-06 4 views
0

J'ai eu un morceau de code pour envoyer des données à un point final HTTPEssayez bloc catch dans Outlook macro

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 

Je veux avoir un bloc catch essayer de gérer si elle na pas se connecter à l'URL ou si elle retourné quelque chose en dehors d'un 200

Comment faire?

+0

Try/Catch n'est pas disponible en VBA. [Voici une question très similaire] (https://stackoverflow.com/questions/30188584/vba-try-and-catch-ms-outlook). – MatSnow

+1

VBA gère les erreurs et/ou vous pouvez vérifier le 'status' de la réponse. VBA n'est pas VB.Net ou une autre langue, donc vous devez faire un peu de googling sur VBA. –

Répondre

0

La gestion des erreurs dans VBA est basée sur l'instruction On Error. Jetez un oeil à la Error Handling In VBA pour plus d'informations.

Je suggère de créer un complément COM au lieu de macros VBA. Vous serez en mesure de vérifier le code d'erreur facilement et gérer les exceptions avec élégance. Voir Walkthrough: Creating Your First VSTO Add-In for Outlook pour commencer rapidement.