Vbweb,

 

Estou tentando incluir dados em um arquivo txt, mas eu queria gravar e ler os dados em linhas especificas tipo na linha 1 grava o dado x na linha 2 grava o dado y, como faço isso ?

 

Rafael

use arquivo binary

Open Filename For Binary As #fnum
temp = len(x)

Put #fnum, , temp

put #fnum,,x
temp = len(y)

Put #fnum,,temp

Put #fnum,,y

 

Para ler

get #fnum,,temp

nstringx = space$(temp)

get #fnum,,nstringx

get #fnum,,temp

nstringy=space$(temp)

get #fnum,,nstringy

 

to fazendo da seguinte forma para ler:

  Dim vServidor As String
  Centralizachild Me
  Open App.Path & "sgi.cfg" For Input As #1
  Input #1, vServidor
  Close #1
  txtServidor.Text = vServidor

mas eu gostaria de ler linhas especificas nesta forma como faço para gravar em linhas especificas ?

 

Rafael