importação de dados por txt

#1

Bom dia,

Estou com a seguinte necessidade:

  • Preciso integrar uma comunicação com um ERP, e para isso, o sistema irá me fornecer um arquivo txt periodicamente com as informações que preciso importar para o supervisório. Como faço para criar um script para ficar monitorando de tempos em tempos se o arquivo existe, se existir, abro ele, leio as informações separadas por ; e renomeio o arquivo para marcar como importado?
#2

Boa tarde,

Para verificar a existência e realizar a leitura do arquivo, sugiro que verifique os artigos abaixo:
http://kb.elipse.com.br/pt-br/questions/2784
http://kb.elipse.com.br/pt-br/questions/526

Para ler as informações separadas por “;”, utilize a função Split:
http://kb.elipse.com.br/pt-br/questions/2102

A função MoveFile pode ser utilizada para renomear o arquivo, e o script pode ser inserido em um tag timer:

Set fso = CreateObject(“Scripting.FileSystemObject”)
fso.MoveFile “C:\app\Arquivo1.txt”, “C:\app\ArquivoRenomeado.txt”

1 Like
#3

Obrigado @delio! Irei implementar…

#4

Délio,

uma segunda duvida:

se ao invés de eu usar assim “C:\app\Arquivo1.txt” e colocar para gerar txt em outra maquina na rede desta maneira “\10.59.1.12\files\SILO\Arquivo1.txt” é possivel?

#5

Ezequiel,

É possível, desde que o usuário tenha permissão de acesso ao arquivo existente na outra máquina.
A pasta deve ser compartilhada ou acessada via compartilhamento administrativo, por exemplo:

Set fso = CreateObject(“Scripting.FileSystemObject”)
fso.MoveFile “\NomeDoMicro\c$\app\Arquivo1.txt”, “\NomeDoMicro\c$\app\ArquivoRenomeado.txt”