Forums Zebulon.fr: base de donnée sous vb6 - Forums Zebulon.fr

bonjours

Je voudrais savoir si on peut tester la connection à une base de donnée (Access 97) sous vb6.

Merci d'avance

Je suis pas sur de comprendre exactement ce que tu veux, mais si tu veux savoir si ton appli accède bien à la base (gérer le cas ou la base n'existe pas, par exemple), tu peux gerer ca avec une close "On Error Goto ..."

Au fait, tu utilises quoi comme API pour acceder à ta base ? ADO, DAO, autre ... ?

Un exmple de connexion à une base access (je sais plus si c'est une 97 par contre) en ADO :

Dim Cnx As ADODB.Connection

....

Private Sub BDOuvre(Cnx As ADODB.Connection)
    On Error GoTo ErrOuverture
    Set Cnx = New ADODB.Connection
    Cnx.Provider = "Microsoft.Jet.OLEDB.4.0"
    Cnx.Open App.Path & "\dvd.mdb", "admin", ""
    bBdOuverte = True
    
    Exit Sub
ErrOuverture:
    MsgBox "Erreur : " & Err.Description
    End
End Sub

Automne

Ce message a été modifié par automne - 08 mars 2003 - 08:37 .

j'utilise une connecton ADO
En faite je voudrais savoir quand je lance mon application si ma connection à ma base de donnée s'éffectue bien.
alors voudrais savoir s' il y a une fonction qui le gére ou sinon comment faire.
merci d'avance

Ok, ben tu fais comme dans le code que je t'ai mis. CAD que tu effectues la connexion aprés avoir mis une close "On Error Goto errOuverture". Comme ca, s'il y a une erreur à l'ouverture de la connexion, ton appli va à l'étiquette errOuverture que tu auras définie et execute ce que tu veux (comme mettre un message d'erreur)

Automne