Resize Image: GetThumbnailImage

**Miki73** · 01-01-2006, 03:53

Per capire come funziona questo benedetto ridimensionamento immagine mi basterebbe che funzioni almeno un esempio banale al massimo!
Questo è il codice che non mi funziona, se qualcuno di voi ne avete uno diverso funzionante me lo potrebbe postare così da poterlo studiare? (L'errore sta da qualche parte nella procedura, togliendola mi visualizza l'immagine senza ridimensionarla)

codice:

<html>
<head><title>Hello world - La prima applicazione web</title></head>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<script language="VB" runat=server>
    Public Sub CreateThumbnail(ByVal srcpath As String, ByVal destpath As String)
        Dim img As System.Drawing.Image = System.Drawing.Image.FromFile("tr.jpg")
        Dim imgthumb As System.Drawing.Image = img.GetThumbnailImage(100, 75, Nothing, New System.IntPtr(0))
        imgthumb.Save("tr2.jpg", ImageFormat.Jpeg)
        img.Dispose()
        imgthumb.Dispose()
    End Sub
</script>
<body>
<asp:Image ID="imgthumb" Runat="server" ImageUrl="tr.jpg" />
</body>
</html>

**cassano** · 01-01-2006, 15:20

dove ti da l'errore di preciso ???

**Miki73** · 01-01-2006, 17:22

A dire il vero non mi dava errore per il codice precedentemente postato, mi visualizzava semplicemente l'immagine con le sue dimensioni originali.

Il mio problema principale è che non so come richiamare la funzione (passaggio parametri compreso) nel corpo del documento!

codice:

<html>
<head><title>Hello world - La prima applicazione web</title></head>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<script language="VB" runat=server>
    Public Sub CreateThumbnail(ByVal srcpath As String, ByVal destpath As String)
        Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(srcpath)
        Dim imgthumb As System.Drawing.Image = img.GetThumbnailImage(90, 90, Nothing, New System.IntPtr(0))
        imgthumb.Save(destpath, ImageFormat.Jpeg)
        img.Dispose()
        imgthumb.Dispose()
    End Sub
</script>
<body>
...
</body>
</html>

comunque se qualcuno ha un altro esempio da pubblicare per chiarirmi i miei dubbi sull'utilizzo della funzione GetThumbnailImage...

**Miki73** · 01-01-2006, 20:26

non posso sapere in che riga del codice mi da errore, né tantomeno che tipo di errore, in quanto sul server è impostato l'errore generico:

Di default, le applicazioni ASP.NET sono configurate con i messaggi d'errore personalizzati disattivati. Tuttavia, alcuni strumenti di sviluppo Web come Visual Studio.NET creano un file web.config con la modalità customErrors impostata su "RemoteOnly". Per poter attivare i messaggi d'errore dettagliati, occorre assicurarsi che venga rimossa la sezione customErrors nel proprio file web.config o che l'attributo di modalità nella sezione customErrors nel file web.config del sito venga impostato su "Off".

<customerrors mode="off"/>

Si fa notare che impostando la modalità customErrors su "Off" tutti i visitatori del sito Web visualizzeranno il messaggio d'errore dettagliato.

Si tenga presente che, data la natura della piattaforma di hosting condiviso, le modalità "RemoteOnly" e "On" della sezione customErrors sono equivalenti, poiché ogni visitatore del sito Web sfoglia in modo remoto.

tratto da: ASP.NET FAQ

io sul mio pc non ho il Framework .NET, e dato che ho Windows XP Home, mi sembra che non posso neppure installarlo! (leggevo da qualche parte che necessita di WinXP Pro, o Win2000, o WinNT)

**cassano** · 01-01-2006, 22:12

il Framework .NET non mi risulta che su xp home non si puo installare ,"addirittura" va bene su win 2000,quindi installalo senza problemi.

**Miki73** · 01-01-2006, 22:32

già come non detto, qui
Requisiti di sistema per Windows .NET Framework 1.1
leggo che è installabile addirittura su Win98!

P.S. se qualcuno ha qualche esempio sull'utilizzo della funzione GetThumbnailImage è sempre ben accetto :rollo:

**Daniele80** · 02-01-2006, 10:11

Originariamente inviato da Miki73
già come non detto, qui
Requisiti di sistema per Windows .NET Framework 1.1
leggo che è installabile addirittura su Win98!

P.S. se qualcuno ha qualche esempio sull'utilizzo della funzione GetThumbnailImage è sempre ben accetto :rollo:

controlla qua, questo codice l'ho scritto di mia manina a suo tempo e fino ad oggi non mi ha creato problemi, anche se ora l'ho leggermente modificato.

http://forum.europeanwebhost.com/viewtopic.php?t=32

**Miki73** · 22-01-2006, 23:39

ho risolto:

codice:

<html>
<head>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<%@ Page Language="VB" Debug="true" %>
<script language="VB" runat=server>

  Function NewthumbSize(currentwidth, currentheight)
    ' Calculate the Size of the New image
    dim x,y,h,w as Double
    x=currentwidth
    y=currentheight
    'h=Request.QueryString("h")
    'w=Request.QueryString("w")
    h=120
    w=120
    if (x>y) then
      x=w
      y=(w*y)/x
    else
      x=(h*x)/y
      y=h
    end if
    dim NewSize as New Size(x, y)
    return NewSize
  End Function

  Sub Page_Load(Sender As Object, E As EventArgs)
    dim objBMP as System.Drawing.Bitmap
    dim objGraph as System.Drawing.Image
    objBMP = New Bitmap(
      "C:\Programmi\Apache Group\Apache\htdocs\image.JPG")
    dim thumbSize as New size
    thumbSize = NewthumbSize(objBMP.width,objBMP.height)
    objGraph = objBMP.GetThumbnailImage(thumbsize.width,
      thumbsize.height, Nothing, IntPtr.Zero)
    objGraph.Save(Server.MapPath("image_t.JPG"),
      ImageFormat.JPEG)
  End Sub

</script>
</head>
<body Runat="server">
<asp:Image ID="objGraph" Src="image_t.JPG" Runat="server" />
</body>
</html>

ora mi stavo chiedendo come potevo utilizzare questo script richiamandolo più volte inviandogli come parametri larghezza e altezza dell'anteprima nome file d'origine e nome file destinato all'anteprima (forse con un form e quattro parametri passati col get?)

**Daniele80** · 23-01-2006, 00:05

guarda qua un'esempio.

http://forum.europeanwebhost.com/viewtopic.php?t=32

Discussione: Resize Image: GetThumbnailImage

Strumenti discussione

Ricerca discussione

Visualizza

Resize Image: GetThumbnailImage

Permessi di invio