Tip: configurer une connection ado

Commenter

Contenu du snippet

Travaillant beaucoup avec des DB, j'ai tendance a souvent faire un écran pour configurer une connection ADO. Il y a peu, j'ai trouvé l'écran standard de Microsoft. C'est assez intérressant.

Source / Exemple : 


1. Lancer VB et créer un projet standard
2. Dans le Menu Project/References, Ajouter 
   - Microsoft ActiveX Data Objects 2.x Library (msado??.tlb)
   - Microsoft OLE DB Service Component 1.0 Type Library (oledb32.dll)
3. Dans le code de l'écran, déclarez l'objet connection:
   Option Explicit
   Dim CN As New ADODB.Connection
   Dim DL as New DataLinks
4. Ajouter un bouton de commande et mettez ce code dans l'événement Click:
   if CN.State=adStateOpen then cn.Close
   DL.hWnd=Me.hWnd
   DL.PromptEdit CN

Conclusion :


Vous trouverez 2 méthodes dans DataLinks:
- PrompEdit: modifie la connectionstring d'une connection existante
- PromptNew: renvoit un object connection (ou nothing si l'utilisateur clique sur cancel)

a noter aussi que:
- pour éditer la connectionstring, la connection doit être fermée.
- vous pouvez remplir quelques informations de la connectionstring et ensuite appeler promptedit pour la compléter.

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_FlyKiller)