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

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


  Mostrar Temas
Páginas: 1 2 [3]
21  Programación / Scripting / pulsaciones en batch en: 18 Febrero 2013, 23:15 pm
Buenas tardes a todos, ya hace bastante dias vengo estudiando la gran mayoria de los temas relacionado con batch sacando, viendo y formulando ideas para un pequeño prog.
La cuestion de este post es que no logro saber como hacer con batch o batch y VBScript para que en un determinado menu dentro del .bat al presionar la tecla Esc me vuelva al menu anterior a ese.
Esto ya hace tres dias que lo vengo viendo y no logro hacer nada. Le paso mi cod para que vean como viene la mano.

Código
  1. @echo off
  2.  
  3. title: FALTANTES DISCO     .:DANIEL RAMOS:.
  4.  
  5. setlocal enabledelayedexpansion
  6.  
  7. mode con cols=66
  8. mode con lines=20
  9. cls
  10.  
  11.  
  12. :Menu
  13. cls
  14. color 0F
  15.  
  16. echo  ****************************************************************
  17. echo  *  *           Obtener Lista Faltantes Actulizada                                          *  *
  18. echo  *  *                      Daniel Ramos                                                            *  *
  19. echo  *  ************************************************************
  20. echo  *                                                                                                    *
  21. echo  *  Opciones:                                                   *
  22. echo  *                                                              *
  23. echo  *                                                              *
  24. echo  *  1 - Comparar                                                *
  25. echo  *  2 - Separar por comprador                                   *
  26. echo  *  3 - Imprimir                                                *
  27. echo  *  4 - Salir                                                   *
  28. echo  *                                                              *
  29. echo  *                                                              *
  30. echo  *                                                              *
  31. echo  *                                                              *
  32. echo  *                                                              *
  33. echo  *                                                              *
  34. echo  ****************************************************************
  35. set /p opc=Opci¢n:
  36. If %opc% == 1 goto :Comparar
  37. If %opc% == 2 goto :Separar
  38. If %opc% == 3 goto :Imprimir
  39. If %opc% == 4 goto :Salir
  40.  
  41. :Comparar
  42. echo  ****************************************************************
  43. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  44. echo  *  *                      Daniel Ramos                      *  *
  45. echo  *  **********************************************************  *
  46. echo  *                                                              *
  47. echo  *                                                              *
  48. echo  *                                                              *
  49. echo  *                                                              *
  50. echo  *                                                              *
  51. echo  *                                                              *
  52. echo  *         Ingrese el nombre y la extension del archivo         *
  53. echo  *                                                              *
  54. echo  *                                                              *
  55. echo  *                   Ejemplo: faltantes.txt                     *
  56. echo  *                                                              *
  57. echo  *                                                              *
  58. echo  *                                                ***************
  59. echo  *                                                * ESC = ATRAS *
  60. echo  ****************************************************************
  61. set /p x1=Aarchivo previamente procesado:
  62.  
  63.  
  64. del tempfile.txt
  65. set /a strlength=0
  66. set /a num=0
  67. If NOT EXIST tempfile.txt (
  68. For %%R In (tempfile.txt) Do (
  69. "%%R" > tempfile.txt
  70. cls
  71. )
  72. )
  73.  
  74. ECHO %x1%> tempfile.txt
  75.  
  76. FOR %%? IN (tempfile.txt) DO (
  77. set /a strlength+=%%~z?
  78. set /a strlength-=2
  79. )
  80.  
  81. set /a num+=46-%strlength%
  82. set "texto=*  Archivo 1 : "
  83. set "texto=%texto%%x1%"
  84. set /a "x = 1"
  85. set "espacio= "
  86.  
  87. :while1
  88. if %x% leq %num% (
  89. set /a "x = x + 1"
  90. set "espacio=%espacio% "
  91. goto :while1
  92. )
  93.  
  94. set "texto=%texto%%espacio% *"
  95. del tempfile.txt
  96.  
  97.  
  98. cls
  99. echo  ****************************************************************
  100. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  101. echo  *  *                      Daniel Ramos                      *  *
  102. echo  *  **********************************************************  *
  103. echo  *                                                              *
  104. echo  *                                                              *
  105. echo  *         Ingrese el nombre y la extension del archivo         *
  106. echo  *                                                              *
  107. echo  *                                                              *
  108. echo  %texto%
  109. echo  *  Archivo 2 :                                                 *
  110. echo  *                                                              *
  111. echo  *                                                              *
  112. echo  *                                                              *
  113. echo  *                                                              *
  114. echo  *                                                              *
  115. echo  *                                                ***************
  116. echo  *                                                * ESC = ATRAS *
  117. echo  ****************************************************************
  118. set /p "x2= Archivo a procesar: "
  119.  
  120. set /a length=0
  121. set /a numero=0
  122. set "text=*  Archivo 2 : "
  123. set "text=%text%%x2%"
  124. set /a "y = 1"
  125. set "esp= "
  126.  
  127. If NOT EXIST tempfile.txt (
  128. For %%R In (tempfile.txt) Do (
  129. "%%R" > tempfile.txt
  130. cls
  131. )
  132. )
  133.  
  134. ECHO %x2% > tempfile.txt
  135.  
  136. FOR %%? IN (tempfile.txt) DO (
  137. set /a length+=%%~z?
  138. set /a length-=3
  139. )
  140.  
  141. set /a numero+=46-%length%
  142.  
  143.  
  144. :while2
  145. if %y% leq %numero% (
  146. set /a "y = y + 1"
  147. set "esp=%esp% "
  148. goto :while2
  149. )
  150.  
  151. set "text=%text%%esp% *"
  152.  
  153. del tempfile.txt
  154.  
  155. cls
  156. echo  ****************************************************************
  157. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  158. echo  *  *                      Daniel Ramos                      *  *
  159. echo  *  **********************************************************  *
  160. echo  *                                                              *
  161. echo  *                                                              *
  162. echo  *         Ingrese el nombre y la extension del archivo         *
  163. echo  *                                                              *
  164. echo  *                                                              *
  165. echo  %texto%
  166. echo  %text%
  167. echo  *                                                              *
  168. echo  *                                                              *
  169. echo  *                                                              *
  170. echo  *                Presione enter para comenzar..                *
  171. echo  *                                                              *
  172. echo  *                                                ***************
  173. echo  *                                                * ESC = ATRAS *
  174. echo  ****************************************************************
  175.  
  176. set /a OuterVar=1
  177. set /a InnerVar=0
  178. del Fin.txt
  179.  
  180. If NOT EXIST Fin.txt (
  181. For %%R In (Fin.txt) Do (
  182. "%%R" > Fin.txt
  183. cls
  184. )
  185. )
  186.  
  187. REM Acá comienza el Código D23_1 el cual se encarga de comparar y copiar
  188. REM los datos del archivo existene "procesado" con el "aún no procesado".
  189.  
  190. For /F "tokens=* delims=" %%I In (%x1%) Do (
  191. echo %%I
  192. For /F "tokens=1 delims= " %%M In ("%%I") Do (
  193. echo %%M
  194. For /F "tokens=1 delims= " %%N In (%x2%) Do (
  195. If %%M == %%N (
  196. echo %%I >> Fin.txt
  197. )
  198. )
  199. )
  200. )
  201.  
  202. REM Finaliza Código D23_1
  203.  
  204. REM Acá comienza el Código D23_2 el cual se encarga de comparar y copiar
  205. REM los datos del archivo existene "aún no procesado" con el "procesado".
  206.  
  207. For /F "tokens=* delims=" %%I In (%x2%) Do (
  208. For /F "tokens=1 delims= " %%M In ("%%I") Do (
  209. For /F "tokens=1 delims= " %%L In (Fin.txt) Do (
  210. If %%M == %%L (
  211. set /a InnerVar+= %OuterVar%
  212. )
  213. )
  214. if !InnerVar! neq %OuterVar% (
  215. echo %%I >> Fin.txt
  216. ) else (
  217. set /a InnerVar-= !InnerVar!
  218. )
  219. )
  220. )
  221.  
  222.  
  223. For /F "tokens=* delims=" %%I In (%x1%) Do (
  224. For /F "tokens=1 delims= " %%M In ("%%I") Do (
  225. For /F "tokens=1 delims= " %%L In (Fin.txt) Do (
  226. If %%M == %%L (
  227. set /a InnerVar+= %OuterVar%
  228. )
  229. )
  230. if !InnerVar! neq %OuterVar% (
  231. echo %%I >> Fin.txt
  232. ) else (
  233. set /a InnerVar-= !InnerVar!
  234. )
  235. )
  236. )
  237.  
  238.  
  239. REM Finaliza Código D23_2
  240.  
  241. cls
  242. echo  ****************************************************************
  243. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  244. echo  *  *                      Daniel Ramos                      *  *
  245. echo  *  **********************************************************  *
  246. echo  *                                                              *
  247. echo  *                                                              *
  248. echo  *                                                              *
  249. echo  *                                                              *
  250. echo  *                                                              *
  251. echo  *                                                              *
  252. echo  *                      Proceso Finalizado                      *
  253. echo  *                 Presione Enter Para Continuar                *
  254. echo  *                                                              *
  255. echo  *                                                              *
  256. echo  *                                                              *
  257. echo  *                                                              *
  258. echo  *                                                              *
  259. echo  *                                                              *
  260. echo  ****************************************************************
  261. "C:\Program Files (x86)\OpenOffice.org 3\program\scalc.exe" Fin.txt
  262. goto :Menu
  263.  
  264.  
  265. :Imprimir
  266. cls
  267. echo  ****************************************************************
  268. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  269. echo  *  *                      Daniel Ramos                      *  *
  270. echo  *  **********************************************************  *
  271. echo  *                                                              *
  272. echo  *                                                              *
  273. echo  *                                                              *
  274. echo  *                                                              *
  275. echo  *                                                              *
  276. echo  *                                                              *
  277. echo  *                       En Construcción                        *
  278. echo  *                 Presione Enter Para Continuar                *
  279. echo  *                                                              *
  280. echo  *                                                              *
  281. echo  *                                                              *
  282. echo  *                                                              *
  283. echo  *                                                              *
  284. echo  *                                                              *
  285. echo  ****************************************************************
  286. goto :Menu
  287.  
  288. :Separar
  289. cls
  290. echo  ****************************************************************
  291. echo  *  *           Obtener Lista Faltantes Actulizada           *  *
  292. echo  *  *                      Daniel Ramos                      *  *
  293. echo  *  **********************************************************  *
  294. echo  *                                                              *
  295. echo  *                                                              *
  296. echo  *                                                              *
  297. echo  *                                                              *
  298. echo  *                                                              *
  299. echo  *                                                              *
  300. echo  *                       En Construcción                        *
  301. echo  *                 Presione Enter Para Continuar                *
  302. echo  *                                                              *
  303. echo  *                                                              *
  304. echo  *                                                              *
  305. echo  *                                                              *
  306. echo  *                                                              *
  307. echo  *                                                              *
  308. echo  ****************************************************************
  309. goto :Menu
  310.  
  311.  
  312.  
  313. :Salir
  314.  
  315.  


Bueno acá las lineas del meú se corrieron pero bue.
Espero su respuestas!! ayuda por favor!!!



[MOD] Se corrieron porque no usaste el botón "Insertar código", es obligatorio en el foro usar la etiqueta [ CODE ] para publicar scripts.
22  Seguridad Informática / Hacking Wireless / wusb600n v2 rt3572 ubuntu 11.10 Oneiric PROBLEMA!!! en: 28 Octubre 2011, 16:55 pm
Hola a todos.. Les traigo un problema para ver si me pueden dar una mano. Tengo un adaptador linksys wusb600n v2 chipset rt3572, actualmente esta funcionando. E l problema esta a la hora de usar el airmon-ng para poner este en modo monitor. Cuando le doy el comando airmon-ng me aparece como que tengo el chipset ralink 2560 pci y driver rt2500.
Y ahi es donde esta el error, el problema!!
Alguna idea de como solucionarlo??

Muchas Gracias.
Páginas: 1 2 [3]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines