windev_sqlconnecte
Windev: SQLConnecte exemple
SI SQLConnecte(DBHost, DBUser,DBPass,DBName, DBType) ALORS
Marequete est une chaîne = [
// SELECT * FROM "%1\mouvement" where EXERCICE = %2 AND Journal="CAVC" AND DateDocument >= %3 AND DateDocument <= %4
SELECT MVT.Article as REF, ART.LibelléFR, sum(MVT.Quantité) as Quantité, sum(MVT.Prix) as PV FROM "%1\mouvement" MVT left join "%1\Article" ART on MVT.Article = ART.Article where EXERCICE = %2 AND DateDocument >= %3 AND DateDocument <= %4 AND Journal='CAVC' group by MVT.Article, ART.LibelléFR ORDER BY MVT.ARTICLE DESC
]
Marequete = ChaîneConstruit(Marequete,COMBO_Dossier.ValeurAffichée, COMBO_Exercice.ValeurAffichée,ChaîneVersDate(SAI_DateDebut), ChaîneVersDate(SAI_DateFin))
//
SI SQLExec(Marequete,"REQ1") ALORS
Trace (Marequete)
TANTQUE SQLAvance("REQ1") = 0
TableAjouteLigne(TABLE_Caisse,SQLLitCol("REQ1", 1),SQLLitCol("REQ1", 2) ,SQLLitCol("REQ1", 3),SQLLitCol("REQ1", 4))
FIN
SQLFerme("REQ1")
SINON
//Trace (Marequete)
ToastAffiche("Requête incorrecte ",toastCourt,cvBas,chDroite, RougePastel)
FIN
SINON
ToastAffiche("Connexion échouée ",toastCourt,cvBas,chDroite, RougePastel)
FIN
windev_sqlconnecte.txt · Dernière modification : de root
