SI PAS HDécritConnexion(ConnectModele, "login","motpasse","serveur","base",hAccèsNatifSQLServer) ALORS
Erreur(HErreurInfo())
FinProgramme()
FIN
SI PAS HOuvreConnexion(ConnectModele) ALORS
Erreur(HErreurInfo())
FinProgramme()
FIN
SI PAS HChangeConnexion(Organe,ConnectModele) ALORS
Erreur(HErreurInfo())
FinProgramme()
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=5911&post_id=23859