delimitador vbcrlf

[elezekiel]

hola gente, estoy manejando una cadena que obtengo de la fuente de una pagina en html y lo printeo en un richtextbox, lo que quiero es que el salto de linea sea el delimitador usado en un split o for each, me da igual, el problema es que no me lo toma.. es como si fuera un string solo.

Código (vb) [Seleccionar] Expandir

NumberFile = FreeFile
For Each daTos In Split(txtUrl.Text, vbNewLine + vbCrLf)
Open App.Path & "/Date1.txt" For Output As #NumberFile
Print #NumberFile, daTos
Next daTos
Close #NumberFile

Mi idea es el codigo html obtenido de la pagina guardarlo en un txt de la misma forma con los saltos de linea y eso pero no puedo.. me lo guarda pero es uuna cadena sola que sale con cuadrados q creo que son el salto de linea.

se agradece!
saluddd

[Miseryk]

hola gente, estoy manejando una cadena que obtengo de la fuente de una pagina en html y lo printeo en un richtextbox, lo que quiero es que el salto de linea sea el delimitador usado en un split o for each, me da igual, el problema es que no me lo toma.. es como si fuera un string solo.

Código (vb) [Seleccionar] Expandir

NumberFile = FreeFile
For Each daTos In Split(txtUrl.Text, vbNewLine + vbCrLf)
Open App.Path & "/Date1.txt" For Output As #NumberFile
Print #NumberFile, daTos
Next daTos
Close #NumberFile

Mi idea es el codigo html obtenido de la pagina guardarlo en un txt de la misma forma con los saltos de linea y eso pero no puedo.. me lo guarda pero es uuna cadena sola que sale con cuadrados q creo que son el salto de linea.

se agradece!
saluddd

Intentá con el delimitador Chr(13) => Split(..., Chr(13))

[elezekiel]

gracias por contestar, me hace exactamente lo mismo, incluso intente agregarle en conjunto chr(10) como fin de la cadena.. pero nada.

saludd!

[Miseryk]

Lo último que haría, es copiar el código de la página a un textbox y con un botón pasaría de letras a bytes y analizaría que es lo que "simula" (o lo que es) un cambio de línea.

Saludos.

[elezekiel]

y como podria pasar letras a bytes? alguna sugerencia =/

[HdM]

Hola.

¿No deberías utilizar como delimitador "<br/>" ó "<br>"?

Es posible que haya entendido mal lo que tratas de hacer.

Saludos.

[Miseryk]

Código (vb) [Seleccionar] Expandir


Private Sub Command1_Click()
Dim zBytes() As Byte

zBytes = StrConv(Text1.Text, vbFromUnicode)
Stop
End Sub