Salvar dados de TXT no Oracle

[AndersonDutra 4]

Alguém sabe se é possível salvar dados de um TXT em um banco de dados Oracle???

[Luizgrs 0]

Para ler o conteúdo de um arquivo de texto você pode fazer assim:

 

Open "caminho_do_arquivo" For Input As #1	While Not EOF(1)		Line Input #1, linha 'a cada volta no loop a variável linha irá pegar uma linha do arquivo	WendClose #1

[AndersonDutra 4]

Com isso eu consigo identificar quanto acaba um coluna e começa outra, pois o texta está divido em 3 colunas.

[Luizgrs 0]

Você vai ter que tratar as linhas.Isso dependerá do formato no qual elas estiverem.Alguma funções como Mid, Left, Right, Instr, Instrrev,Split podem ser úteis.

[ortolani 0]

nussa, dessa ai eu só conheço a "mid" e a "split"... pra que serve as outras?

[Luizgrs 0]

Left, pega um tanto de caracteres começando da esquerda.

Right, pega um tanto de caracteres começando da direita

Instr, procura por um texto, a partir de uma certa posição, dentro de outro texto e retorna a posição.

Instrrev, é igual à Instr mas procura a partir do fim do texto.

 

Assim:

texto = "Fórum VB do Imasters"MsgBox Left(texto, 3) 'mostra "Fór"MsgBox Right(texto, 3) 'mostra "ers"'irá procurar por "um" na variavel texto a partir da posição 1MsgBox InStr(1, texto, "um") 'irá retornar 4'irá procurar pela letra "m" na variavel texto começando de seu fimMsgBox InStrRev(texto, "m") 'irá retornar 14

As funções instr e instrrev tem mais uns parâmetro opcionais.