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


 


Tema destacado: Doble factor de autenticación o verificación en dos pasos


  Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14 15 16 17 18
111  Programación / Scripting / Re: SET /P sin valor declarado en: 21 Septiembre 2017, 23:15
me alegro que te haya servido .  ;-)
         ;D  espero que no sea mucha molestia pero, podrías participar en la encuesta?

link:

http://foro.elhacker.net/programacion_general/encuesta_cual_lenguaje_es_el_mas_usado_en_el_foro_del_2192017_al_28092017-t474790.0.html
112  Programación / Programación General / Encuesta- Cual lenguaje es el mas usado en el foro? del 21/9/2017 al 28/09/2017 en: 21 Septiembre 2017, 22:23
hola a todos los de el foro , en esta encuesta se mostrara cual lenguaje de programacion es el mas usado por los de el foro .

Instrucciones :

*La duración de esta encuesta es de 1 semana.

*se pondrá una lista de lenguajes  a elegir.

*Para votar , comente su/sus lenguajes preferidos .

*Si su lenguaje no se encuentra en esta lista, comentelo en color rojo.  

*Al finalizar la duración de esta encuesta se mostrara la una gráfica con los resultados.


-------------------------------------------------------------------------------------------
                                               lenguajes

  
    
    
Código:
    *Ada
     *ActionScript
     *Afnix
     *ALGOL
     *APL
     *ASP
     *ASP.NET
     *AWK
     *Batch  •                                                                                                          1 votos(s)
     *Bash
     *BASIC
     *BCPL
     *Befunge
     *Boo
     *C
     *C++  •                                                                                                          1 votos(s)
     *C#
     *Delphi
     *DIV
     *Dylan
     *Eiffel
     *Erlang
     *Ensamblador
     *Extended ML
     *Euphoria
     *GML
     *GRAFCET
     *FP
     *Haskell
     *Java
     *javascript
     *Joy
     *KWC
     *Lisp
     *Lua
     *MAGIC
     *Mainsail
     *Mesa
     *NetREXX
     *Oberon
     *Pascal
     *Parlog
     *Perl
     *PHP
     *PL/1
     *Plankalkül
     *PostScript
     *PowerBuilder
     *Prolog
     *Python  ••                                                                                                     2 votos(s)
     *Rapid
     *REXX
     *Ruby
     *Sail
     *Sather
     *Scriptol
     *Sh
     *Simula
     *Smalltalk
     *TI-Basic
     *TCL
     *VBA
     *Visual Basic Script
     *Visual Basic
     *Visual Basic .NET •                                                                                               1 votos(s)
     *Visual C++
     *Visual DialogScript
     *Visual Foxpro
     *Yurix
     *ZPL

PD: la encuesta finaliza dentro de una semana , con mi voto.

113  Programación / Scripting / Re: Crear un sistema de numeración en: 21 Septiembre 2017, 21:36
el problema es que estas repitiendo los valores .

ejemplo:

Código
  1. :descifrar
  2. cls
  3. echo [+]______________________________________________________________[+]
  4. echo [+]                   *1.Descifrar                               [+]
  5. echo [+]______________________________________________________________[+]
  6. echo [+]______________________________________________________________[+]
  7. echo/
  8. echo/
  9. echo/
  10. set /p palabra=Escriba los numeros que quieras descifrar:
  11. set "var23=%palabra%"
  12. set "resultado=%var23:7=a%"
  13. set "resultado=%resultado:009=b%"
  14. set "resultado=%resultado:004=c%"
  15. set "resultado=%resultado:2=d%"
  16. set "resultado=%resultado:007=e%"
  17. set "resultado=%resultado:03=f%"
  18. set "resultado=%resultado:001=g%"
  19. set "resultado=%resultado:3=h%"
  20. set "resultado=%resultado:01=i%"
  21. set "resultado=%resultado:05=j%"
  22. set "resultado=%resultado:5=k%"
  23. set "resultado=%resultado:002=l%"
  24. set "resultado=%resultado:6=m%"
  25. set "resultado=%resultado:9=n%"
  26. set "resultado=%resultado:008=ñ%"
  27. set "resultado=%resultado:06=o%"
  28. set "resultado=%resultado:003=p%"
  29. set "resultado=%resultado:04=q%"
  30. set "resultado=%resultado:08=r%"
  31. set "resultado=%resultado:02=s%"
  32. set "resultado=%resultado:09=t%"
  33. set "resultado=%resultado:07=u%"
  34. set "resultado=%resultado:8=v%"
  35. set "resultado=%resultado:006=w%"
  36. set "resultado=%resultado:1=x%"
  37. set "resultado=%resultado:4=y%"
  38. set "resultado=%resultado:005=z%"
  39.  

