Re hello,
Désolé, j'aurais du dans le post précédent, mes excuses...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 // Connexion à la BDD TypeBase = "hOledbAccess2007" NomSource = "G:\GEst_Loyer\Database\Gest_loyer.accdb" NumConnexion = SQLConnecte(NomSource, NomUtilisateur, PasseUtilisateur,"",hOledbAccess2007) // Vérification de la connexion SI NumConnexion <> 0 ALORS Info("Connexion OK") SINON // pour avoir toute l'erreur... Erreur("pas de connexion à la source de données ", herreurinfo() ) FIN
Partager