- Mensajes
- 23,156
Aquí teneís un manual de cómo crear un generador de claves WPA-PSK TKIP/AES y WPA2-PSK TKIP/AES para redes wireless, cada vez que se ejecute la macro de Word, creará una clave totalmente distinta.
Este truco me lo dijo un Zoner@ llamado isimartin.
Espero que os sirva de ayuda para impedir que nuestros queridos vecinos se aprovechen de nuestra conexión a internet.
Lo primero de todo abrimos Microsoft Word, yo he utilizado la versión 2007.
Copiais el siguiente código en el portapapeles:
Aquí tenéis unas cuantas claves de ejemplo:
Opción 2, by Enopen
Para el que no use/tenga Microsoft Word: http://www.yellowpipe.com/yis/tools/WPA ... erator.php
Aunque con este método la clave es menos robusta.
Este truco me lo dijo un Zoner@ llamado isimartin.
Espero que os sirva de ayuda para impedir que nuestros queridos vecinos se aprovechen de nuestra conexión a internet.
Lo primero de todo abrimos Microsoft Word, yo he utilizado la versión 2007.


Copiais el siguiente código en el portapapeles:
Código:
Randomize
For k = 1 To 1000000
cont = 0
a = Rnd(k)
a = Int(1000 * a)
If a > 39 Then cont = 1
If a < 127 Then cont = cont + 1
If cont = 2 Then b$ = Chr$(a): c$ = c$ + b$
If Len(c$) = 63 Then GoTo final:
Next k
final:
Selection.TypeParagraph: Selection.TypeText Text:=c$: Selection.TypeParagraph '
' Macro1 Macro
' a
'
Selection.TypeText Text:="a"



Aquí tenéis unas cuantas claves de ejemplo:
Código:
GV?@+|;tL-X{qOjw1aWwh[9~RbPwZ?>aHbMrvUhk0n-Vk2]`jPw=IulH~t4/w7L
Código:
/m`vD`M?c64)P~P;z4h~oE,~*FGg3E2Xf2S/aKH*)5a+US`0H~rwktzOb1N=2~m
Código:
0bOSar=)e=WL)3^X76(1-X@@+[EQ|DtKnyMHJ<P9XT[hpiy|/P16(gO*N^O1o@s
Opción 2, by Enopen
Para el que no use/tenga Microsoft Word: http://www.yellowpipe.com/yis/tools/WPA ... erator.php
Aunque con este método la clave es menos robusta.