Advanced Search

Return to Snippet

Revision: 68216
at December 12, 2014 20:40 by jicey
Initial Code 
sRemplcement est une chaîne
sdReqSel est une Source de Données
sReqSel est une chaîne = "SELECT COUNT(*) AS NB " + ...
                          "FROM ZPLATEFORMEENCOURS " + ...
                          "WHERE PEC_PLATEFORME = '{NumPlateforme}'"
										  
sReqSel = Remplace(sReqSel, "{NumPlateforme}", sRemplacement)

SI PAS HExécuteRequêteSQL(sdReqSel, ConnexionCegid, hRequêteSansCorrection, sReqSel) ALORS
    Erreur("Erreur lors de ...")
    Erreur(HErreurInfo())
    VersPressePapier(sReqSel)
SINON
    HLitPremier(sdReqSel)
	
    TANTQUE PAS HEnDehors(sdReqSel)

        HLitSuivant(sdReqSel)
    FIN
FIN

HFerme(sdReqSel)
Initial URL 

                                

                                                            

                                    

                                        

                                        Initial Description
                                        

                                    

                                    
Passage direct d'une requête via une source de données ODBC

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
WINDEV - Exécution direct de requête via ODBC

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
W-Language