RSS
Facebook
G+

Buscador de IntercambioSOS:


Retroceder   Foro de Ayuda IntercambiosvirtualeS > Soporte Sobre: Educación & Entretenimiento > Zona Académica > Programación

Respuesta
 
Herramientas Desplegado
Antiguo 21-nov-2015     #1
Pregunta Crear un archivo vbs que solicite contraseña

Hola amigos.

Por favor su ayuda para poder crear un archivo ( vbs ) que al ejecutar pida contraseña y si la ingresan mal se cierre y si está bien se ejecute un programa especifico.

Tengo el siguiente código pero el problema es que cuando ingresar una clave errónea no hace nada y me gustaría que aparezca una ventana con un mensaje diciendo código errado

Código:
clave=jhcorreo
msgbox("Bloqueo Correo Outlook")
clave=inputbox("Escribe el password")
if clave=jhcorreo then
msgbox("welcome")
else
x=msgbox("password correcto!!")
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "OUTLOOK.EXE"
end if
Gracias por su ayuda y correcciones.

Enviar un mensaje por MSN a bdjmarcelo Responder Citando
Usuarios que han agradecido este mensaje de bdjmarcelo
baduser (23-nov-2015)
Respuesta

Etiquetas
archivos .vbs, crear archivos, programacion, vbs


(0 miembros y 1 visitantes)
 
Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder mensajes
No puedes subir archivos adjuntos
No puedes editar tus mensajes

Los Códigos BB están Activado
Las Caritas están Activado
[IMG] está Activado
El Código HTML está Desactivado

Ir al Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
El Archivo HOSTS (Sin extensión) - [TUTORIAL] Eloy58 Internet, Redes & Network 52 Hace 1 Semana 10:46
Listado de todos los códigos de error generados por Windows Froyandres Sistemas Operativos 13 09-ene-2014 22:33
*.* Shepara v1.0 Ayuda para Internacionalizar tus Aplicaciones [Concurso 2011] nokiajavi Tutoriales & Videos Tutoriales 5 21-jul-2011 03:21
Manual fspassengers en español Corbet AudioLibros, Manuales, Libros & Revistas 4 30-mar-2011 23:57


Desarrollado por: vBulletin® Versión 3.8.1
Derechos de Autor ©2000 - 2017, Jelsoft Enterprises Ltd.
Ad Management by RedTyger