Crea tu propio AdminFinder con VB.NET en solo 3 pasos!

  • 4 Respuestas
  • 4965 Vistas

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

Conectado 79137913

  • *
  • Co Admin
  • Mensajes: 692
  • Actividad:
    6.67%
  • Reputación 16
  • 4 Esquinas
  • Skype: [email protected]
    • Ver Perfil
    • Doors.Party
    • Email
HOLA!!!

Hoy veremos como crear un AdminFinder con VB.NET!

1)Primero crearemos el proyecto


2)Luego en el Form1 Realizar la siguente interfaz (respetando los nombres de los controles)[atención txtPosiblesPaths y txtResultado tienen que ser multiline = true] :


3)Una vez esta listo el formulario y los controles le damos doble click a Button1 y dejamos este codigo dentro:
Código: vb.net
  1.         'By 79137913 for http://underc0de.org
  2.         Dim paths() As String = You are not allowed to view links. Register or Login(txtPosiblesPaths.Text, vbNewLine) 'separamos los posibles path por linea
  3.         txtResultado.Text = "" 'restablecemos el txtResultado
  4.         For Each path In paths 'por cada linea en el cuadro de texto txtPosiblesPaths
  5.             Try 'estructura para omitir errores
  6.                 'creamos solicitud web
  7.                 Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(txtDestino.Text & path)
  8.                 'obtenemos su respuesta
  9.                 Dim response As System.Net.HttpWebResponse = request.GetResponse()
  10.                 'convertimos la respuesta a un stream de datos
  11.                 Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
  12.                 'convertimos el stream en texto
  13.                 Dim sourcecode As String = sr.ReadToEnd()
  14.                 If You are not allowed to view links. Register or Login(You are not allowed to view links. Register or Login(sourcecode), "input") Then 'si la pagina obtenida contiene la etiqueta INPUT consideramos que es un admin panel
  15.                     txtResultado.Text = txtResultado.Text & txtDestino.Text & path & vbNewLine 'agregamos una linea con el resultado satisfactorio al txtResultado
  16.                     Me.Refresh() 'hacemos que el formulario se refresque para que se muestren los resultados
  17.                 End If
  18.             Catch 'estructura para omitir errores
  19.             End Try 'estructura para omitir errores
  20.         Next
  21.         You are not allowed to view links. Register or Login("Terminado!") 'avisamos que hemos terminado.

El codigo Completo del formulario quedaria asi:
Código: vb.net
  1. Public Class Form1
  2.     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  3.         'By 79137913 for http://underc0de.org
  4.         Dim paths() As String = You are not allowed to view links. Register or Login(txtPosiblesPaths.Text, vbNewLine) 'separamos los posibles path por linea
  5.         txtResultado.Text = "" 'restablecemos el txtResultado
  6.         For Each path In paths 'por cada linea en el cuadro de texto txtPosiblesPaths
  7.             Try 'estructura para omitir errores
  8.                 'creamos solicitud web
  9.                 Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(txtDestino.Text & path)
  10.                 'obtenemos su respuesta
  11.                 Dim response As System.Net.HttpWebResponse = request.GetResponse()
  12.                 'convertimos la respuesta a un stream de datos
  13.                 Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
  14.                 'convertimos el stream en texto
  15.                 Dim sourcecode As String = sr.ReadToEnd()
  16.                 If You are not allowed to view links. Register or Login(You are not allowed to view links. Register or Login(sourcecode), "input") Then 'si la pagina obtenida contiene la etiqueta INPUT consideramos que es un admin panel
  17.                     txtResultado.Text = txtResultado.Text & txtDestino.Text & path & vbNewLine 'agregamos una linea con el resultado satisfactorio al txtResultado
  18.                     Me.Refresh() 'hacemos que el formulario se refresque para que se muestren los resultados
  19.                 End If
  20.             Catch 'estructura para omitir errores
  21.             End Try 'estructura para omitir errores
  22.         Next
  23.         You are not allowed to view links. Register or Login("Terminado!") 'avisamos que hemos terminado.
  24.     End Sub
  25. End Class

Cuando ya colocamos el codigo solo queda iniciar (apretar F5) y empezar a usarlo, colocamos en txtDestino la URL con http:// y con / al final , llenamos el txtPosiblesPaths con la lista de paths de admin que consigan (al final les dejare una a modo de ejemplo) presionan Button1 y la magia comienza:


