[Ex] Contrôle Ordinateur

[Verification]

Voici mon tout premier programme crée en AutoIt. Vous me direz ce que vous en pensez :p


Modifier les lettres des disques

Code : Tout sélectionner

#include <GUIConstants.au3>


$Form1 = GUICreate("Contrôle Ordinateur", 287, 120, 193, 125)
$Button1 = GUICtrlCreateButton("Ouvrire CD", 8, 8, 129, 17, 0)
$Button2 = GUICtrlCreateButton("Fermer CD", 8, 32, 129, 17, 0)
$Button3 = GUICtrlCreateButton("Ouvrire C:", 8, 72, 129, 17, 0)
$Button4 = GUICtrlCreateButton("Ouvrire D:", 8, 96, 129, 17, 0)
$Button5 = GUICtrlCreateButton("Arret PC", 150, 8, 129, 17, 0)
$Button6 = GUICtrlCreateButton("Redémarer PC", 150, 32, 129, 17, 0)
$Button7 = GUICtrlCreateButton("Ouvrir Clé", 150, 72, 129, 17, 0)
$Button8 = GUICtrlCreateButton("Ouvrir Disque Externe", 150, 96, 129, 17, 0)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Button1
CDTray("F:", "open")
Case $Button2
CDTray("F:", "close")
Case $Button3
ShellExecute("C:")
Case $Button4
ShellExecute("D:")
Case $Button5
Shutdown (5)
Case $Button6
Shutdown (6)
Case $Button7
ShellExecute("E:")
Case $Button8
ShellExecute("H:")
Case $GUI_EVENT_CLOSE
Exit

EndSwitch
WEnd

Screen :




Comment l'améliorer ?

[sylvanie]

Bonjour,
déjà on peut l'améliorer en utilisant la balise spoiler ; ça c'est le côté modo qui remonte

revenons au script

on peut lancer une énumération des disques via DriveGetDrive ( "type" ), comme ça votre script est dynamiquement adapté à chaque machine.

Toujous grâce à cette fonction, ou encore avec DriveGetType si vous vous intéressez à un lecteur particulier, vous pourrez construire la liste des lecteurs de type "CDROM" pour exécuter l'ouverture mécanique, une liste de type "REMOVALBLE" pour les disques externes, etc.

Après le plus dur sera de faire des boucles de construction des contrôles (boutons, labels, ...) pour qu'ils se positionnent harmonieusement dans la fenêtre.

Bonne continuation

[Verification]

Merci Je vais voir pour l'améliorer Ce n'est que mon premier script hein x)

[Jerome]

Coucou,


Il y a ceci qui pourrait vous donnez quelques pistes et des idées pour votre scripts.



Jérôme

[timmalos]

Il y a egalement ceci qui peut t'aider, onglet Disque.