App.Path

Bonjour. Actuellement mon appli se connecte avec une Bdd Access. Je suis débutant et ai mis le chemin de la connexion en dur ! (Ce qu'il ne faut pas faire !) Voici un exemple :

Function connexion()

    On Error GoTo ErreurOpen

    strCnxn = "Provider=Microsoft.Jet.OLEDB.4.0;strPath= C:\Program Files\Tennis\Tennis.Mdb"
    Set gConnexion = New ADODB.Connection
    gConnexion.Open strCnxn

    Exit Function
   
ErreurOpen:
   
    Screen.MousePointer = vbArrow
   
    MsgBox "Problème d'accès aux données." & Error, vbCritical
   
    End
  
End Function

Comment puis je faire pour que mon programme se connecte à la base de données sur un autre lecteur que C:\
Je débute et n'ai pas tout compris au sujet de App.Path
Je vous remercie.

App.path te renvoie le dossier ou se trouve ton exécutable.

Si ta base se trouve dans le même dossier (ou dans un sous dossier) que l'exécutable, tu peux alors utiliser App.Path sinon il faudra que tu indique le chemin d'une autre manière.


---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #    [ Lien ]

Je vous remercie pour cette réponse rapide. La connexion s'établie très bien mais un problème apparait lorsque je veux effectuer un enregistrement d'un joueur par exemple.

Rectification ! Une erreur de ma part, cela fonctionne bien.
Merci à tous.