Manipuler les champs blobs sous une base externe

**devalender** · 16/08/2011, 15h07

Bonjour a tous
je développe sous firebird 2.5 et windev14.
je suis confronter a la gestion des blobs de type image, quand je parle de gestion entendez par la :

Enregistrer du blob (image) dans la base de donnée,
Affiche du du blob (image) de la base de donnée,

j'ai lu un peu les Mémo binaires mais je ne sais pas comment les manipuler !
merci a tous !

**miripesage** · 16/08/2011, 23h15

Envoyé par devalender

Bonjour a tous
je développe sous firebird 2.5 et windev14.
je suis confronter a la gestion des blobs de type image, quand je parle de gestion entendez par la :

Enregistrer du blob (image) dans la base de donnée,
Affiche du du blob (image) de la base de donnée,

j'ai lu un peu les Mémo binaires mais je ne sais pas comment les manipuler !
merci a tous !

Bonjour, je pense qu'il faut mettre le champ de la BDD à : mémo et affecter le contenu du champ blob au champ image.

**devalender** · 17/08/2011, 16h00

Envoyé par miripesage

Bonjour, je pense qu'il faut mettre le champ de la BDD à : mémo

ce qui est déjà fait.

Envoyé par miripesage

Affecter le contenu du champ blob au champ image.

justement c'est là que se trouve la difficulté

un insert <mon champ blob> ne marche pas ! ya un truc a faire je suppose.

**devalender** · 19/08/2011, 16h16

là encore je reviens

j'ai chercher partout mais j'ai encore pas de solution !

**jurassic pork** · 21/08/2011, 02h18

hello,

je ne sais pas ce que tu utilises pour dialoguer avec ta base de données Firebird (ODBC driver, FB4WD ?). Avec une base de données Firebird (version 2.5) et le driver ODBC Firebird/Interbase ( version 2.0.0.151), je travaille sur une base à 8 tables dont 1 table avec une rubrique BLOB image et une rubrique BLOB texte. Je créée une source de données avec cette base par ODBCad32.exe. Je fabrique un projet en RAD automatique dont l'analyse contient la table à 2 blobs en connexion accès natif /autre accès OLE DB. Je compile. Pour lister les enregistrements pas de problème : dans la table créée par le RAD je vois bien tous les enregistrements , les photos (BLOB image) et les notes (BLOB texte). Dans la fenêtre de fiche (Modifier) je rajoute un bouton qui change le contenu du champ image de la photo. Je fais un "valider". Après avoir eu un message d'erreur de type "column unknown" j'ai changé par odbc32 la configuration du driver pour ma base. J'ai coché l'option autoquoted identifier et la plus de problèmes. La photo que je change est bien inscrite en base.

Ami calmant, J.P

**devalender** · 23/08/2011, 17h26

Envoyé par jurassic pork

je ne sais pas ce que tu utilises pour dialoguer avec ta base de données Firebird (ODBC driver, FB4WD ?).

j'utilise un driver ODBC.

Envoyé par jurassic pork

jJe fabrique un projet en RAD automatique dont l'analyse contient la table à 2 blobs en connexion accès natif /autre accès OLE DB. Je compile. Pour lister les enregistrements pas de problème : dans la table créée par le RAD je vois bien tous les enregistrements , les photos (BLOB image) et les notes (BLOB texte). Dans la fenêtre de fiche (Modifier) je rajoute un bouton qui change le contenu du champ image de la photo. Je fais un "valider". Après avoir eu un message d'erreur de type "column unknown" j'ai changé par odbc32 la configuration du driver pour ma base. J'ai coché l'option autoquoted identifier et la plus de problèmes.

ok la je pense que dans votre base vous avez déjà vos champs blob,
mais

quelle type vous donnez a vos champs blobs au niveau de l'analyse dans windev ?
quelle est aussi le type du champ au niveau du composant table qui affiche les données image ?

Merçi pour ce tuyau en tout cas je vais creuser

**jurassic pork** · 26/08/2011, 18h16

bonjour,
dans l'analyse les champs blob sont de type :
son,image,binaire sous type image (memo binaire) pour photos et
texte mémo texte pour notes

dans la table : image pour photos.
texte pour notes.

Ami calmant, J.P

**devalender** · 29/08/2011, 11h51

ok en résumé

Dans mon analyse :
type :son,image,binaire
sous type :image (memo binaire) pour photos

Dans la table ou mon champ de saisie :
image pour photos.

A partir la je lance mon rad et dans le formulaire qui est produit je met un bouton pour charger l'image:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
sNomFichier est une chaîne 	// Nom du fichier correspondant à la capture
 
// Sélection de la capture
sNomFichier= fSélecteurImage("", "", "Ouvrir une Photo")
 
// On vérifie la sélection de l'utilisateur
SI sNomFichier="" ALORS RETOUR
 
// Affichage du fichier
MAPHOTO=sNomFichier

