PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Images dans SQL Server 2000
Images dans SQL Server 2000
Iniciado por soum_baba, set., 19 2005 7:32 PM - 1 resposta
Publicado em setembro, 19 2005 - 7:32 PM
Bonjour,

J'ai une base de donnée SQL server 2000 contenant des images stockées au format varbinary. je voudrais extraire les images et les enregistrer dans des fichiers JPEG ou TIF.

Quelqu'un as tu une idée ?

Merci d'avance.

Soumaré.
Publicado em setembro, 20 2005 - 9:08 AM
Un peur "Boeuf" mais aucun soucis de fonctionnement. Par contre avec emploi des fonctions SQL.....

Code :
// (NOLOCK) permet de ne pas verrouiller l'enrgt dans SQL2000
// PHOTOS est un champ image visible ou non, a voir
// Requete est une chaine
// ClefPhoto est la variable d'aacès à la photo


requete = "select photo from photos (NOLOCK) where reference = " + ClefPhoto
SI SQLExec(requete,"REQ1") ALORS
SI SQLFetch("REQ1") = 0 ALORS PHOTOS = SQLLitMémo("REQ1",1)
SINON
// on traite l'erreur
FIN
Multitâche()
SQLFerme("REQ1")

Fichier = fSélecteur(fRépertoireTemp(),"TEMPO.JPG","Sauvegarde de la photographie","Bitmap" + TAB + "*.JPG","JPG",fselExiste+fselCrée)

SI (Fichier <> "") ALORS dSauveImageJPEG("PHOTOS",Fichier); Info("Sauvegarde de l'image faite.")

et voilà, pas très complexe, il suffit de chercher un peu ...
Salutations