VBS no tiene código de cifrado
dim pwd
pwd = inputbox("Ingrese una contraseña", "Ingrese una contraseña") Las dos comillas entre corchetes son el título y la forma del cuadro de diálogo emergente, que puede ser modificado.
si pwd = "*****" entonces '"*****" es la contraseña
msgbox "right" 'Modifícala tú mismo
else
msgbox "incorrecto" 'Modifíquelo usted mismo
end if
Este script usa IF para juzgar y la contraseña debe establecerse en el script.
El cuadro de diálogo puede aumentar el número de cuadros de mensajes según sea necesario
.