IMPORTAR ARQUIVO CSV UTILIZANDO V.B.
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?
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
segue um exemplo...
att,
Marcelo Bressan
att,
Marcelo Bressan
Tópico encerrado , respostas não são mais permitidas