regarde l'avant dernière ligne. visiblement, tu lances rundll32.exe avec en param mouse,disable et c'est bonRundll32.exe user,exitwindows Quitte Windows
Rundll32.exe user,wnetconnectdialog Active la boîte de dialogue "se connecter à un lecteur réseau"
Rundll32.exe user,wnetdisconnectdialog Active la boîte de dialogue "se déconnecter à un lecteur réseau"
Rundll32.exe user,disableoemlayer Arrête le PC
Rundll32.exe user,repaintscreen Actualise l'affichage (comme F5)
Rundll32.exe user,setcursorpos Place le curseur en haut à gauche
Rundll32.exe Diskcopy,DiskCopyRunDll Active la boîte de dialogue "Copie d'une disquette"
Rundll32.exe rnaui.dll,RnaWizard /1 Active la boîte de dialogue "connexion au réseau"
Rundll32.exe shell,shellexecute Ouvre l'explorateur
Rundll32.exe shell32,OpenAs_RunDLL Active la boîte de dialogue "ouvrir avec"
Rundll32.exe shell32.dll,SHFormatDrive Active la boîte de dialogue "formater la disquette"
Rundll32.exe shell32.dll,ShellAboutA Affiche des informations sur la version de Windows
Rundll32.exe shell32,SHExitWindowsEx 0 Redémarre Windows 98
Rundll32.exe shell32,SHExitWindowsEx 1 Quitte Windows 98
Rundll32.exe shell32,SHExitWindowsEx 2 Démarre Windows 98
Rundll32.exe shell32,SHExitWindowsEx -1 Redémarre l'explorateur de Windows 98
Rundll32.exe shell32.dll,Control_RunDLL Ouvre le panneau de configuration
Rundll32 keyboard,disable Désactive le clavier
Rundll32 mouse,disable Désactive la souris
Rundll32 krn 1386.exe,exitkernel Quitte Windows sans demander d'enregistrer les documents actifs
Code : Tout sélectionner
; Auteur : Le Soldat Inconnu
; Version de PB : 3.90
;
; Explication du programme :
; Mettre une fenêtre en plein écran (la barre des tâches n'est plus visible)
If OpenWindow(1 ,0, 0, 300, 300, #PB_Window_Invisible, "Plein écran") ; fenêtre mère invisible
If OpenWindow(0, 0, 0, 300, 300, #PB_Window_BorderLess, "Plein écran", WindowID(1)) ; Fenêtre fille de la fenêtre invisible, ça me permet de masquer la fenêtre dans la barre des tâches
ShowWindow_(WindowID(), #SW_MAXIMIZE) ; Met la fenêtre en plein écran
SetWindowPos_(WindowID(), -1, 0, 0, 0, 0, #SWP_NOSIZE | #SWP_NOMOVE) ; Pour mettre la fenêtre toujours au premier plan
If OpenLibrary(0, "user32.dll") ; On rend la fenêtre la plus transparente possible
SetWindowLong_(WindowID(), #GWL_EXSTYLE, GetWindowLong_(WindowID(), #GWL_EXSTYLE) | $00080000)
CallFunction(0, "SetLayeredWindowAttributes", WindowID(), 0, 1, 2)
CloseLibrary(0)
EndIf
Repeat
Event = WaitWindowEvent()
Until Event = #WM_CLOSE
EndIf
EndIfCode : Tout sélectionner
BlockInput
--------------------------------------------------------------------------------
Disable/enable the mouse and keyboard.
BlockInput ( flag )
Parameters
flag 1 = Disable user input
0 = Enable user input
Return Value
None.
Remarks
If BlockInput is enabled, the Alt keypress cannot be sent!
The table below shows how BlockInput behavior depends on Windows' version; however, pressing Ctrl+Alt+Del on any platform will re-enable input due to a Windows API feature.
Operating System "BlockInput" Results
Windows 95 No effect.
Windows 98/Me User input is blocked but AutoIt is also unable to simulate input.
Windows NT 4 (Without ServicePack 6) No effect.
Windows NT 4 (With ServicePack 6) User input is blocked and AutoIt can simulate most input.
Windows 2000/XP User input is blocked and AutoIt can simulate most input.
Note that functions such as WinMove() will still work on Windows 98/Me when BlockInput is enabled.
Related
Send
Example
If @OSVersion <> "WIN_98" And @OSVersion <> "WIN_ME" Then
BlockInput(1)
EndIf
Run("notepad")
WinWaitActive("Untitled - Notepad")
Send("{F5}") ;pastes time and date
BlockInput(0)
Code : Tout sélectionner
; Auteur : Le Soldat Inconnu
; Version de PB : 3.90
;
; Explication du programme :
; Mettre une fenêtre en plein écran (la barre des tâches n'est plus visible)
WinID = GetForegroundWindow_() ; On récupère la fenêtre en cours d'utilisation
If OpenWindow(1 ,0, 0, 300, 300, #PB_Window_Invisible, "Plein écran") ; fenêtre mère invisible
If OpenWindow(0, 0, 0, 300, 300, #PB_Window_BorderLess, "Plein écran", WindowID(1)) ; Fenêtre fille de la fenêtre invisible, ça me permet de masquer la fenêtre dans la barre des tâches
ShowWindow_(WindowID(), #SW_MAXIMIZE) ; Met la fenêtre en plein écran
SetWindowPos_(WindowID(), -1, 0, 0, 0, 0, #SWP_NOSIZE | #SWP_NOMOVE) ; Pour mettre la fenêtre toujours au premier plan
If OpenLibrary(0, "user32.dll") ; On rend la fenêtre la plus transparente possible
SetWindowLong_(WindowID(), #GWL_EXSTYLE, GetWindowLong_(WindowID(), #GWL_EXSTYLE) | $00080000)
CallFunction(0, "SetLayeredWindowAttributes", WindowID(), 0, 1, 2)
CloseLibrary(0)
EndIf
; On remet la fen utilisé active
SetForegroundWindow_(WinID)
Repeat
Event = WaitWindowEvent()
Until Event = #WM_CLOSE
EndIf
EndIf