Olá Paulo..
Onde eu trabalho, temos uma tabela Imagem que guarda as fotos dos alunos no
banco.
E esse campo imagem é no formato Long Raw.
Mas fazemos isso pelo VB 6.0.
Mas antes de inserir a imagem, utilizamos a função abaixo para "ajustar".
Sub ObjetoGrava(Campo As Field, Arquivo As String)
Dim Chunk() As Byte
Dim TamanhoArquivo As Long
Dim SubChunks As Long
Dim fragmento As Long
If Arquivo <> "" Then
ArquivoDados = FreeFile
Open Arquivo For Binary Access Read As ArquivoDados
TamanhoArquivo = LOF(ArquivoDados)' Tamanho do arquivo
If TamanhoArquivo = 0 Then
Close ArquivoDados
Exit Sub
End If
SubChunks = TamanhoArquivo \ TamanhoChunk
fragmento = TamanhoArquivo Mod TamanhoChunk
ReDim Chunk(TamanhoChunk)
For i = 1 To SubChunks
Get ArquivoDados, , Chunk()
Campo.AppendChunk Chunk()
Next i
ReDim Chunk(fragmento)
Get ArquivoDados, , Chunk()
Campo.AppendChunk Chunk()
Close ArquivoDados
End If
End Sub
Depois fazemos um RS.update apenas.
Att.
On 5/4/07, pauloperaz <[EMAIL PROTECTED]> wrote:
>
> Boa tarde
>
> Tenho aqui o Oracle 9.2.0.5.0 em Suse ES 9,
> minha tabela tem um campo LONG RAW,
> tenho a necessidade de inserir imagens neste
> campo, mas nao estou conseguindo, soh achei
> documentação para campo BLOB, mas como utilizo
> uma versão antiga do Crystal preciso utilizar
> este mesmo campo LONG RAW!
> utilizo o Package UTL_FILE para manipular.
> Alguem teria algum modelo de inserção de imagens
> em PL/SQL em campos LONG RAW, por favor.
>
> Muito Obrigado
> Paulo
>
>
>
--
Cristiano Peixoto Bernardi
GSM: (19) 9274-8586
Comercial: (19) 3512-1778
MSN: [EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
