PC SOFT

FOROS PROFESIONALES
WINDEV, WEBDEV y WINDEV Mobile

Inicio | Mensajes recientes | Conéctese... |  | Español FR
Inicio → WINDEV 2024 → Images dans SQL Server 2000
Images dans SQL Server 2000
Iniciado por SOUMARE, 19,sep. 2005 19:32 - 1 respuesta
#1
Publicado el 19,septiembre 2005 - 19:32
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é.
#2
Publicado el 20,septiembre 2005 - 09:08
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
→ Volver a WINDEV 2024