pessoal, tenho que modificar uma linha que um arq. via programa, uso assim para

lê este arquivo, mais nao sei como alterar uma linha nele.

 

ex:

 

    Set s = fsys.OpenTextFile("C:SYSTEM COMexeparametros.ini", ForReading)
    Do While BR <> "[Banco_Rede]"
        If s.AtEndOfStream Then Exit Sub
        txt = s.ReadLine
        BR = txt
    Loop
    txt = s.ReadLine
    BR = txt
    Banco_Rede = BR

 

 

neste exemplo leio a rede mais gostatia de alterar o caminho no arq. txt.

e salvar o mesmo.

 

 

desde ja agradeço

 

jongle

 

 

 

 

 

Dim wStrReg As String * 80
Open App.Path & "Meuarquivo.txt" For Random As 1 Len = 80
wStrReg = "String de Dados para alterar" & vbCrLf
Put #1, 1, wStrReg 'Altera o registro da primeira linha
'Put #1, 5, wStrReg 'Altera o registro da quinta linha
Close #1

obrigado carlos. resolveu meu problema.

 

 

jongle