006 y 06 es igual al 6 ,    ya que el 0 a la izquierda es nulo.

tu pones 006 o 06 pero la cmd lo lee como 6 osea repites los valoras.

ejuemplo:

06=o  |  006=w |  6=m  |  en verdad estas diciendo  a la cmd que las letras

o , w  , m   son 6 .     ese es el error    .

como lo corrigo?

solo cambia las cifras y asegúrate que no sean iguales numeros. ya que 006 , 06 es lo mismo que 6.
114  Programación / Scripting / Re: Crear un sistema de numeración en: 21 Septiembre 2017, 20:50
;D me lo agradecerías si te pusieras a estudiar mas.  para que tu mismo crees tus codes.

no me tomes a mal, solo es un consejo, descargate unas guias pdf y listo.  ;)  :) 

               recuerda solo es un consejo que me dio Angel lex hace 6 meses cuando no
 sabia casi nada. seguí su consejo y me ha ido muy bien hasta ahora.   ;)
                                                                                   no me tomes a mal  ;D
115  Programación / .NET / Re: ayuda con manejo de archivos en vb.net 2008 en: 21 Septiembre 2017, 20:39
Más óptimo a base de algo más de código, es todavía, obtener una lista de todos los ficheros de esa carpeta y luego en un bucle interno:

Código:
lista = getAllFiles(DeLaCarpetaX)
Por cada fichero en la lista
   Seleccionar casos para fichero.getExtension ' Tomar la extension del fichero actual en el bucle
       Caso: "*.vbs", "*.cmd", "*.js", "*.wsf", "*.ink", "*.bat"
            lo que quieras hacer
   Fin seleccion
Repetir en bucle


Umm. no había pensado hacer eso. en verdad podría ser mas optimo , ya que con la solución que encontré tarda mucho.
116  Foros Generales / Noticias / Re: Bill Gates confiesa que se arrepiente de haber creado el CTRL+ALT+SUPR en: 21 Septiembre 2017, 19:25
yo utilizo el CTRL+ALT+SUPR en cyber para joder. jajaja  :laugh:  :silbar:

la verdad es muy util.   :D

(CTRL+ALT+SUPR) = administrador de tareas

(administrador de tareas) + (cyber control hack) = horas de cyber gratis y mas.

Modifico después de leer la noticia de la pagina que puso wolfbcn


Citar
Bill Gateshace una hora
OJO, no me arrepiento de haber creado esa función, es vital cuando el PC se congela por error, me arrepiento de que fueran varias teclas que presionar.

También habría querido integrar esta tecla:[/quote]

117  Programación / Scripting / Re: Crear un sistema de numeración en: 21 Septiembre 2017, 19:14
listo, aquí te dejo un bach que hace lo que quieres.

convierte palabras en numeros y los numeros los convierte en palabras.

