Para recuperar a imagem do banco, n�s fazemos o seguinte:
Call SqlPrepareAndExecute( hSqlPrincipal2,MontaSQL('select IMAGEM from
imagem where CP_MATERIAL = :vQCodMaterial into :strImagem'))
Call SqlFetchNext( hSqlPrincipal2, vNumero )
Call SalPicSetString( picImagem, PIC_FormatObject, strImagem )
Sendo que a vari�vel strImagem � do tipo Long String.
Ricardo Gomes
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, August 15, 2002 4:34 PM
Subject: Re: [sqlwin] SqlServer 2000 X Campo Image
>
> Ricardo...
> Ei fiz o procedimento que vc falou e deu certo na grava��o, eu n�o estou
> conseguindo � fazer o select deste campo e trazer o image para a tela
>
> Obrigado pela ajuda
>
> Ernani
>
>
>
>
>
> "Ricardo Gomes" <[EMAIL PROTECTED]>
>
> Sent by: [EMAIL PROTECTED]
>
>
> 15/08/2002 16:43
>
>
> Please respond to sqlwin
>
>
>
>
>
>
> To: <[EMAIL PROTECTED]>
> cc:
> Subject: Re: [sqlwin] SqlServer 2000 X Campo Image
>
>
> N�s fazemos isso da seguinte forma:
>
> Call SalPicGetString( picImagem, PIC_FormatObject, strImagem )
> Call SqlPrepare(hSqlPrincipal2,'update imagem set IMAGEM = :strImagem
> where CP_MATERIAL = \'P7110001015\'' )
> Call SqlSetLongBindDatatype( 1, SQLLONG_Text )
> Call SqlExecute( hSqlPrincipal2 )
> Call SqlCommit(hSqlPrincipal2)
>
>
> Para que funcione perfeitamente, vc deve atentar para a chave longbuffer
da
> sess�o odbcrtr, do seu sql.ini. Se vc n�o colocar valor para essa chave,
vc
> s� conseguir� gravar imagens com no m�ximo 32Kb. Logo, vc deve colocar um
> valor que representa o tamanho da maior imagem que vc queira gravar no
> banco. Para n�s, as imagens n�o ultrapassam o tamanho de 200Kb, ent�o, por
> seguran�a, colocamos na chave o valor 256000.
>
> Qualquer d�vida, � s� perguntar.
>
> Ricardo.
>
> ----- Original Message -----
> From: <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Thursday, August 15, 2002 3:50 PM
> Subject: [sqlwin] SqlServer 2000 X Campo Image
>
>
> > Boa tarde lista...
> >
> > Gostaria de saber se alguem da lista j� gravou imagens ( jpg, bmp ) em
> > campo image no Sql Server 2000, e se j� qual o procedimento para isto...
> > preciso gravar e buscar a imagem do banco para uma "Picture"
> > Utilizo Centura 1.5 PTF 3
> >
> >
> > Obrigado
> >
> > Ernani
> >
> >
> >
> >
> > Diese Nachricht ist vertraulich. Sie ist ausschliesslich fuer
> > den im Adressfeld ausgewiesenen Adressaten bestimmt.
> > Sollten Sie nicht der vorgesehene Empfaenger sein, so bitten
> > wir um eine kurze Nachricht. Jede unbefugte Weiterleitung
> > oder Fertigung einer Kopie ist unzulaessig. Da wir nicht die
> > Echtheit oder Vollstaendigkeit der in dieser Nachricht
> > enthaltenen Informationen garantieren koennen, schliessen wir
> > die rechtliche Verbindlichkeit der vorstehenden Erklaerungen
> > und Aeusserungen aus. Wir verweisen in diesem Zusammenhang
> > auch auf die fuer die Bank geltenden Regelungen ueber die
> > Verbindlichkeit von Willenserklaerungen mit verpflichtendem
> > Inhalt, die in den bankueblichen Unterschriftenverzeichnissen
> > bekannt gemacht werden.
> >
> > This message is confidential and may be privileged. It is
> > intended solely for the named addressee. If you are not the
> > intended recipient please inform us. Any unauthorised
> > dissemination, distribution or copying hereof is prohibited.
> > As we cannot guarantee the genuineness or completeness of
> > the information contained in this message, the statements
> > set forth above are not legally binding. In connection
> > therewith, we also refer to the governing regulations of
> > WestLB concerning signatory authority published in the
> > standard bank signature lists with regard to the legally
> > binding effect of statements made with the intent to
> > obligate WestLB.
> >
> > Lista de Centura SQLWindows
> > Administrador : [EMAIL PROTECTED]
> > [ http://www.centuraexplorer.com ]
> > Para sair desta lista mande mensagem para:
> > [EMAIL PROTECTED] sem nada no Subject e
> > com o comando a seguir no corpo da msg:
> > "unsubscribe sqlwin" (sem as aspas)
>
> ==============================================
> Lista de Centura SQLWindows
> Administrador : [EMAIL PROTECTED]
> [ http://www.centuraexplorer.com ]
> Para sair desta lista mande mensagem para:
> [EMAIL PROTECTED] sem nada no Subject e
> com o comando a seguir no corpo da msg:
> "unsubscribe sqlwin" (sem as aspas)
> ==============================================
>
>
>
>
>
>
> Diese Nachricht ist vertraulich. Sie ist ausschliesslich fuer
> den im Adressfeld ausgewiesenen Adressaten bestimmt.
> Sollten Sie nicht der vorgesehene Empfaenger sein, so bitten
> wir um eine kurze Nachricht. Jede unbefugte Weiterleitung
> oder Fertigung einer Kopie ist unzulaessig. Da wir nicht die
> Echtheit oder Vollstaendigkeit der in dieser Nachricht
> enthaltenen Informationen garantieren koennen, schliessen wir
> die rechtliche Verbindlichkeit der vorstehenden Erklaerungen
> und Aeusserungen aus. Wir verweisen in diesem Zusammenhang
> auch auf die fuer die Bank geltenden Regelungen ueber die
> Verbindlichkeit von Willenserklaerungen mit verpflichtendem
> Inhalt, die in den bankueblichen Unterschriftenverzeichnissen
> bekannt gemacht werden.
>
> This message is confidential and may be privileged. It is
> intended solely for the named addressee. If you are not the
> intended recipient please inform us. Any unauthorised
> dissemination, distribution or copying hereof is prohibited.
> As we cannot guarantee the genuineness or completeness of
> the information contained in this message, the statements
> set forth above are not legally binding. In connection
> therewith, we also refer to the governing regulations of
> WestLB concerning signatory authority published in the
> standard bank signature lists with regard to the legally
> binding effect of statements made with the intent to
> obligate WestLB.
>
> Lista de Centura SQLWindows
> Administrador : [EMAIL PROTECTED]
> [ http://www.centuraexplorer.com ]
> Para sair desta lista mande mensagem para:
> [EMAIL PROTECTED] sem nada no Subject e
> com o comando a seguir no corpo da msg:
> "unsubscribe sqlwin" (sem as aspas)
==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================
