USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  TRATAMENTO DE ARQUIVO TEXTO NO VB
Aginaldo
JUIZ DE FORA
MG - BRASIL
Postada em 14/09/2005 19:16 hs            
PREZADOS SENHORES
 
BOA NOITE
 
PRECISO DE AJUDA PARA TRATAR UM ARQUIVO TEXTO, SEGUINTE
 
TENHO O ARQUIVO QUE A CADA 5 LINHA PERTENCE A UM REGISTRO
 
EXEMPLO DA LINHA 1 A 5 PERTENCE A UM REGISTRO
              DA LINHA 6 A 10 PERTENCE A OUTRO REGISTO E ASSIM CONSECULTIVAMENTE
PRECISO LER ESTE ARQUIVO E JOGAR OS CAMPOS PARA UMA BASE DE DADOS RESPEITANDO OS RESPECTIVOS REGISTRO
 
ALGUME PODE ME AJUDAR
FICAREI GRATO
ATT: AGINALDO
 
     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 14/09/2005 19:33 hs         

Private Sub Command1_Click()
  Dim strABc As String
  Dim intContador As Integer
  Open "C:Temp     este.txt" For Input As #1
  Do While Not EOF(1)
    Line Input #1, strABc
    intContador = intContador + 1
    'fechou registro
    If Int(intContador / 5) = intContador / 5 Then
      MsgBox "registro " + Str(intContador / 5)
    End If
  Loop
  Close #1
  MsgBox "ok"
End Sub

 

 
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página