elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Introducción a Git (Primera Parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [Ayuda] Bat a Vbs
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [Ayuda] Bat a Vbs  (Leído 3,005 veces)
sabeeee

Desconectado Desconectado

Mensajes: 155


Ver Perfil
[Ayuda] Bat a Vbs
« en: 30 Mayo 2011, 20:56 pm »

El otro día estaba aburrido en el ciber y empece a buscar boludeces bat y todo eso y se me ocurrio automatizar este codigo
Código:
copy /b imagen.jpg + archivo.zip zipcamuflado.jpg
supongo que ya lo conocen y me salio esto
Código:
@echo off
color 90
set /p img=Ingrese el nombre de la imagen Jpg, Gif, Png etc... (Incluyendo extensión):

set /p imgzip=Ingrese el nombre del Rar o el 7z o Zip (Incluyendo extensión):

set /p usrb=Ingrese el nombre que le quiere dar al archivo fusionado (Incluyendo extensión):
echo Presione cualquier tecla para iniciar el proceso...
pause >nul
cls
copy /b %img% + %zip% %imgzip%
echo Proceso de fusion completado.
echo Presione una tecla para finalizar...
pause >nul
pero ahora quiero darle un toque mas estético echo en un código vbs osea que el programa te pregunte examine su imagen y que después te pregunte el nombre del zip y que le pongas guardar y todo eso o algo mas sencillo pero que valga la pena usarlo
Gracias!


En línea

"Vengándose, uno iguala a su enemigo; perdonando, uno se muestra superior a él."
Francis Bacon
SuperDraco


Desconectado Desconectado

Mensajes: 2.505


Crew Dragon


Ver Perfil
Re: [Ayuda] Bat a Vbs
« Respuesta #1 en: 30 Mayo 2011, 22:19 pm »

Primero de nada, dejame corregirte esta línea del código, porque sino un día te llevarás un chasco:
Código:
copy /b "%img%" + "%zip%" "%imgzip%"

Además te sugiero que añadas estas líneas en las dos primeras variables definibles:
Código:
:Inicio
set /p img=Ingrese el nombre de la imagen Jpg, Gif, Png etc... (Incluyendo extensión):
If not exist "%img%" (
echo No existe la imagen, porfavor escriba el nombre correctamente.
pause >nul
Goto :Inicio)





Y segundo, aquí encontrarás la mayor parte de información (Sino toda) que necesitas para crear ese código en vbs:

http://foro.elhacker.net/scripting/tutorial_vbscript-t229032.0.html




saludosss


« Última modificación: 30 Mayo 2011, 22:23 pm por pitoloko » En línea

No he vuelto, solo estoy de paso.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines