Visual Basic - Ayuda con manipulación de ficheros

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda con manipulación de ficheros

Publicado por Javi R.M (27 intervenciones) el 24/09/2001 13:40:03
Hola amigos!! Necesito vuestra ayuda urgentemente.
Mi pregunta es la de ¿como puedo manipular ficheros *.html?
Desde la aplicación que estoy creando he de poder abrir un fichero html y insertar código nuevo, pero no se como recorrer el fichero en busca de la linia que pone </table>, y después añadir el código correspondiente.

y mi otra duda: una vez hecho lo anterior puedo introducir el texto de un textbox en el código html refiriendome a ese objeto??
Por favor necesito ayuda urgentemente, muchas grácias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con manipulación de ficheros

Publicado por BEX4 (119 intervenciones) el 24/09/2001 13:52:41
yo nunca trabaje con html pero para encontrar la linea /table no podes usar el instr ?
y lo otro no lo se por ke nunca trabaje con html
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda con manipulación de ficheros

Publicado por Javier Pérez (170 intervenciones) el 24/09/2001 18:12:36
Desde luego puedes definir un fichero de texto y procesarlo leyendo línea a línea, pero yo utilizaría otra forma. Consiste en utilizar un control RichTextBox, que puede ser oculto si no quieres que se vea. Este control tiene métodos y propiedades que te ayudarán a localizar texto y añadir e incluso eliminar texto. Aquí tienes un pequeño ejemplo de uso:

With RichTextBox1
' Cargamos el fichero en el control
.LoadFile "c:\ruta\fichero.html", rtfText

' Buscamos el texto "</table>"
.Find ("</table>")

' Avanzamos el punto de inserción al final del texto localizado
.SelStart = .SelStart + 8

' Insertamos un texto cualquiera en esa posición
.SelText = "[texto que inserto después de </table>]"

' Buscamos la siguiente ocurrencia de <br>
.Find "<br>"

' La eliminamos
.SelText = ""

' Guardamos el texto resultante en el fichero
.SaveFile "c:\ruta\fichero.html"
End With
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar