IMPORTAR ARQUIVO CSV UTILIZANDO V.B.

USUARIO.EXCLUIDOS 22/08/2007 10:01:20
#231995
Para esclarecer melhor, estou precisando importar um arquivo em formato CSV (delimitado por ;) para uma aplicação desenvolvida em VB e que utiliza o Banco de dados Access . Existe algum comando ou script que faça esta importação?
USUARIO.EXCLUIDOS 22/08/2007 10:11:12
#231998


Ae...tenta isso



Private Sub Command1_Click()

Dim Caminho As String

Caminho = "C:\WINDOWS\Desktop\arquivo.csv"

Dim Teste As String

Dim Dados() As String

Open Caminho For Input As #1

Do Until EOF(1)

Line Input #1, Teste

Dados = Split(Teste, ",")

'como no meu caso saum somente 3 colunas foi facil...

MsgBox Dados(0) & " - " & Dados(1) & "-" & Dados(2)

DoEvents

Loop

Close #1

End Sub


aí no lugar do MsgBox..coloque o destino q quiser...txt, banco de dados..sei lá

boa sorte e sucesso
USUARIO.EXCLUIDOS 22/08/2007 10:58:29
#232008
segue um exemplo...


att,

Marcelo Bressan
Tópico encerrado , respostas não são mais permitidas