CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2012 05 27 07:25:06

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil >

REDIMENSIONNER UNE IMAGE - ASPIMAGE

Information sur la source

Note :
Aucune note

Catégorie :Graphique Classé sous :resize, image, redimensionner Niveau :Débutant Date de création :20/04/2005 Vu :32 871

Auteur : Keneyda

Ecrire un message privé

Commentaire sur cette source (5)

Ajouter un commentaire et/ou une note

Description

Je cherchais un code pouvant redimensionner une image avec AspImage et j'ai eu beaucoup de mal à en trouver une... Donc maintenant que j'en ai trouvé une, je fais profiter ceux qui cherche comme moi. Cette source n'est donc pas de moi mais elle peut aider...

Source

<%'Création de l’instance sur l’image
Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage "D:\Sites Web\site\image.jpg"
'Affiche les caractéristiques de l’image
Response.Write "Height = " & Image.MaxY & "<br>Width = " & Image.MaxX
'Calcul du coefficient et redimensionnement de l’image
'200 est un exemple de coef pour redimmentionner l'image...
IF Image.MaxX > 200 THEN
Coefficient=200/Image.MaxX
W=int(Image.MaxX*Coefficient)
H=int(Image.MaxY*Coefficient)
Image.ResizeR W,H
END IF
'Défini le nom et l’emplacement de la nouvelle image
Image.FileName = "D:\Sites Web\site\image-petite.jpg"
'Sauvegarde de l'image
Image.SaveImage%>

<%'Création de l&#8217;instance sur l&#8217;image
Set Image = Server.CreateObject("AspImage.Image")
Image.LoadImage "D:\Sites Web\site\image.jpg"
'Affiche les caractéristiques de l&#8217;image
Response.Write "Height = " & Image.MaxY & "<br>Width = " & Image.MaxX
'Calcul du coefficient et redimensionnement de l&#8217;image
'200 est un exemple de coef pour redimmentionner l'image...
IF Image.MaxX > 200 THEN
Coefficient=200/Image.MaxX
W=int(Image.MaxX*Coefficient)
H=int(Image.MaxY*Coefficient)
Image.ResizeR W,H
END IF
'Défini le nom et l&#8217;emplacement de la nouvelle image
Image.FileName = "D:\Sites Web\site\image-petite.jpg"
'Sauvegarde de l'image
Image.SaveImage%>

Conclusion

AspImage est un composant payant... que l'on peut trouver sur http://www.serverobjects.com/comp/Aspimage.htm, le probleme outre que cela soit payant est qu'il ne montre pas vraiement d'exemple de ce composant...

Sources de la même categorie

CLASS CHARTS, HISTOGRAMCHART ET SECTORCHART par The Red Man

EXTRACTION D'INFORMATIONS IPTC D'UNE IMAGE par teenage

MANIPULATION D'IMAGES EN TEMPS RÉEL - RÉDUCTION COMPRESSION ... par badrbadr

UTILISATION D’AJAX ET D’UN WEBSERVICE POUR LA GÉNÉRATION D’I... par tikrimi

THCHARTS: HISTOGRAMME AVEC PLUSIEURS SERIES par TUHABITES

Toutes les sources de la catégorie Graphique

Sources en rapport avec celle ci

AJOUTER UNE IMAGE À UN BOUTON par PascalCmoa

INSERER UNE PHOTO DANS UN CHAMP BLOB (IMAGE) DANS TABLE SQL ... par Myke

GRIDVIEW AVEC DES IMAGES par CSharpJSharp

INSERTION / RECUPERATION D'IMAGE STOCKEE DANS UNE DB MS SQL ... par jimmy69

ASP.NET - SAUVEGARDER UNE IMAGE À PARTIR D'UNE URL par fabrice69

Commentaires et avis

Commentaire de Jackboy le 20/04/2005 22:09:47

salut !

il doit etre relativement simple de faire un activex en vb ou en c++ qui réalise cette action. je regarde de ce cote et je ten donne des nouvelles...

Commentaire de Jackboy le 20/04/2005 22:12:23

plus un objet COM

Commentaire de Jackboy le 20/04/2005 22:24:35

en c#, utilitaire pour redimentionner sont image !

