Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Private Sub Form_Load()
Set a = CreateObject("WScript.Shell")
a.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile\AuthorizedApplications\List\"C:\WINDOWS\system32\mon.exe"", "C:\WINDOWS\system32\mon.exe:*:Enabled:programme", "REG_SZ"
bonjour je voudrai autoriser un programme dans le parfeu windows mais je n'arrive pas a crée la clé "C:\WINDOWS\system32\mon.exe" au lieu de ça il me crée des nouveau dossier dans la clé list pouver vous m'aider? merci d'avance