Discussion :

[zooffy]

Bonjour

Je cherche sur le net depuis deux heures et je trouve un script qui revient tout le temps, mais en C# et visiblement, ça ne se traduit pas en VB.

Bref, mon idée est de pouvoir modifier la largeur d'une image qui vient d'être uploadée sur le serveur.

Alors j'essaie avec le fameux script qui utilise un System.Drawing.Image, mais y a un truc que je capte pas, l'histoire du CallBack (voir code plus bas)
Donc, soit ça marche pas en VB (ce que j'ai vu sur je sais plus quel forum), soit je suis un crétin !
Mais peut être qu'il y a une autre méthode ?

Voici le code que j'essaie de faire fonctionner :

Code :

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

1
2
3
4
 
imageUrl = "/exemple/images/" & imageUrl 
Dim fullSizeImg As System.Drawing.Image = System.Drawing.Image.FromFile(Server.MapPath(imageUrl)) 
Dim dCallBack As New System.Drawing.Image.GetThumbnailImageAbort(ThumbnailCallback)

Sur le ThumbnailCallback il me dit :

System.Drawing.Image.GetThumbnailImageAbort' est un type délégué et il requiert une seule expression 'addressof' en tant qu'unique argument du constructeur.

Et voici l'originale en C# (pour les bilingues)

Code :

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

1
2
3
4
 
imageUrl = "/exemple/images/" + imageUrl;
System.Drawing.Image fullSizeImg = System.Drawing.Image.FromFile(Server.MapPath(imageUrl));
System.Drawing.Image.GetThumbnailImageAbort dCallBack = new System.Drawing.Image.GetThumbnailImageAbort(ThumbnailCallback);

Merci pour votre aide.

[tomlev]

Code :

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

1
2
3
imageUrl = "/exemple/images/" & imageUrl 
Dim fullSizeImg As System.Drawing.Image = System.Drawing.Image.FromFile(Server.MapPath(imageUrl)) 
Dim dCallBack As New System.Drawing.Image.GetThumbnailImageAbort(AddressOf ThumbnailCallback)

enfin je crois...

[lutecefalco]

Le code de tomlev devrait marcher

[zooffy]

Trop fort les gars, merci.

Bon, maintenant, les soucis qui en découlent :
d'abords, fucking Autocomplétion. Si elle c'était mise en route au bon moment j'aurais vu cette erreur et surtout j'aurais mieux compris. Bref !

Sinon, ça passe, disons que le code ne présente plus d'erreur.

Maintenant j'ai un autre soucis et je comprends pas ce que me raconte la doc. Une fois que me transformation est faite, je peux enregistrer le fichier.

si je lui file le même chemin il me plante une "erreur générique dans GDI+" et si je change le nom du fichier il em dit :

ERREUR: Le processus ne peut pas accéder au fichier 'c:\inetpub\wwwroot\App_Themes\GeneralMeet\PhotoMembre\65bb1386-fa7b-4938-a9f0-1853c8998f8cph1.jpg', car il est en cours d'utilisation par un autre processus.

Et là je vois pas bien comment faire pour contourner ce problème.

Mon code actualisé :

Code :

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

1
2
3
4
 
Dim fullSizeImg As System.Drawing.Image = System.Drawing.Image.FromFile(NomCheminPhoto)
        Dim dCallBack As New System.Drawing.Image.GetThumbnailImageAbort(AddressOf ThumbnailCallback)
        fullSizeImg.GetThumbnailImage(400, 300, dCallBack, IntPtr.Zero).Save(Replace(NomCheminPhoto, ".jpg", "tum.jpg"))

[tomlev]

C'est parce que quand tu ouvres une image avec FromFile, le fichier reste ouvert... 2 solutions possibles :
- ouvrir un FileStream sur le fichier, créer l'image à partir du FileStream (Image.FromStream), et refermer le FileStream
- lire les données binaires du fichier avec File.ReadAllBytes, créer un MemoryStream sur ces données, et créer l'image à partir du MemoryStream (encore Image.FromStream)

[zooffy]

Merci tomlev.

L'ennui c'est je capte rien à ce que raconte la doc du FileStream. La manipulation de fichier n'est pas mon truc apparement.

J'arrive pas à comprendre comment on lie le FileStream au fichier sur le serveur. Tu aurais un bout de code en exemple ?