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

 

 


Tema destacado:


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Encontrar URLs en un richtextbox		0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Encontrar URLs en un richtextbox  (Leído 3,851 veces)
Jubjub


Desconectado Desconectado

Mensajes: 708


Lay Ladie lay,...


Ver Perfil WWW
Encontrar URLs en un richtextbox
« en: 22 Marzo 2008, 16:19 pm »
Estoy haciendo un bot y necesitaria saber como puedo sacar las URLs de un Richtextbox y guardarlas en un txt, en distintas lineas.
Gracias!  ;)
En línea
Jugando con Fósforos,  hacking con un tono diferente


.
porno
Hadess_inf
Desesperado
Colaborador
***
Desconectado Desconectado

Mensajes: 2.048


Nueva Vida


Ver Perfil WWW
Re: Encontrar URLs en un richtextbox
« Respuesta #1 en: 22 Marzo 2008, 16:27 pm »
Te refieres a capturar las url que se escriben en un textbox. ??? Seria algo asi como en el chat, que cuando yo escribo www.google.com sabe que es una pagina web ¿ ?.(Perdonen la redundancia).

Haber si explicas mejor porque no entiendo.
Saludos
En línea
Mis proyectos compartidos

* Proyecto Intranet Colegio
* Proyecto Sistema Finanzas
Jubjub


Desconectado Desconectado

Mensajes: 708


Lay Ladie lay,...


Ver Perfil WWW
Re: Encontrar URLs en un richtextbox
« Respuesta #2 en: 22 Marzo 2008, 16:40 pm »
Hay un rich textbox con texto, y dispersas por el texto hay URLs, lo que quiero hacer es sacar esas URLs u guardarlas en un txt.

Texto inicial:
Citar
(PTP)payingcash-bosman

http://et-mails.com/scripts/runner.php?EA=200801259879518636


(PTP)xray-cash-netpig

http://et-mails.com/scripts/runner.php?EA=200365251339518636


(PTP)aceptr-ivymails

http://et-mails.com/scripts/runner.php?EA=208801251789518636


(PTP)xray-cashs-redrose

http://et-mails.com/scripts/runner.php?EA=200801259845518636


(PTP)xray-cash-bosman

http://et-mails.com/scripts/runner.php?EA=200133978980125636


(PTP)cosplaymails-cccfl

http://et-mails.com/scripts/runner.php?EA=208703395125118636


Txt final

Citar
http://et-mails.com/scripts/runner.php?EA=200801259879518636
http://et-mails.com/scripts/runner.php?EA=200365251339518636
http://et-mails.com/scripts/runner.php?EA=208801251789518636
http://et-mails.com/scripts/runner.php?EA=200801259845518636
http://et-mails.com/scripts/runner.php?EA=200133978980125636
http://et-mails.com/scripts/runner.php?EA=208703395125118636
« Última modificación: 22 Marzo 2008, 16:44 pm por jubjub » En línea
Jugando con Fósforos,  hacking con un tono diferente


.
porno
Sin Nick xD


Desconectado Desconectado

Mensajes: 443


Ö


Ver Perfil
Re: Encontrar URLs en un richtextbox
« Respuesta #3 en: 23 Marzo 2008, 06:26 am »
Yo lo intente con lincks y no pude XD pero con url's si, se me ocurio copiar el texto de el foco en el portapapeles y despues vaciarlo en el textbox despues de haverlo pasdo por un filtro (solo queria cierto tipo de urls)

ojala te sirva eso por que de momento no tengo el codigo y no lo recuerdo

salu2
En línea
Yo solo creería en un Dios que supiese bailar.
Hadess_inf
Desesperado
Colaborador
***
Desconectado Desconectado

Mensajes: 2.048


Nueva Vida


Ver Perfil WWW
Re: Encontrar URLs en un richtextbox
« Respuesta #4 en: 23 Marzo 2008, 14:26 pm »
Recorre todas las posiciones del control y almacenalos en una variable, si empieza a capturar una similitud con una web, pues esa es un url.
En línea
Mis proyectos compartidos

* Proyecto Intranet Colegio
* Proyecto Sistema Finanzas
Jubjub


Desconectado Desconectado

Mensajes: 708


Lay Ladie lay,...


Ver Perfil WWW
Re: Encontrar URLs en un richtextbox
« Respuesta #5 en: 23 Marzo 2008, 21:04 pm »
Muchas gracias por las respuestas, a ver si lo consigo  :)
En línea
Jugando con Fósforos,  hacking con un tono diferente


.
porno
Jubjub


Desconectado Desconectado

Mensajes: 708


Lay Ladie lay,...


Ver Perfil WWW
Re: Encontrar URLs en un richtextbox [SOLUCIONADO]
« Respuesta #6 en: 24 Marzo 2008, 19:56 pm »
Ya esta solucionado usando if. Muchas gracias por la ayuda!  :)


Código
  1.         Text1.Select(ze, 1)
  2.         ze = ze + 1
  3.         cont = (Text1.SelectedText)
  4.         If cont = "h" Then
  5.             Text1.Select(ze, 1)
  6.             ze = ze + 1
  7.             cont = (Text1.SelectedText)
  8.             If cont = "t" Then
  9.                 Text1.Select(ze, 1)
  10.                 ze = ze + 1
  11.                 cont = (Text1.SelectedText)
  12.                 If cont = "t" Then
  13.                     Text1.Select(ze, 1)
  14.                     ze = ze + 1
  15.                     cont = (Text1.SelectedText)
  16.                     If cont = "p" Then
  17.                         Text1.Select(ze, 1)
  18.                         ze = ze + 1
  19.                         cont = (Text1.SelectedText)
  20.                         If cont = ":" Then
  21.                             Text1.Select(ze, 1)
  22.                             ze = ze + 1
  23.                             cont = (Text1.SelectedText)
  24.                             If cont = "/" Then
  25.                                 Text1.Select(ze, 1)
  26.                                 ze = ze + 1
  27.                                 cont = (Text1.SelectedText)
  28.                                 If cont = "/" Then
  29.                                     For i = 0 To 53
  30.                                         Text1.Select(ze, 1)
  31.                                         ze = ze + 1
  32.                                         temp = (Text1.SelectedText)
  33.                                         dir = dir + temp
  34.                                         If i = 53 Then
  35.                                             fox.Navigate(dir)
  36.                                             dir = ""
  37.                                             Timer1.Enabled = False
  38.                                             Timer3.Enabled = True
  39.  
  40.  
  41.                                         End If
  42.                                     Next
  43.  
  44.  
  45.  
  46.                                 End If
  47.                             End If
  48.                         End If
  49.                     End If
  50.                 End If
  51.             End If
  52.         End If
En línea
Jugando con Fósforos,  hacking con un tono diferente


.
porno
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
reescribir URLS
Desarrollo Web 		Zeroql 0 1,409 Último mensaje 2 Octubre 2011, 16:09 pm
por Zeroql
Obtener Urls navegadores
Programación Visual Basic 		noele1995 5 3,052 Último mensaje 31 Mayo 2012, 21:53 pm
por noele1995
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines