Vous êtes actuellement hors ligne, en attente de reconnexion à Internet.
Se connecter

Votre navigateur n’est pas pris en charge

Vous devez mettre à jour votre navigateur pour utiliser le site.

Mettre à jour vers la dernière version d’Internet Explorer

Comment faire pour utiliser ADO avec Visual Basic

IMPORTANT : Cet article est issu du système de traduction automatique mis au point par Microsoft (http://support.microsoft.com/gp/mtdetails). Un certain nombre d’articles obtenus par traduction automatique sont en effet mis à votre disposition en complément des articles traduits en langue française par des traducteurs professionnels. Cela vous permet d’avoir accès, dans votre propre langue, à l’ensemble des articles de la base de connaissances rédigés originellement en langue anglaise. Les articles traduits automatiquement ne sont pas toujours parfaits et peuvent comporter des erreurs de vocabulaire, de syntaxe ou de grammaire (probablement semblables aux erreurs que ferait une personne étrangère s’exprimant dans votre langue !). Néanmoins, mis à part ces imperfections, ces articles devraient suffire à vous orienter et à vous aider à résoudre votre problème. Microsoft s’efforce aussi continuellement de faire évoluer son système de traduction automatique.

La version anglaise de cet article est la suivante: 172403
Pour une Microsoft Visual Basic .NET version de cet article, reportez-vous 308656.
Résumé
Adovb.exe est un fichier compressé à extraction automatique contenant du code exemple qui montre comment utiliser ActiveX Data Objects (ADO) dans Visual Basic.
Plus d'informations
Le fichier suivant est disponible au téléchargement à partir du centre de téléchargement Microsoft :
Pour plus d'informations sur la façon de télécharger des fichiers de support technique Microsoft, cliquez sur le numéro ci-dessous pour afficher l'article correspondant dans la base de connaissances Microsoft :
119591Procédure pour obtenir des fichiers de support technique Microsoft auprès des services en ligne
Microsoft a analysé ce fichier pour les virus. Microsoft utilisé les logiciels de détection de virus les plus récentes ne sont associé à la date à laquelle le fichier a été validé. Le fichier est stocké sur des serveurs sécurisés, empêchant toute modification non autorisée du fichier.
NomFichierTailleDate
AdoDemo.mdb332 KO28/07/97
AdoVB18 KO5/08/97
AdoVB.vbp1 KO5/08/97
AdoVbEx6 KO28/07/97

Ce que démontre Adovb

Adovb illustre l'utilisation correcte de sortie et paramètres de retour (pour SQL Server) et d'ouvrir un jeu d'enregistrements paramétré pour les sources de données un Microsoft Access et SQL Server. Un modèle générique avec le code ADO de gestion des erreurs est également inclus :
   Private Sub cmdTemplate_Click()      Dim Conn1 As adodb.Connection      On Error GoTo VbError   ' Trap (non-ADO) error/exceptions      ' Create Connection Object (using early binding)      Set Conn1 = new ADODB.Connection      On Error GoTo AdoError  ' Trap any error/exception      Conn1.ConnectionString = AccessConnect      Conn1.Open      '----------------------      ' YOUR CODE GOES HERE!      '----------------------      ' Successful Shutdown      Conn1.Close   Done:      ' Miscellaneous (graceful) Cleanup      On Error Resume Next      Set Conn1 = Nothing      Exit Sub   ' ADO Error/Exception Handler   AdoError:      ' Save Error Information!      ErrNumber = Err.Number      ErrSource = Err.Source      ErrDescription = Err.Description      AdoErrorEx List1, Conn1   ' Non-ADO Native error/exception handler   VbError:      VbErrorEx List1, ErrNumber, ErrSource, ErrDescription      GoTo Done   End Sub				
NOTES :
  • Lorsque vous utilisez ADOVB avec ADO 2.0 ou version ultérieure, supprimez la référence à Microsoft OLE DB ActiveX Data Objects 1.0 et définir une référence à la dernière version de Microsoft ActiveX Data Objects disponibles.
  • Lors de l'utilisation de ADO 2.0 ou version ultérieure, faisant référence à la propriété OriginalValue d'un objet ADO Field génère l'erreur suivante, si le LockType de l'objet ADO Recordset est en lecture seule :
    Erreur d'exécution '3251': l'opération requise par l'application n'est pas pris en charge par le fournisseur.
    Pour éviter cette erreur dans ADOVB, mettez en commentaire ou supprimez la ligne suivante de code, dans la procédure événementielle Click pour cmdAccess dans la fenêtre de code pour frmADOVB :
    List1.AddItem vbTab & "OriginalValue= " & rs1.Fields(i).OriginalValue					
Références

À propos de la série d'exemples ADO *

Il s'agit de l'un des échantillons identiques plusieurs implémentées à l'aide de ADO dans divers produits, comme indiqué ci-dessous. L'avantage est que ces articles ont une interface/fonctionnalités identiques, illustre les similitudes et les différences dans l'utilisation d'ADO avec différentes langues / mécanismes :
172403FILE : Adovb.exe montre comment utiliser ADO avec Visual Basic
220152Exemple : ADOVC1 simple ADO / application VC ++
185033FILE : Adoacc.exe illustre l'utilisation de ADO avec Access 97
AdoVB

Avertissement : cet article a été traduit automatiquement

Propriétés

ID d'article : 172403 - Dernière mise à jour : 03/02/2005 19:22:30 - Révision : 3.4

  • Microsoft ActiveX Data Objects 1.5
  • Microsoft ActiveX Data Objects 2.0
  • Microsoft ActiveX Data Objects 2.1 Service Pack 2
  • Microsoft ActiveX Data Objects 2.5
  • Microsoft ActiveX Data Objects 2.6
  • Microsoft ActiveX Data Objects 2.7
  • Microsoft Visual Basic 5.0 Édition professionnelle
  • Microsoft Visual Basic 6.0 Édition professionnelle
  • kbmt kbdownload kbcode kbdatabase kbfile kbinfo kbsample kbstoredproc KB172403 KbMtfr
Commentaires
>>ow.location.protocol) + "//c.microsoft.com/ms.js'><\/script>");