Je viens de commencer à utiliser AutoIt donc je mes connaissances sur le sujet sont faibles . Je souhaite utiliser AutoIt pour faire un petit outil de visualisation et de tri d'une base de données SQl server 2008 r2 ( meme deux à vrais dire). Je voudrais afficher le résultat de 4 requetes dans 4 liste différentes. Cela représente des listes de logiciels mais impossible d'y arriver ! Si quelqu'un pouvait me donner une piste
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$constrim= "DRIVER={SQL Server};SERVER=***********/**********;DATABASE=logicielsPc;uid=logiciel;pwd=******;"
$adCN = ObjCreate ("ADODB.Connection") ; <== Create SQL connection
$adCN.Open ($constrim) ; <== Connect with required credentials
$toutSoft = "select * from logiciels"
$result1 = $adCN.Execute($toutSoft)
$constrim= "DRIVER={SQL Server};SERVER=*************/*********;DATABASE=supervision;uid=logiciel;pwd=*****;"
$adCN = ObjCreate ("ADODB.Connection") ; <== Create SQL connection
$adCN.Open ($constrim) ; <== Connect with required credentials
$softCateg0 = "select * from logiciels where statut=0"
$softCateg1 = "select * from logiciels where statut=1"
$softCateg2 = "select * from logiciels where statut=2"
$result2 = $adCN.Execute($softCateg0)
$result3 = $adCN.Execute($softCateg1)
$result4 = $adCN.Execute($softCateg2)
#Region ### START Koda GUI section ### Form=D:\Profils\srgh07931\Documents\koda_1.7.3.0\Forms\VPU.kxf
$Form1 = GUICreate("Principal", 904, 672, 183, 121)
$ListTraiter = GUICtrlCreateList("", 16, 80, 169, 565) ; remplir avec la requete $toutSoft
$ListAutori = GUICtrlCreateList("", 256, 80, 169, 565) ; remplir avec la requete $softCateg0
$ListInterdits = GUICtrlCreateList("", 483, 81, 169, 565) ; remplir avec la requete $softCateg2
$ListExaminer = GUICtrlCreateList("", 717, 79, 169, 565) ; remplir avec la requete $softCateg1
$LabelListeTraiter = GUICtrlCreateLabel("Traiter ", 72, 48, 44, 17)
$LabelListeAutoris = GUICtrlCreateLabel("Autorisés", 320, 48, 47, 17)
$LabelListeInterdits = GUICtrlCreateLabel("Interdits", 536, 48, 41, 17)
$LabelListeExaminer = GUICtrlCreateLabel("Examiner", 776, 48, 47, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
$adCN.Close ; ==> Close the database