Aqui una lista de paths de admin:
Código: You are not allowed to view links. Register or Login
wp-admin
admin1.php
admin1.html
admin2.php
admin2.html
yonetim.php
yonetim.html
yonetici.php
yonetici.html
adm/
admin/
admin/account.php
admin/account.html
admin/index.php
admin/index.html
admin/login.php
admin/login.html
admin/home.php
admin/controlpanel.html
admin/controlpanel.php
admin.php
admin.html
admin/cp.php
admin/cp.html
cp.php
cp.html
administrator/
administrator/index.html
administrator/index.php
administrator/login.html
administrator/login.php
administrator/account.html
administrator/account.php
administrator.php
administrator.html
login.php
login.html
modelsearch/login.php
moderator.php
moderator.html
moderator/login.php
moderator/login.html
moderator/admin.php
moderator/admin.html
moderator/
account.php
account.html
controlpanel/
controlpanel.php
controlpanel.html
admincontrol.php
admincontrol.html
adminpanel.php
adminpanel.html
admin1.asp
admin2.asp
yonetim.asp
yonetici.asp
admin/account.asp
admin/index.asp
admin/login.asp
admin/home.asp
admin/controlpanel.asp
admin.asp
admin/cp.asp
cp.asp
administrator/index.asp
administrator/login.asp
administrator/account.asp
administrator.asp
login.asp
modelsearch/login.asp
moderator.asp
moderator/login.asp
moderator/admin.asp
account.asp
controlpanel.asp
admincontrol.asp
adminpanel.asp
fileadmin/
fileadmin.php
fileadmin.asp
fileadmin.html
administration/
administration.php
administration.html
sysadmin.php
sysadmin.html
phpmyadmin/
myadmin/
sysadmin.asp
sysadmin/
ur-admin.asp
ur-admin.php
ur-admin.html
ur-admin/
Server.php
Server.html
Server.asp
Server/
wp-admin/
administr8.php
administr8.html
administr8/
administr8.asp
webadmin/
webadmin.php
webadmin.asp
webadmin.html
administratie/
admins/
admins.php
admins.asp
admins.html
administrivia/
Database_Administration/
WebAdmin/
useradmin/
sysadmins/
admin1/
system-administration/
administrators/
pgadmin/
directadmin/
staradmin/
ServerAdministrator/
SysAdmin/
administer/
LiveUser_Admin/
sys-admin/
typo3/
panel/
cpanel/
cPanel/
cpanel_file/
platz_login/
rcLogin/
blogindex/
formslogin/
autologin/
support_login/
meta_login/
manuallogin/
simpleLogin/
loginflat/
utility_login/
showlogin/
memlogin/
members/
login-redirect/
sub-login/
wp-login/
login1/
dir-login/
login_db/
xlogin/
smblogin/
customer_login/
UserLogin/
login-us/
acct_login/
admin_area/
bigadmin/
project-admins/
phppgadmin/
pureadmin/
sql-admin/
radmind/
openvpnadmin/
wizmysqladmin/
vadmind/
ezsqliteadmin/
hpwebjetadmin/
newsadmin/
adminpro/
Lotus_Domino_Admin/
bbadmin/
vmailadmin/
Indy_admin/
ccp14admin/
irc-macadmin/
banneradmin/
sshadmin/
phpldapadmin/
macadmin/
administratoraccounts/
admin4_account/
admin4_colon/
radmind-1/
Super-Admin/
AdminTools/
cmsadmin/
SysAdmin2/
globes_admin/
cadmins/
phpSQLiteAdmin/
navSiteAdmin/
server_admin_small/
logo_sysadmin/
server/
database_administration/
power_user/
system_administration/
ss_vms_admin_sm/

Descargar Source: You are not allowed to view links. Register or Login

Hecho y redactado por 79137913

Agradecimientos @Antrax

GRACIAS POR LEER!!!
« Última modificación: Noviembre 08, 2019, 09:15:00 am por 79137913 »
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scouts Team*                                                   You are not allowed to view links. Register or Login

Conectado Gabriela

  • *
  • Co Admin
  • Mensajes: 942
  • Actividad:
    53.33%
  • Country: 00
  • Reputación 18
    • Ver Perfil
    • Email
     @You are not allowed to view links. Register or Login

Siempre es de agradecer un aporte propio, donde se destaca la sencillez pero no menos la utilidad.

Fresco, prolijo y claro para quien lee el código (que cuenta con abundantes comentarios), facilitando el aprendizaje y el entendimiento!


Merece +1 :)

Saludos

Gabriela.
« Última modificación: Mayo 29, 2017, 01:10:10 pm por Gabriela »

Tú te enamoraste de mi valentía, yo me enamoré de tu oscuridad; tú aprendiste a vencer tus miedos, yo aprendí a no perderme en tu abismo.

Desconectado blackdrake

  • *
  • Co Admin
  • Mensajes: 1951
  • Actividad:
    3.33%
  • Country: es
  • Reputación 16
    • Ver Perfil
Bueno, bonito y barato :D

Muchas gracias @You are not allowed to view links. Register or Login, con tu permiso lo pasaré a C# y si queda bien lo subo :P

Un saludo y gracias :)


Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5667
  • Actividad:
    60%
  • Country: ar
  • Reputación 37
  • ANTRAX
  • Skype: underc0de.org
  • Twitter: @Underc0de
    • Ver Perfil
    • Underc0de
    • Email
Muy bueno Numeros!
Por cierto, que versión de Visual Studio tenes?

Saludos,
ANTRAX


Conectado 79137913

  • *
  • Co Admin
  • Mensajes: 692
  • Actividad:
    6.67%
  • Reputación 16
  • 4 Esquinas
  • Skype: [email protected]
    • Ver Perfil
    • Doors.Party
    • Email
HOLA!!!

@You are not allowed to view links. Register or Login , Para hacer este soft utilicé VS2015, igual para desarrollar las apps que hago para el trabajo uso VS2017. Mas alla esto se puede hacer con cualquier VisualStudio que soporte Net.Framework.3 en adelante

GRACIAS POR LEER!!!
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scouts Team*                                                   You are not allowed to view links. Register or Login

 

Crea tu propio Creador de Diccionarios por Fuerza Bruta en VBNet en solo 3 Pasos

Iniciado por 79137913

Respuestas: 2
Vistas: 4895
Último mensaje Septiembre 03, 2019, 10:57:38 am
por 79137913
Crea tu propio Generador de Contraseñas Seguras con VBNet en solo 3 Pasos

Iniciado por 79137913

Respuestas: 0
Vistas: 323
Último mensaje Octubre 15, 2019, 10:50:38 am
por 79137913
Crea tu propio PortScanner Asincrono de Consola en VB.NET en solo 3 pasos

Iniciado por 79137913

Respuestas: 1
Vistas: 500
Último mensaje Diciembre 05, 2019, 03:29:46 pm
por Solid Water
Crea tu propio HashCracker en VBNet en solo 3 Pasos

Iniciado por 79137913

Respuestas: 0
Vistas: 354
Último mensaje Septiembre 09, 2019, 10:07:09 am
por 79137913