Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Aviss

[Resolvido] Blob

Recommended Posts

Oi pessoal,

 

Tenho uma tabela com uma coluna do tipo blob, para armazenar arquivos texto.

Quero exportar o que há na coluna em vários arquivos .txt utilizando Delphi.

 

Alguém sabe como faz para exportar blob em .txt?

 

Já pesquisei bastante e não encontrei. Vou continuar procurando a solução, mas quem puder dar alguma dica, já é de grande ajuda http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

Veja na documentação do Oracle a conversão de BLOB para VARCHAR2 , procure por hextochar e chartohex (creio ser isto).

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu recebi o seguinte conselho de um colega para resolver o problema:

 

while  not OracleDataSet1.eof do begin
	  Writeln(arq, OracleDataSet1.FieldByName('dados').AsString);
	  TBlobField(OracleDataSet1.FieldByName('NOME_ARQTXT_CONTRATO')).SaveToFile('C:\Arquivos\'+ OracleDataSet1.Fieldbyname('nome_contrato').AsString);
	  OracleDataSet1.Next;
end;

onde o o campo Blob é o 'NOME_ARQTXT_CONTRATO'

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.