DataRecordsets.GetLastDataError, méthode (Visio)
Obtient le code d’erreur ADO (Active X Data Objects), la description ADO et l’ID du jeu d’enregistrements de données associé à une erreur causée par l’ajout d’un nouveau jeu d’enregistrements de données ou l’actualisation des données dans un jeu existant.
Remarque
Cet objet ou ce membre Visio est disponible uniquement pour les titulaires d’une licence d’utilisation de Visio Professionnel 2013.
Syntaxe
expression. GetLastDataError (DataErrorCode, DataErrorDescription, RecordsetID)
Expression Expression qui renvoie un objet DataRecordsets .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
DataErrorCode | Obligatoire | Long | Paramètre de sortie. Code d'erreur ADO de la dernière erreur. |
DataErrorDescription | Requis | String | Paramètre de sortie. Description ADO de la dernière erreur. |
RecordsetID | Obligatoire | Long | Paramètre de sortie. ID du jeu d'enregistrements de données qui a généré ou déclenché l'erreur. |
Valeur renvoyée
Aucune
Remarques
L’ajout d’un nouvel objet DataRecordset à la collection DataRecordsets du document actif et l’actualisation des données d’un jeu d’enregistrements existant sont deux exemples d’opérations susceptibles de générer des erreurs ADO dans Microsoft Visio.
Si une opération liée aux données réussit, la méthode GetLastDataError renvoie RecordsetID = 0, DataErrorCode = 0 et DataErrorDescription = « » (chaîne vide).
Si une tentative d’ajout d’un jeu d’enregistrements de données génère une erreur, la méthode retourne RecordsetID = 0, ainsi que le code d’erreur et la description.
Si une tentative d'actualisation des données dans un jeu d'enregistrements de données existant provoque une erreur et si Visio connaît le jeu d'enregistrements de données à l'origine de l'erreur, GetLastDataError renvoie l'ID du jeu d'enregistrements de données en question.
Il est toutefois possible que Visio ne connaisse pas le jeu d'enregistrements de données à l'origine de l'erreur. Cela ne peut se produire que lorsque vous tentez d’actualiser un jeu d’enregistrements de données qui fait partie d’un groupe de jeux d’enregistrements de données qui partagent la même connexion à une source de données. En effet, lorsque des données d'un jeu d'enregistrements de données de ce type de groupe (appelé jeu d'enregistrements de données avec transaction) sont actualisées, tous les jeux d'enregistrements de données du groupe sont actualisés. Dans ce cas, si l’opération d’actualisation échoue avant que tous les datarecordsets du groupe soient actualisés, Visio annule l’actualisation de tous les datarecordsets qui se sont correctement terminés jusqu’à ce point.
Si vous appelez ensuite GetLastDataError, la méthode renvoie ce qui suit :
L'ID du jeu d'enregistrements de données pour lequel vous avez appelé la méthode Refresh pour lancer l'opération d'actualisation qui a échoué.
Le message d'erreur créé par l'opération d'actualisation qui a échoué, bien qu'il n'existe aucun moyen de savoir si l'échec a un rapport avec le jeu d'enregistrements de données dont vous avez transmis l'ID à la méthode GetLastDataError.
Exemple
La macro Microsoft Visual Basic pour Applications (VBA) suivante montre comment utiliser la méthode GetLastDataError pour récupérer le code d'erreur et la description ADO ainsi que l'ID du jeu d'enregistrements de données associé à la dernière erreur de données.
Public Sub GetLastDataError_Example()
Dim vsoDataRecordsets As Visio.DataRecordsets
Dim lngCode As Long
Dim strDescription As String
Dim lngID As Long
Set vsoDataRecordsets = Visio.ActiveDocument.DataRecordsets
vsoDataRecordsets.GetLastDataError lngCode, strDescription, lngID
Debug.Print "Error code: ", lngCode
Debug.Print "Error description: ", strDescription
Debug.Print "Data recordset ID: ", lngID
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.