Ensuite dans le bonton d'insertion voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
sCommande ="INSERT INTO NEW_TABLE1("+... 
"MONNUM, "+...			
"MAPHOTO )"+...			
"VALUES 
("+...
Quote(MONNUM..Nom)+","+...
Quote(MAPHOTO..Nom)+")"
 
SI SQLExec(sCommande,"REQFIC")=Faux ALORS
// Vérifie l'erreur d'identifiant déjà utilisé
SQLInfoGene("REQFIC")
Info("Erreur SQL : " + SQL.MesErreur)
SI SQL.Erreur<>"23000" ALORS
// Pas Erreur de doublon: on affiche l'erreur
SQLErreur("REQFIC")
RETOUR
SINON
// Erreur de doublon
Erreur("Erreur de doublon lors de l'ajout de l'enregistrement")
SQLFerme("REQFIC")
RETOUR
FIN
SINON
// Insertion correcte
SQLFerme("REQFIC")
SORTIR
FIN

En faisant un Trace(" ",sCommande) j'ai pas l'image mais le chemin de l'image, d’où ma question ! comment charger l'image avant l'insertion ?

**jurassic pork** · 29/08/2011, 17h12

Bonjour,

dans la doc PCSOFT de SQLExec c'est écrit :

Gestion des mémos binaire

Pour écrire un mémo binaire dans une table (avec un ordre SQL UPDATE ou INSERT), il faut utiliser la syntaxe suivante dans le texte de la requête :

{WDMemoBinaire('<NomFichier>' [,'Fichier']}
Copier ce code

Fichier (valeur par défaut) indique que le mémo est un mémo binaire (issu d'un fichier)
WDMemoBinaire est un mot réservé

<NomFichier> est le nom physique d'un fichier

{WDMemoBinaire('<NomFichier>' [,'FichierTexte']}
Copier ce code

FichierTexte indique que le mémo est un mémo texte (issu d'un fichier)
WDMemoBinaire est un mot réservé

<NomFichier> est le nom physique d'un fichier

Par exemple :

// Insertion du fichier C:\PHOTO\DUPONT.BMP dans un mémo binaire
TexteRequête = "INSERT INTO CLIENT VALUES ('DUPONT', 'Jean'," + ...
"{WDMemoBinaire('C:\PHOTO\DUPONT.BMP')})"
SQLExec(TexteRequête, "REQ1")
// Insertion du fichier C:\DOC\LETTRE.TXT dans un mémo texte
TexteRequête = "INSERT INTO CLIENT VALUES ('DUPUIS', 'Christophe'," + ...
"{WDMemoBinaire('C:\DOC\LETTRE.TXT', 'FichierTexte')})"
SQLExec(TexteRequête, "REQ1")

Ami calmant, J.P

**devalender** · 29/08/2011, 17h41

ok je teste et je fais le retour

**devalender** · 29/08/2011, 18h49

je viens de tester ça marche

! mais j'ai un autre soucis c'est que on remarque que :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
{WDMemoBinaire('C:\PHOTO\DUPONT.BMP')}

On a en Rouge le chemin d'accès à l'image, donc on peut charger ce chemin dans un champ image et ensuite faire ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
sCommande ="INSERT INTO NEW_TABLE1 ( "+...
"MONNUM, "+...			
"MAPHOTO )"+...			
"VALUES ("+...
Quote(MONNUM..Nom)+","+...
"{WDMemoBinaire("PHOTO")})"

Ici PHOTO est une variable paramètre, qui contient le chemin d'accès a l'image mais j'ai un message d'erreur :

Erreur :Erreur de syntaxe sur la chaîne : peut provenir d'un caractère " à l'intérieur de la chaîne qui doit être doublé ou bien d'une erreur de syntaxe à la suite de la chaîne.
FEN_Fiche_NEW_TABLE1.PROCEDURE.ValideLigne, Procédure locale, ligne 19, colonne 22

ou ai je péché ?

**hpascal** · 29/08/2011, 19h41

Bonjour

Si PHOTO est une variable alors il faut mettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"{WDMemoBinaire('" + PHOTO + "')})"

**devalender** · 01/09/2011, 12h21

ok la ça marche !
merci pour tous

**devalender** · 01/09/2011, 15h52

Bon là j'ai pas envie d'abuser mais j'ai un autre soucis, pour la récupréation c'est ok ! j'ai reussi a insérer plus de 50.000 articles avec photos dans la base de donnée.
maintenant il faut bien les afficher a la demande !
Donc voici ce que j'ai fait :

1/ table windev avec un champ de type photo pour contenir le blob
2/ code issu du rad :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
// Alimentation de la table sans filtre (1000 lignes)
SI ExecSelectTable("")=Faux ALORS
	Sablier(Faux)
	Ferme
FIN

avec un extrait de la fonction afficheligne() contenu dans la fonction ExecSelectTable()

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
PROCEDURE AfficheLigne(sNomReq=gsNomReq)	
// Procédure appelée après chaque affichage d'enregistrement
nNumCol est un entier
 
// Affichage dans les champs
nNumCol = 0
nNumCol++; SQLAffChamp(sNomReq,"MONNUM",nNumCol,SQLTypeColonne("NEW_TABLE1","MONNUM"))
nNumCol++; SQLAffChamp(sNomReq,"MAPHOTO",nNumCol,SQLTypeColonne("NEW_TABLE1","MAPHOTO"))

Et là j'ai pas d'affichage de mon image. j'ai fait un tour ici http://doc.pcsoft.fr/fr-FR/browse.aw...s-wlangage,489 mais

pas de solution.
j'ai encore besion d'aide.
Merçi a tous.

**devalender** · 08/09/2011, 16h30

En fouinant sur le forum je crois avoir trouver la reponse :
http://www.developpez.net/forums/d11...xte-interbase/
Poue ceux ça interesse.
merci a tous

**Flikiu** · 20/04/2020, 15h23

9 ans après vos Posts, j'ai résolu mon problème grâce à vous.

Merci

Manipuler les champs blobs sous une base externe [WD14]

WinDev

Discussions similaires

Partager

Partager