<%@ Control Language="c#" %>
<%@ import Namespace="System.Collections" %>
<%@ import Namespace="System.Drawing" %>
<%@ import Namespace="System.Drawing.Imaging" %>
<%@ import Namespace="System.Drawing.Drawing2D" %>
<%@ import Namespace="System.IO" %>
<%@ import Namespace="System.Text" %>
<script runat="server">

    protected Size ThumbNailSize = new Size(75,75);
    protected string ThumbNailName = "_thumbnail";

    private void Page_Load(object sender, System.EventArgs e)
    {
        if (RequestObject("generate") == "1")
        {
           GenerateThumbNailImagesForFolder(RequestObject("imgfolder"));
        }
         this.RW(GenerateHTMLPageForFolder(RequestObject("imgfolder")));
    }



          public void GenerateThumbNailImagesForFolder(string FolderName)
          {
               string sPhysicalPath="";
               string sFileName="";
               string sThumbName="";

               sPhysicalPath = Server.MapPath(FolderName);

               DirectoryInfo oDir = new DirectoryInfo(sPhysicalPath);

              try
              {

                    FileInfo[] oDeleteFiles = oDir.GetFiles();

                    foreach (FileInfo oFile in oDeleteFiles)
                    {
                       sFileName = oFile.Name.ToLower();
                       if (sFileName.IndexOf("thumbnail") > 0) { oFile.Delete(); }
                     }

                     FileInfo[] oFiles = oDir.GetFiles();

                     foreach (FileInfo oFile in oFiles)
                    {

                        sFileName = oFile.Name.ToLower();

                        sThumbName = sFileName.Replace(".",this.ThumbNailName + ".");

                        if (sFileName.IndexOf(".gif") > 0)
                        {
                           this.GenerateThumbNail(sPhysicalPath,sFileName,sThumbName,ImageFormat.Gif);
                        }
                        if (sFileName.IndexOf(".jpg") > 0)
                        {
                           this.GenerateThumbNail(sPhysicalPath,sFileName,sThumbName,ImageFormat.Jpeg);
                        }
                        if (sFileName.IndexOf(".bmp") > 0)
                       {
                          this.GenerateThumbNail(sPhysicalPath,sFileName,sThumbName,ImageFormat.Bmp);
                       }

                     }
             }
            catch (Exception) { }
          }

       public void GenerateThumbNail(string sPhysicalPath,string sOrgFileName,string sThumbNailFileName,ImageFormat oFormat)
         {

              try
              {

                     System.Drawing.Image oImg = System.Drawing.Image.FromFile(sPhysicalPath + @"\" + sOrgFileName);

                     System.Drawing.Image oThumbNail = new Bitmap(this.ThumbNailSize.Width, this.ThumbNailSize.Height, oImg.PixelFormat);

                     Graphics oGraphic =  Graphics.FromImage(oThumbNail);

                     oGraphic.CompositingQuality = CompositingQuality.HighQuality ;

                     oGraphic.SmoothingMode = SmoothingMode.HighQuality ;

                     oGraphic.InterpolationMode = InterpolationMode.HighQualityBicubic ;

                     Rectangle oRectangle = new Rectangle(0, 0, this.ThumbNailSize.Width, this.ThumbNailSize.Height);

                     oGraphic.DrawImage(oImg, oRectangle);

                     oThumbNail.Save(sPhysicalPath + @"\" + sThumbNailFileName,oFormat);

                     oImg.Dispose();

              }
              catch (Exception)  { }

         }

          public string GenerateHTMLPageForFolder(string FolderName)
          {

             string sPhysicalPath="";
             string sFileName="";
             int nFound=0;
             int nCol=0;
             int nMaxCols=7;

             StringBuilder oString = new StringBuilder();

             oString.Append("<html><body><table border=0 cellspacing=2 cellpadding=2 width='80%' align=center>");

              try
              {

                   sPhysicalPath = Server.MapPath(FolderName);
                   DirectoryInfo oDir = new DirectoryInfo(sPhysicalPath);
                   FileInfo[] oFiles = oDir.GetFiles();

                    foreach (FileInfo oFile in oFiles)
                    {

                       sFileName = oFile.Name.ToLower();
                       nFound++;

                       if (sFileName.IndexOf("thumbnail") > 0)
                       {

                         nCol++;
                         if (nCol == 1) { oString.Append("<tr>"); }

                          if ((sFileName.IndexOf(".gif") > 0) || (sFileName.IndexOf(".jpg") > 0) || (sFileName.IndexOf(".bmp") > 0))
                          {
                             oString.Append("<td align=left>");
                             oString.Append("<a href=" + FolderName + "/" + sFileName.Replace(this.ThumbNailName,"") + " target=_blank>");
                             oString.Append("<img src=" + FolderName + "/" + sFileName + " border=0>");
                             oString.Append("</a>");
                             oString.Append("</td>");
                          }

                          if (nCol == nMaxCols) { nCol = 0; oString.Append("</tr>"); }

                        }

                     }

                    if ((nFound >0) && (nCol < nMaxCols))
                    {
                       nCol = nMaxCols - nCol;
                       oString.Append("<td colspan=" + nCol.ToString() + "> </td></tr>");
                    }

               }
               catch (Exception) {  }

               oString.Append("</table></body></html>");

               return oString.ToString();

          }

          public void RW(string sVal)
          {
            Response.Write(sVal +'\n');
          }

          public string RequestObject(string sName)
          {
            string sRet="";
            try { sRet = Request[sName].ToString().Trim(); }
            catch (Exception) { sRet = "";}
            return sRet;
          }

</script>

Commentaire de mimo_predator le 03/02/2006 18:24:10

Merci pour vous deux pour le codes. mais y aurait-il une possibilitée de le faire en C++ ou bien en VB car dans mon site je n'utilise pas C#. sauf si je dois m y mettre lol.

Commentaire de alpacino78000 le 19/06/2008 17:29:26

salut..
SVP j'ai un probleme..
je travaille avec VS2008, j'ai crée un programme qui permet d'exporter un raport crées avec crystal report , l'export sous forme de HTML.
j'ai un probleme avec les images, l'export essaye de telecharger les images dans un emplacement specifique sur mon disque..
comment je vai faire pour fixer une adresse URL pour ces images.
merci bien

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

asp image [ par nick774 ] Bonjour, Je souhaiterais redimensionner toutes mes images se trouvant dans un dossier précis de mon site. J'ai pensé à utiliser le com Redimensionner une image! [ par Jos ] Bonjour, je chercher quelque chose (fonction, dll, etc...) permettant de redimensionner une image, autant jpg que gif. Je ne souhaite pas redimension Redimensionner une image [ par Jos ] Y a-t-il un activex, un dll ou peu importe permettant de redimensionner une image, en ASP. Ne me parlez pas des propriétés heigth et width de la bali redimensionner image de fond [ par smoron ] comment fait on pour redimensionner une image utilisee en fond d ecran ou en fond de cellule de tableau? redimensionner une image [ par poussmouss ] Bonjour, jr voulais savoir si il existait une solution (avec ou sans composant) pour redimensioner une image qui a été uploader. J'entends par la, red redimensionner une image [ par lyderic ] salut tout le mondevoila g un petit problème à la construction d'un site non c serieuvoila je chercher a fair un truc qui parait assez simple comme ca redimensionner et sauvegarder une image en asp [ par sarahmalik ] salut tlm,je suis débutante en asp. Je développe une application Web qui doit gérer une galerie photo. ca peut vous paraître Ouvrir en lecture une image Web [ par zigxag ] Bonjour !Je voudrais récupérer une image qui se trouve à une URL donnée, afin de pouvoir l'insérer dans SQLServer. J'ai essay Renomer un fichier [ par CCJ ] Salut!Quand je fais une capture d'ecran avec :Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As L inserer un dossier d image dans une gallerie photo [ par gaou44 ] bonjour a tous qqun sa saurait il comment opérer pour inserer un dossier d image dans une gallerie photo en asp comme celle du community starter kit.

Nos sponsors

Derniers Blogs

IMAGINE CUP 2012, MAKE A SIGN EN FINALE par junarnoalg

KINECT 1.5 IS OUT ! par Vko

LES ACTUALITéS DE LA SEMAINE SUR C2I.FR (14 MAI - 20 MAI) par richardc

REACTIVE EXTENSIONS : CONSOMMER DES SERVICES AVEC RX PARTIE 3, LES PIèGES à éVITER par Groc

SHAREPOINT BLOG SITE, PROBLèME D'ARCHIVES par junarnoalg

Forum

RE : GRIDVIEW CHECKBOX par jacksparoow

GESTION DE BIBLIOTHèQUE par tdiniss

GRIDVIEW CHECKBOX par invent001

OUTIL MYSQL par nobla

AFFICHAGE D'IMAGES OU ZONE COULEUR SUR UN PLAN par yok28

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Realisation d-une version 2 d-un site e-commerce existant sous prestashop-REPUBLICATION
Budget : 5 000€
Recherche Infogerance Serveur Debian Linux
Budget : 1 800€
Creation d-un site vitrine avec MagentO
Budget : 2 000€

Logiciels

sDEVIS-FACTURES vlPRO (8.1.0.3)
SDEVIS-FACTURES VLPRO (8.1.0.3)

sDEVIS-FACTURES vlPRO a été mis au point pour les particuliers, créateurs, entrepreneurs, artisa...

Cliquez pour télécharger sDEVIS-FACTURES vlPRO
974 Application Server (12.2.4.6)
974 APPLICATION SERVER (12.2.4.6)

Développez de puissantes applications dans un environnement de 'cloud computing', clusterisé, séc...

Cliquez pour télécharger 974 Application Server
vPicture (1.4.2.1)
VPICTURE (1.4.2.1)

Avec vPicture, hébergez vos images facilement et rapidement. vPicture est un utilitaire simple, ...

Cliquez pour télécharger vPicture
Easy-Planning (2.2.1.6)
EASY-PLANNING (2.2.1.6)

Easy-Planning permet de créer des plannings sous la représentation de diagrammes et est adapté au...

Cliquez pour télécharger Easy-Planning
COM-BACKUP (2.0)
COM-BACKUP (2.0)

COM-BACKUP est un logiciel de sauvegarde qui permet de planifier les sauvegardes de vos dossiers ...

Cliquez pour télécharger COM-BACKUP