Código
  1. @echo off
  2. color a
  3. :menu
  4. cls
  5. echo  __________________________________________________________________
  6. echo [+]______________Crypter and Decrypter v1.0 by sal  _____________[+]
  7. echo [+]                   *1. cifrar texto                           [+]
  8. echo [+]                   *2. descifrar texto                        [+]
  9. echo [+]                   *3. salir                                  [+]
  10. echo [+]                   *4. Creditos                               [+]
  11. echo [+]______________________________________________________________[+]
  12. echo [+]___________________________MP©2017____________________________[+]
  13. echo.&set "var="
  14. set/p "var=>> "
  15. if not defined var (goto :menu)
  16. If ["%var%"]==["1"] goto cifrar
  17. If ["%var%"]==["2"] goto descifrar
  18. If ["%var%"]==["3"] exit
  19. If ["%var%"]==["4"] goto cre
  20.  
  21. :cifrar
  22. cls
  23. echo [+]______________________________________________________________[+]
  24. echo [+]                   *1.Cifrar                                  [+]
  25. echo [+]______________________________________________________________[+]
  26. echo [+]______________________________________________________________[+]
  27. echo/
  28. echo/
  29. echo/
  30. set/p "palabra=Escriba las palabras que quieras cifrar:  "
  31. if not defined palabra (goto:cifrar)
  32. set "var=%palabra%"
  33. set "resultado=%var:a=61%"
  34. set "resultado=%resultado:b=62%"
  35. set "resultado=%resultado:c=63%"
  36. set "resultado=%resultado:d=64%"
  37. set "resultado=%resultado:e=65%"
  38. set "resultado=%resultado:f=66%"
  39. set "resultado=%resultado:g=67%"
  40. set "resultado=%resultado:h=68%"
  41. set "resultado=%resultado:i=69%"
  42. set "resultado=%resultado:j=70%"
  43. set "resultado=%resultado:k=72%"
  44. set "resultado=%resultado:l=73%"
  45. set "resultado=%resultado:m=74%"
  46. set "resultado=%resultado:n=75%"
  47. set "resultado=%resultado:ñ=76%"
  48. set "resultado=%resultado:o=77%"
  49. set "resultado=%resultado:p=78%"
  50. set "resultado=%resultado:q=79%"
  51. set "resultado=%resultado:r=100%"
  52. set "resultado=%resultado:s=101%"
  53. set "resultado=%resultado:t=102%"
  54. set "resultado=%resultado:u=103%"
  55. set "resultado=%resultado:v=104%"
  56. set "resultado=%resultado:w=105%"
  57. set "resultado=%resultado:x=30%"
  58. set "resultado=%resultado:y=638%"
  59. set "resultado=%resultado:z=666%"
  60. :finenc
  61. cls
  62. echo.
  63. echo Las palabras encriptadas son: %resultado%
  64. echo %resultado% >> cifrado.txt
  65. pause
  66. goto menu
  67. :descifrar
  68. cls
  69. echo [+]______________________________________________________________[+]
  70. echo [+]                   *1.Descifrar                               [+]
  71. echo [+]______________________________________________________________[+]
  72. echo [+]______________________________________________________________[+]
  73. echo/
  74. echo/
  75. echo/
  76. set /p palabra=Escriba los numeros que quieras descifrar:
  77. set "var23=%palabra%"
  78. set "resultado=%var23:61=a%"
  79. set "resultado=%resultado:62=b%"
  80. set "resultado=%resultado:63=c%"
  81. set "resultado=%resultado:64=d%"
  82. set "resultado=%resultado:65=e%"
  83. set "resultado=%resultado:66=f%"
  84. set "resultado=%resultado:67=g%"
  85. set "resultado=%resultado:68=h%"
  86. set "resultado=%resultado:69=i%"
  87. set "resultado=%resultado:70=j%"
  88. set "resultado=%resultado:72=k%"
  89. set "resultado=%resultado:73=l%"
  90. set "resultado=%resultado:74=m%"
  91. set "resultado=%resultado:75=n%"
  92. set "resultado=%resultado:76=ñ%"
  93. set "resultado=%resultado:77=o%"
  94. set "resultado=%resultado:78=p%"
  95. set "resultado=%resultado:79=q%"
  96. set "resultado=%resultado:100=r%"
  97. set "resultado=%resultado:101=s%"
  98. set "resultado=%resultado:102=t%"
  99. set "resultado=%resultado:103=u%"
  100. set "resultado=%resultado:104=v%"
  101. set "resultado=%resultado:105=w%"
  102. set "resultado=%resultado:30=x%"
  103. set "resultado=%resultado:638=y%"
  104. set "resultado=%resultado:666=z%"
  105. :fin
  106. cls
  107. echo.
  108. echo Las palabras desencriptadas son: %resultado%
  109. echo/
  110. echo/
  111. echo/
  112. pause & goto menu
  113.  
  114. :cre
  115.               (
  116.              echo/ & echo/
  117.                     echo :::::::::::::::::::::::::::::::::::::::::::::::::::
  118.                     echo :::::::             By **Aincrad**          :::::::
  119.                     echo :::::::::::::::::::::::::::::::::::::::::::::::::::
  120.                echo/ & echo/ & pause & goto menu
  121.                                       )
  122.  
  123.  

                                       Comenta si te funciono


