arcker Posted July 3, 2006 Share Posted July 3, 2006 (edited) Ok, i work during holidays in my firm, and i'm incharge of deploying the new deployment system for the new PCs we use WinPE a guy have strated the script in batch, but i want to do everything as possible in autoit, not just a "gui" for those batch, to have a more monitored installation so my question is, do you have some scripts and some advice to propose to me ? for auto-installation of course, and more thanx again ^^ Edited July 3, 2006 by arcker -- Arck System _ Soon -- Ideas make everything "La critique est facile, l'art est difficile" Projects :[list] [*]Au3Service : Run your exe as service V3 / Updated 29/07/2013 Get it Here [/list] Link to comment Share on other sites More sharing options...
AzKay Posted July 3, 2006 Share Posted July 3, 2006 I think, theres some auto-installers in scripts and scraps # MY LOVE FOR YOU... IS LIKE A TRUCK- # Link to comment Share on other sites More sharing options...
Briegel Posted July 4, 2006 Share Posted July 4, 2006 At first begin to translate batch -> AutoIt. Tell us what and how do you want to do. Post your code if you have problems or want somebody to optimize your code. Link to comment Share on other sites More sharing options...
arcker Posted July 4, 2006 Author Share Posted July 4, 2006 (edited) ok, i've begun i've four steps : make usb key make ISO make WinPE image add NDIS driver (ethernet driver) here my first base expandcollapse popup#include <GuiConstants.au3> #Include <GuiCombo.au3> global $lettre GUICreate("Creer ISO",500,200) $exec=GUICtrlCreateButton("créer",10,120,100,20) guictrlcreatelabel("Version WinPE",150,122,80,20) guictrlcreatelabel("Version master",150,152,80,20) $chemin=GUICtrlCreateLabel("chemin",10,80,150,20) $labelversionwinpe=GUICtrlCreateInput("1.6",250,120,40,20) $labelversionmaster=GUICtrlCreateInput("0.3",250,150,40,20) $tab=GUICtrlCreateTab(5,10,490,100) $makeimg=guictrlcreatetabitem("Creer clé bootable") $combo=GUICtrlCreateCombo("",20,40,50,20) $nom=guictrlcreatelabel("nom",70,40,80,20) $liste=DriveGetDrive("removable") $makeiso=GUICtrlCreateTabItem("Creer ISO") $makewinpe=GUICtrlCreateTabItem("Creer image WinPE") $adddriver=GUICtrlCreateTabItem("Ajouter un pilote") if @error then msgbox(0,"Non détecté","Aucune clé détectée") Exit EndIf for $i=1 to $liste[0] _GUICtrlComboAddString($combo,$liste[$i]) Next _detectpdq() GUISetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop case $msg = $combo guictrlsetdata($nom,DriveGetLabel(guictrlread($combo))) case $msg = $exec select case guictrlread($tab) = 1 ;créer clé usb bootable $versionmaster=guictrlread($labelversionmaster) $versionwinpe=GUICtrlRead($labelversionwinpe) runwait("makeUFD.cmd " & guictrlread($combo) & " "& $lettre,@ScriptDir) ;MsgBox(0,"","makeUFD.cmd " & guictrlread($combo) & " "& $lettre,@ScriptDir) case guictrlread($tab) = 2 ; créer ISO case guictrlread($tab) = 3 ; créer image WinPE case guictrlread($tab) = 4 ; ajouter un pilote EndSelect EndSelect WEnd Exit func _detectpdq() $trouve=0 $listenet=DriveGetDrive("network") if not @error then for $i=1 to $listenet[0] ;msgbox(0,"",driveMapGet($listenet[$i])) if stringinstr(DriveMapGet($listenet[$i]),"pdq$") <> 0 then ;msgbox(0,"","trouve") $trouve=1 $lettre=$listenet[$i] ExitLoop EndIf Next EndIf if $trouve=0 Then $lettre=drivemapadd("*","\\a_path") EndIf GUICtrlSetData($chemin,$lettre & " - " & driveMapGet($lettre) ) EndFunc Edited July 4, 2006 by arcker -- Arck System _ Soon -- Ideas make everything "La critique est facile, l'art est difficile" Projects :[list] [*]Au3Service : Run your exe as service V3 / Updated 29/07/2013 Get it Here [/list] Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now