Ir para conteúdo

POWERED BY:

Arquivado

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

Maximum2003

Gravar os tipos de arquivo DOC, TXT, XLS, ZIP, JPG e GIF em campo BLOB

Recommended Posts

Preciso gravar os tipos de arquivo DOC, TXT, XLS, ZIP, JPG e GIF no Oracle. Qual a melhor maneira de eu fazer isso? Criei um campo do tipo BLOB e utilizo o ASP como plataforma...Valeu galera!!!!!Gabriel.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá,

 

Você está no caminho certo, criou uma tabela BLOB (Binary Large Objects) no Oracle para armazenar esses tipos de arquivos, agora você terá alguns problemas nas conversões de funções do ASP para gravar no oracle.

 

Para resolver isso, olhe nas colunas Oracle da iMasters, o Method OO4O, ele é um Driver específico para plataforma windows que não impacta muito no serviços com LOBs, existe funções próprias para trabalhar com as LOBS, sendo tudo gerenciados via ASP.

 

Dê uma olhada e se tiver mais dúvidas, poste aqui novamente.

 

Abraços, http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara,

 

Converta o arquivo para binario, é possível que essa função ajude:

 

' Método que converte um arquivo para BLOB, para realizar inclusão na base de dados

' @param - arquivo (arquivo a ser convertido)

' @return - arquivo no formato blob (binary)

' @author - jader tavares

' @version - 1.0.0

' @since 01/09/2006

 

Public Function converteBLOB(arquivo)

 

Dim objStream

Dim arquivoTemporario

Dim objBuffer

Dim retorno

 

' criando objeto

Set objStream = Server.CreateObject("ADODB.Stream")

 

' abrindo um novo espaco na memoria

objStream.Open

 

' determinando o arquivo temporario

arquivoTemporario = arquivo

 

' abrindo o arquivo a partir do diretorio do arquivoTemporario

objStream.LoadFromFile arquivoTemporario

 

' lendo o arquivoTemporario

'objBuffer = ObjStream.Read()

 

' definindo a posicao

objStream.Position = 0

 

' determinando o tipo de arquivo (1 = AdTypeBinary)

objStream.Type = adTypeBinary

 

set converteBLOB = ObjStream

 

End Function

 

set blob = clsDownload.converteBLOB(strPath &"\" & str1File)

 

.AddNew

 

.Fields("doc_Blob").Value = blob.Read()

 

.Update

.Close

 

 

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

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.