Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
15 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 15 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
TRY BEGIN E FLOCK()

17/4/2017, 10:32 por AJC

Pessoal estou tendo alguns problemas de gravação em rede, estou usando
try begin, mas vi algo na …

Comentários: 0

Exportar Dados Campo Memo Tabela DBF

10/4/2017, 10:28 por fcampos

Olá bom dia.

Estou tentando exportar os dados de algumas tabelas em formato dbf pelo foxpro.
O …

Comentários: 2

Função EVL()

8/4/2017, 12:18 por Clebervfp

Bom dia a todos.
Vim compartilhar de uma Função do próprio VFP que me benefício muito.
Função …

Comentários: 0

COMO BLOQUEAR REGISTRO OU TABELA NO VISUAL FOXPRO PARA GRAVAÇÃO EM REDE

3/4/2017, 10:29 por AJC

Pessoal estou tendo um problema que acontece sempre busco na minha tabela de clientes o ultimo …

Comentários: 2

Controlar Scanner Twain

31/3/2017, 17:31 por Kleber R Bento

Estou usando o EZTW32.DLL para criar uma ferramenta que escaneia e gera PDF. Porém com esses …

Comentários: 0

Estatísticas
Temos 7063 usuários registrados
O último usuário registrado atende pelo nome de Bravera

Os nossos membros postaram um total de 47 mensagens em 24 assuntos

vb6 - manipulando arquivo texto

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido vb6 - manipulando arquivo texto

Mensagem por edspicer em 6/7/2011, 13:40

Boa tarde pessoal.

eu tenho uma rotina que le um arquivo txt.
ele vai lendo linha a linha, ate ai esta tudo normal.

acontece que eu tenho um vetor que armazena algumas informacoes da linha, e em uma determinada parte eu preciso voltar a ler o arquivo txt sem precisar fecha-lo.

alguem saberia dizer se isto é possível?

desde ja agradeco a ajuda de todos.
avatar
edspicer
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por Marcos Guedes em 7/7/2011, 14:03

vc precisa voltar à linha 1, é isto?
como estais fazendo?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por edspicer em 11/7/2011, 16:05

nao necessariamente preciso voltar a primeira linha, mas contanto que eu precise voltar a ler. Atualmente nao consigo fazer , eu tenho que ficar abrindo o mesmo arqivo duas vezes em metodos diferentres para pegar as informacoes de que preciso.
avatar
edspicer
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por Marcos Guedes em 12/7/2011, 14:55

Como estais fazendo?

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por edspicer em 14/7/2011, 15:03

Código:
Dim icont as integer

    lArq = FreeFile
    Open ArquivoHtml For Input As #lArq
    Do While Not EOF(lArq)
        Line Input #lArq, strLinha
          for x =  1 to ubound(meuVetor)
              meuVetor(icont) = mid(strlinha,posicao1,posicaoN)
          next
      Close #lArq
avatar
edspicer
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por m@r<3|o em 1/8/2011, 18:37

Edspicer ...... Dificil entender ..... a pergunta
Conseguiu resolver ..... tenho algo parecido ..
onde Varro o diretorio atrás de TXT e integro eles no ACCESS
cheguei até fazer um exemplo
algo como no Banco.MDB
se tiver 00001
ele le o TXT com nome 00001 .... importa nesse formato de layout
"00001","DATA"," algo assim
Caso um exemplo assim ajudar .... tento procurar


tipo ...... ve se isso resolve


Código:
    strFileName = App.Path & "\TXT\" & txtArquivo.Text
   
    Open strFileName For Input As #1
    Dim intCod, strPagam, linha, linha2, linha3 As String
    Dim p_virgula, u_aspas, s_virgula As Integer
   
    Do Until EOF(1)
        linha = strFileName
       
        Line Input #1, linha
        p_virgula = InStr(linha, ",")
        linha2 = Mid(linha, p_virgula + 1)
        s_virgula = InStr(linha2, ",")
       
        intCod = LTrim(Mid(linha, 2, p_virgula - 3))
        strPagam = LTrim(Mid(linha2, 2, s_virgula - 3))
     
      SQL = "UPDATE buscar SET Pagam = '" & strPagam & "'"
      SQL = SQL & " Where cod_fox = '" & intCod & "'"
      cn.Execute SQL
       
       
    Loop
    Close #1
    cn.Close
   

O exemplo que fiz disso , é basicamente o trecho de codigo acima .

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por edspicer em 2/8/2011, 14:54

Marcelo,

Basicamente precisaria abrir um txt, contendo algumas linhas, como no exemplo abaixo:

Linha 1
Linha 2
Linha n
....

suponhamos que eu esteja na linha n, dai eu quero voltar na linha 1 ou 2, mas sem precisar fechar e abrir o arquivo.

Mas vou dar uma olhada no exemplo que voce citou, para ver como ele faz.
obrigado.
avatar
edspicer
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: vb6 - manipulando arquivo texto

Mensagem por edspicer em 17/8/2011, 16:59

Marcelo,
Testei o codigo, foi necessário algumas adaptações.
acabei tambem por resolver de outra forma.
Obrigado pela ajuda.

Resolvido.
avatar
edspicer
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum