Discussion :

[oursquetaire]

Bonjour,
Je travail sous windev 10 et j'utilise une base Firebird.
Je développe une appli multi-utilisateur. Je souhaite pouvoir enregistrer une image en base (dans un champ blob) pour qu'elle puisse être visible par tous les utilisateurs.
Voila 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
 
//Sélection de l'image dans l'arborescence de l'utilisateur courant
IM_1 = fSélecteurImage("", "Fichier.bmp", "Sélectionner une image", "JPEG,.....
(*.JPG)"+TAB+"*.jpg"+RC+"BMP (*.BMP)"+TAB+"*.bmp")
 
//Insertion de IM_1 en base
"INSERT INTO TABLE (IMAGE = IM_1)"
//Exection requete
 
 
Puis pour afficher l'image je fais:
"SELECT INTO TABLE IMAGE"
//Execution requete
 
Puis :
Nom_champ_Image = SQLLitCol(sNomReq,1)

Et la ca n'affiche rien...
Est ce que c'est bien comme ca qu'on doit afficher une image depuis une base de donnée?

Merci d'avance

[Emmanuel Lecoester]

Pour insérer :

Code :

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

1
2
 
insert into matable (colonnes) values (mesvaleurs)

Pour récupérer

Code :

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

1
2
 
select colonnes from matable

Si l'analyse FB est déclarée dans WinDev => HlitPremier + les méthodes de gestion des mémos.

[oursquetaire]

Merci,
en fait c'était pas vraiment les requêtes qui posaient problème, c'était les fonctions d'utilisation de mémos que je ne connaissais pas.
Pour info, si ca peut servir à d'autre:

mettre l'image en base:

Code :

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

1
2
 
insert into matable monimage values {WDMemoBinaire("+(M_1..Nom)+")}

récupérer l'image dans un fichier temporaire:

Code :

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

1
2
3
4
5
6
7
 
ChRepertoireTemp est une chaîne = ExtraitChaîne(SysEnvironnement("TEMP"),2,"=") //on recupere le chemin complet
chNomFichier1 est une chaîne = ChRepertoireTemp +"\temp1.jpg" 
 
Select monimage from matable
 
HExtraitMémo(SQLLitMémo(sNomReq,1),chNomFichier1)

Voila, ca fonctionne avec ca.
Bonne journée à vous.