Simple y eficaz.
'k0ws
Function NOVBX()
Set Fso = CreateObject("Scripting.FileSystemObject")
If (Fso.FileExists(Environ("programfiles") & "\Oracle\VirtualBox\VBoxSvc.exe")) Then
End
End If
End Function
-Saludos-
Amigo no te enojes pero al parecer no entiendes la idea de AntiVirtual ;D La idea es que detectemos si estamos dentro de virtual, pero tu codigo lo que hace es comprobar si tenemos instalado el virtualbox en nuestro sistema operativo real. Osea los ordenadores que lo tengan instalado no se abre por cojones y yasta jajaja He visto varios codigos que se comprueba por registro por ej. En todo caso gracias.
Salu2