[Aporte]Leer Archivo y Modificar Linea Especificada

[ranslsad]

Hola amigos, estuve leyendo y encontre un codigo que me sirvio y la verdad me suluciono ams de lo uno podria pensar.
La verdad hacia mucho... muchoo tiempo que lo queria pero nunca lo busque y ara que tope con el quiero compartirlo ya que es bien sencillo y me encanta

Este codigo lee un texto y tu mismo especificas que linea quieres cambiar...

Código [Seleccionar] Expandir

Dim sRuta As String, aDatos() As String, i As Integer
sRuta = App.Path & "\texts.txt"
Open sRuta For Input As #1
aDatos = Split(Input(LOF(1), #1), vbNewLine)
Close #1
aDatos(1) = "Linea modificada"
aDatos(3) = "Y esta también"
Open sRuta For Output As #1
For i = LBound(aDatos) To UBound(aDatos)
    Print #1, aDatos(i)
Next i
Close #1

No es nada del otro mundo pero pienso que para aquel que se complica la vida.. con esto se soluciona!

Salu2

Ranslsad

[Tengu]

es verdad creo q con esto le solucionas la vida a unos cuantos ya q eh visto q muchos preguntan cosas asi en el foro. espero usen el boton "buscar" jjejej