Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Agenda en Batch by M_BuRNeD

  • 1 Respuestas
  • 1687 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5450
  • Actividad:
    13.33%
  • Reputación 33
  • ANTRAX
    • Ver Perfil
    • Underc0de
    • Email
  • Skype: underc0de.org
  • Twitter: @Underc0de
« en: Julio 18, 2011, 08:41:30 pm »
Código: DOS
  1. @echo off
  2. color 70
  3. title Registro_batch by M_BuRNeD
  4. cls
  5. echo                     *********************************
  6. echo                     * Programa de registro en Batch *
  7. echo                     *     By M_BuRNeD               *
  8. echo                     *********************************                              
  9.  
  10. :0
  11. cls          
  12. echo   ...Elija una opcion
  13. echo     1- Ver la ultima entrada a    Â¤adida
  14. echo     2- Consultar una entrada
  15. echo     3- Añadir entradas al registro
  16. echo     4- Borrar dato del registro
  17. echo     5- Borrar clave del registro
  18. echo     6- Comparar claves
  19. echo     7- Bloquea el registro
  20. echo     8- Desbloquea el registro
  21. echo     9- Salir del programa
  22.  
  23.  
  24. Set /p var= Elija una opcion (1,2,3,4,...)
  25.  
  26. IF %var%== goto 0
  27. IF %var%==1 goto Ver else Next
  28. IF %var%==2 goto Cons else Next
  29. IF %var%==3 goto An else Next
  30. IF %var%==4 goto Del else Next
  31. IF %var%==5 goto Dele else Next
  32. IF %var%==6 goto Comp else Next
  33. IF %var%==7 goto Blk else Next
  34. IF %var%==8 goto Dblk else Next
  35. IF %var%==9 goto Exi else Next
  36.  
  37. :Ver
  38. echo   La ultima clave registrada es:
  39. reg Query HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Applets\Regedit /v LastKey
  40.  
  41. :Cons
  42. cls
  43. echo   Puedes visualizar el contenido de la subclave que quieras.Ej:
  44. echo   Ruta : HKEY_CURRENT_USER\Software\Microsoft\Telnet
  45. echo   Subclave : MODE
  46. set /p reg= Ruta regedit:
  47. Set /p rig= Subclave :
  48. reg Query %reg% /v %rig%
  49.    echo Error en los datos
  50.    Pause > nul
  51.    goto :Cons
  52.    )
  53.  
  54. :An
  55. cls
  56. echo   Puedes a    Â¤adir la clave que quieras
  57. Set /p rut= Ruta regedit:
  58. Set /p nom= Nombre de la subclave:
  59. Set /p tip= Tipo de subclave:
  60. Set /p dat= Datos a asignar:
  61. reg add %rut% /v %nom% /t %tip% /d %dat% /f
  62.    echo Error en los datos
  63.    Pause > nul
  64.    goto An
  65.    )
  66.  
  67. cls
  68. echo   Aqui puedes borrar los datos sueltos que consideres innecesarios.
  69. echo   Borrad solo si sabeis lo que va a pasar.No pide confirmacion
  70. set /p pat= Ruta regedit:
  71. set /p num= Nombre del dato:
  72. reg delete %pat% /v %num% /f
  73.    echo Error en los datos
  74.    Pause > nul
  75.    goto Del
  76.    )
  77.  
  78. :Dele
  79. cls
  80. echo   Aqui puedes borrar claves enteras del registro de windows
  81. set /p zon= Ruta de la clave que quieres borrar
  82. reg delete &zon% /f
  83.    echo Error en los datos
  84.    Pause > nul
  85.    goto Dele
  86.    )
  87.  
  88. :Comp
  89. cls
  90. echo Compara dos claves de registro elegidas por usted
  91. set /p cmp= Primera clave:
  92. set /p com= Segunda clave:
  93. reg compare %cmp% %com%
  94.  
  95.  
  96. :Blk
  97. cls
  98. echo  Esta es la ultima opcion.Con esto puedes bloquear el registro para
  99. echo  que nadie pueda "entrar" a verlo
  100. Set Path=HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System
  101. Set Value=1
  102. Set Tipo=REG_DWORD
  103. reg add %Path% /v DisableRegistryTools /t %Tipo% d/ %Value% /f
  104.    echo Error
  105.    Pause > nul
  106.    goto 0
  107.    )
  108. echo Registro bloqueado...
  109.  
  110. :Dblk
  111. cls
  112. echo  Por si a alguien se le ocurre bloquearlo pensara...    Â¨y c    Â¢mo lo desbloqueo?
  113. echo  asi:
  114. Set Dblk=HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System
  115. Reg del %Dblk% /v DisableRegistryTools /f
  116. Reg add %Dblk% /v DisableRegistryTools /t REG_DWORD d/ 0 /f
  117.    echo Error al desbloquar
  118.    Pause > nul
  119.    goto 0
  120.    )
  121.  
  122. :Exi
  123. cls
  124. echo                     Gracias por probar el programa
  125. echo                              M_BuRNeD


Desconectado JaAViEr

  • *
  • Underc0der
  • Mensajes: 163
  • Actividad:
    0%
  • Reputación 0
  • http://codigo.ga
    • Ver Perfil
    • Blog de Programación :: Python
« Respuesta #1 en: Julio 18, 2011, 08:51:00 pm »
Hola, Buen Día.

Es un code trabajado, frente a un IF para detectar
opciones, siempre es bueno utilizar :
Código: DOS
  1. if not defined opcion
  2.  
Teniendo en cuenta que opcion es el set/p de la Opción ;D

Saludos.

 

¿Te gustó el post? COMPARTILO!



""MSN"" en batch

Iniciado por Elle Lawliet

Respuestas: 6
Vistas: 2624
Último mensaje Julio 18, 2011, 01:35:47 am
por JaAViEr
[Código-Batch] Consola de Comandos Versión Arcoiris - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 1638
Último mensaje Julio 17, 2011, 05:29:39 am
por JaAViEr
[Código-Batch] Usuarios del PC & Procesos Ejecución - WMIC - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 1383
Último mensaje Julio 17, 2011, 05:21:18 am
por JaAViEr
Detecta Autorun.Inf + Eliminación de Archivo Infectado - JaAViEr - Batch

Iniciado por JaAViEr

Respuestas: 4
Vistas: 2371
Último mensaje Julio 18, 2011, 06:36:47 pm
por LucaSthefano
[BATCH] Binder de archivos con Copy /b (tool esteganografia)

Iniciado por 79137913

Respuestas: 1
Vistas: 2920
Último mensaje Mayo 28, 2018, 04:09:26 pm
por Aincrad