hola amigos estoy haciendo un bot y me quede un poco trancado por ello vengo aqui a sus ayuda .
Al problema: El bot me devuelve una serie de datos el cual yo quiero sacar los nombres de los integrantes pero no se como hacerlo..bueno se como hacerlo pero solo me saca el de uno.
El dato que me tira el bot con los miembros es este
Del cual yo lo almaceno en una caja de texto pero como hago para sacar los nombre de los usuarios..... karo_mm / siin_escrupulos / cristianypablix / joezzittas
ESTA es mi forma que intente hacer.
Supongamos que el dato lo guarde en un text5.text y quiero poner los user en el text6.text
Pero como ven solo te pone el nombre del ultimo y no de los 4..
Espero con su ajuda gracias..
Al problema: El bot me devuelve una serie de datos el cual yo quiero sacar los nombres de los integrantes pero no se como hacerlo..bueno se como hacerlo pero solo me saca el de uno.
El dato que me tira el bot con los miembros es este
Código [Seleccionar]
<P><A href="http://www.fotolog.com/karo_mm">karo_mm</A> dijo en
<P><A href="http://www.fotolog.com/siin_escrupulos">siin_escrupulos</A> dijo en 06/03/08 20:13 ... </P>
<P><A href="http://www.fotolog.com/cristianypablix">cristianypablix</A> dijo en 04/03/08 22:17 ... </P>
<P><A href="http://www.fotolog.com/joezzittas">joezzittas</A> dijo en 29/02/08 14:08 ... </P>
Del cual yo lo almaceno en una caja de texto pero como hago para sacar los nombre de los usuarios..... karo_mm / siin_escrupulos / cristianypablix / joezzittas
ESTA es mi forma que intente hacer.
Supongamos que el dato lo guarde en un text5.text y quiero poner los user en el text6.text
Código [Seleccionar]
Ide = InStrRev(Text5, "<P><A href=")
da = Ide + 11
da = Mid(Text5, da)
p = Split(da, ">")
p = Split(p(1), "<")
Text6.Text = Text6.Text & p(0)
Pero como ven solo te pone el nombre del ultimo y no de los 4..
Espero con su ajuda gracias..