118  Programación / Scripting / Re: SET /P sin valor declarado en: 21 Septiembre 2017, 18:37
hola , soy Aincrad de nuevo.

pon este code :

Código
  1. @ECHO OFF
  2. color a
  3. goto pass1
  4. :passno
  5.          (  cls
  6.                 echo/
  7.                 echo/
  8.                 echo ===================================
  9.                 echo =     ATENCION                    =
  10.                 echo ===================================
  11.                 echo = Por favor Escriba la contraseña.=
  12.                 echo ===================================
  13.                 echo/
  14.                 echo/
  15.                     pause
  16.                       goto pass1
  17.                                        )
  18.  
  19. :pass1
  20.                  ( cls
  21.                      echo/
  22.      set /p "Pass=^> Enter the value for the password in all rar files:  "
  23.                if not defined pass (goto:passno)
  24.                                             goto continue
  25.             )
  26.  
  27. :continue
  28. cls
  29. echo tu contraseña es %pass%
  30. pause
  31.  


Listo es lo que querias . es en caso de que no escribas nada.

PD: porfavor colocar codigos dentro de las etiquetas correspondiente.

                              Comenta si te funciono


119  Programación / .NET / Re: ayuda con manejo de archivos en vb.net 2008 en: 21 Septiembre 2017, 17:47
hola, Elektro. lo que queria decir en

Citar
el code tiene que implementar la funcion de :
Código
Código
  1. Dim dirPath As String = Form2.FolderBrowserDialog1.SelectedPath

para el directorio. no se si me entienden.  :silbar:

solamente queria decir , que utilizaria el FolderBrowserDialog para seleccionar
el directorio donde se encontraban las carpetas ocultas. no queria visualizarlas
eso como tu dijiste es imposible.


un ejemplo de lo que queria era algo asi:

Código
  1. FolderBrowserDialog1
  2. Dim dirPath As String = FolderBrowserDialog1.SelectedPath
  3.  
  4. Dim filePath As String = dirPath
  5. Dim attribs As FileAttributes = File.GetAttributes(filePath)
  6.  
  7. File.SetAttributes(filePath, attribs And Not FileAttributes.Hidden)
  8.  

era con FolderBrowserDialog1 seleccionar un disco extraible o una carpeta,
y después el code desoculta todo lo que esta dentro de la carpeta que seleccione.


en fin logre hacerlo de la siguiente manera:

Código
  1. FolderBrowserDialog1
  2. Dim dirPath As String = FolderBrowserDialog1.SelectedPath
  3. Dim Pr As New Process
  4. Dim Psi As New ProcessStartInfo("Cmd.Exe")
  5. Psi.Arguments = "/C attrib -r -a -s -h " & dirPath & "*.* /S /D "
  6. Pr.StartInfo = Psi
  7. Pr.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
  8. Pr.Start()

ejecuta la cmd oculto y con el argumento attrib .

eso era lo que queria desocultar todas las carpetas y archivos de un directotio seleccionado.
120  Programación / .NET / Re: ayuda con manejo de archivos en vb.net 2008 en: 20 Septiembre 2017, 22:05
creo que me entendiste mal.

en pocas palabras lo que quiero en lo de desocultar carpetas es un code sencillo
algo como esto.

Código
  1. FolderBrowserDialog1.ShowDialog()
  2. Dim dirPath As String = FolderBrowserDialog1.SelectedPath
  3.        File.SetAttributes(dirPath, FileAttributes.Normal)

PD: el primer problema ya lo solucione
Páginas: 1 2 3 4 5 6 7 8 9 10 11 [12] 13 14 15 16 17 18
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines