Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - yolman23

#1
Scripting / programar en .bat ayuda
7 Enero 2010, 07:31 AM
hola
alguin me podria orientar sobre un trabajo que estoy haciendo para U es programar en .bat. tengo casi todo echo pero eh llegado aun punto que se me cierra el progrma y n o me hace lo que yo quiero.

gracias por su atencion prestada y espero pronta respuesta..

aqui esta el codigo

@echo off
cls
color 40
echo.
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º         Bienvenidos Al Programa Para Legalizar Todos Los              º
echo    º                Programas De La Suite Adobe CS3                        º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo                        º                              º
echo                        º   !! Antes De Instalar: !!   º
echo                        º                              º
echo    ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo    º             Cerrar Cualquier Aplicacion De Adobe CS3                  º
echo    º       Ejecutar Esta Aplicacion Ejecutar Como Administrador            º
echo    ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
set /p usuario= ingrese su nombre de usuario
If %usuario%==admin (goto sistema) else (goto error)

:error
color 07
cls
echo Acceso Denegado
echo LO sentimos, Comuniquese con el Departamento Tecnico de
echo hay estaran Los Tecnico para Colaborarle
pause
exit

:sistema
color 1E
cls
echo ..::(Bienvenido al sistema)::..
echo.
:menu
cls
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º                        MENU                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 1           Activar   COREL                               º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 2           Activar   After Effects CS3                   º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 3           Actvar    Audition 3.0                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 4           Activar   Dreamweaver CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 5           Activar   Fireworks CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 6           Activar   Flash CS3                           º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
pause
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 7           Activar   Illustrator CS3                     º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 8           Actvar    InDesign CS3                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º 9           Activar   Photoshop CS3                       º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º A           Activar   Premiere Pro CS3                    º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º B           Activar   3ds Max 2010                        º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º C                Actvar    Todos                          º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
echo          ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo          º D                    SALIR                                º
echo          ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
[color=black]
DESDE AQUI TENGO EL ERROR Y NO SE QUE HACER POR AYUDEMEN[/color]

crack\otro\choice.exe /C:123456789ABCD /N "Pulse la tecla deseada: "
) ELSE (
choice /C 123456789ABCD /N /M "Pulse la tecla deseada: "
)
pause
echo.
IF ERRORLEVEL D GOTO :Salir
IF ERRORLEVEL C GOTO :Actvar    Todos
IF ERRORLEVEL B GOTO :Activar   3ds Max 2010
IF ERRORLEVEL A GOTO :Activar   Premiere Pro CS3
IF ERRORLEVEL 9 GOTO :Activar   Photoshop CS3
IF ERRORLEVEL 8 GOTO :Actvar    InDesign CS3
IF ERRORLEVEL 7 GOTO :Activar   Illustrator CS3
IF ERRORLEVEL 6 GOTO :Activar   Flash CS3
IF ERRORLEVEL 5 GOTO :Activar   Fireworks CS3
IF ERRORLEVEL 4 GOTO :Activar   Dreamweaver CS3
IF ERRORLEVEL 3 GOTO :Actvar    Audition 3.0
IF ERRORLEVEL 2 GOTO :Activar   After Effects CS3
IF ERRORLEVEL 1 GOTO :Activar   Corel
pause
echo.
:Activar   corel
copy "\\192.168.0.174\monito\crack" "c:\crack\CorelPP.dll"
copy "\\192.168.0.174\monito\crack" "c:\crack\CorelDrw.dll"
copy "\\192.168.0.174\monito\crack" "c:\crack\crlutl.dll"
copy "c:\crack\CorelPP.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelPP.dll"
copy "c:\crack\crlutl.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\crlutl.dll"
copy "c:\crack\CorelDrw.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelDrw.dll"
echo se copiaron satifactoriamente los archivo
del "c:\crack\*.*
rd "c:\crack
echo.
goto :menu
:Activar   After Effects CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\AfterFX.dll"
copy "c:\crack\AfterFX.dll" "C:\Archivos de programa\Adobe\Adobe After Effects CS3\Support Files\AfterFX.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    Audition 3.0
copy "\\192.168.0.174\monito\crack" "c:\crack\Audition.exe"
copy "c:\crack\Audition.exe" "C:\Archivos de programa\Adobe\Adobe Audition 3.0\Audition.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Dreamweaver CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Dreamweaver.exe"
copy "c:\crack\Dreamweaver.exe" "C:\Archivos de programa\Adobe\Adobe Dreamweaver CS3\Dreamweaver.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Fireworks CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Fireworks.exe"
copy "c:\crack\Fireworks.exe" "C:\Archivos de programa\Adobe\Adobe Fireworks CS3\Fireworks.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Flash CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Flash.exe"  
copy "c:\crack\Flash.exe" "C:\Archivos de programa\Adobe\Adobe Flash CS3\Flash.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Illustrator CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Illustrator.exe"  
copy "c:\crack\Illustrator.exe" "C:\Archivos de programa\Adobe\Adobe Illustrator CS3\Support Files\Contents\Windows

\Illustrator.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    InDesign CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Public.dll"  
copy "c:\crack\Public.dll" "C:\Archivos de programa\Adobe\Adobe InDesign CS3\Public.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Photoshop CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Photoshop.exe"  
copy "c:\crack\Photoshop.exe" "C:\Archivos de programa\Adobe\Adobe Photoshop CS3\Photoshop.exe"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   Premiere Pro CS3
copy "\\192.168.0.174\monito\crack" "c:\crack\Premiere.dll"
copy "c:\crack\Premiere.dll" "C:\Archivos de programa\Adobe\Adobe Premiere Pro CS3\Premiere.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Activar   3ds Max 2010
copy "\\192.168.0.174\monito\crack" "c:\crack\adlmint.dll"
copy "c:\crack\adlmint.dll" "C:\Archivos de programa\Autodesk\3ds Max 2010\adlmint.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Actvar    Todos
xcopy "\\192.168.0.174\monito\crack" "c:\crack"
copy "c:\crack\CorelPP.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelPP.dll"
copy "c:\crack\crlutl.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\crlutl.dll"
copy "c:\crack\CorelDrw.dll" "C:\Archivos de programa\Corel\CorelDRAW Graphics Suite X4\Programs\CorelDrw.dll"
copy "c:\crack\AfterFX.dll" "C:\Archivos de programa\Adobe\Adobe After Effects CS3\Support Files\AfterFX.dll"
copy "c:\crack\Audition.exe" "C:\Archivos de programa\Adobe\Adobe Audition 3.0\Audition.exe"
copy "c:\crack\Dreamweaver.exe" "C:\Archivos de programa\Adobe\Adobe Dreamweaver CS3\Dreamweaver.exe"
copy "c:\crack\Fireworks.exe" "C:\Archivos de programa\Adobe\Adobe Fireworks CS3\Fireworks.exe"
copy "c:\crack\Flash.exe" "C:\Archivos de programa\Adobe\Adobe Flash CS3\Flash.exe"
copy "c:\crack\Illustrator.exe" "C:\Archivos de programa\Adobe\Adobe Illustrator CS3\Support Files\Contents\Windows

\Illustrator.exe"
copy "c:\crack\Public.dll" "C:\Archivos de programa\Adobe\Adobe InDesign CS3\Public.dll"
copy "c:\crack\Photoshop.exe" "C:\Archivos de programa\Adobe\Adobe Photoshop CS3\Photoshop.exe"
copy "c:\crack\Premiere.dll" "C:\Archivos de programa\Adobe\Adobe Premiere Pro CS3\Premiere.dll"
copy "c:\crack\adlmint.dll" "C:\Archivos de programa\Autodesk\3ds Max 2010\adlmint.dll"
del "c:\crack\*.*
rd "c:\crack
goto :menu
:Salir