Re: Connexion SQL Server 2000 & WinDev 11 |
Sujet: Re: Connexion SQL Server 2000 & WinDev 11 par pitou sur 9/1/2009 9:45:43 ok, // a) tu déclares une connection : cnxConnexSQLServer est une Connexion cnxConnexSQLServer..Utilisateur="ton_utilisateur" cnxConnexSQLServer..Motdepasse="ton_mot_de_passe" cnxConnexSQLServer..Serveur="SRVDC" cnxConnexSQLServer..Accès=hOlectureEcriture cnxConnexSQLServer..Dasededonnées="BASETEST" cnxConnexSQLServer..Provider=hOLEDBSQlServer // b) tu te connectes (pas de " devant et // derriere cnxConnexSQLServer SI HOuvreConnexion(cnxConnexSQLServer) = Faux ALORS Erreur("Connexion impossible : " + HErreurInfo()) RETOUR FIN // c) tu change la connexion des fichiers // et tu ouvres le fichier hChangeConnexion("*",cnxConnexSQLServer) houvre(F_ARTICLE) //d) Initialisation de la requête ReqArticle SI HExécuteRequêteSQL(ReqArticle,"SELECT AR_Ref FROM F_ARTICLE") = Faux ALORS Erreur("Erreur d'initialisation de la requête"+RC+HErreurInfo()) RETOUR FIN // e) parcours des données // tu travailles maintenant sur ReqArticle // et non plus sur le fichier F_ARTICLE HLitRecherchePremier(ReqArticle,"AR_Ref","3C16593") TANTQUE HTrouve(F_ReqArticle) = Vrai // Insérez votre traitement ici ListeAjoute(COMBO_Combo1,"tata") HLitSuivant(ReqArticle,"") FIN // f) fermeture fichier et connexion hferme(F_ARTICLE) hferme(cnxConnexSQLServer) |