Bonjour
En fait j'ai essayé cet exemple et je suis encore débutante dans vb.net
mais rien ne ce passe à l'execution

voilà le code
*****
Dim MonRepertoirePhysique As String = "I:\Cuisines\"

    Dim MonFichierImage As String = "a.jpg"

    Dim MonFichierMiniature As String = "a2.jpg"

    Dim LargeurMiniature As Integer = 100 'On fixe la hauteur de l'image

    Dim HauteurMiniature As Integer = 0 'la Hauteur sera calculée
    Dim bmp As New System.Drawing.Bitmap(MonRepertoirePhysique & MonFichierImage)

    Dim MonCallBackDeCalvaire = New System.Drawing.Image.GetThumbnailImageAbort(AddressOf ThumbnailCallback)
    Function ThumbnailCallback() As Boolean
        Return False
    End Function


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load



    

        HauteurMiniature = (bmp.Size.Height * LargeurMiniature / bmp.Size.Width)
        bmp = bmp.GetThumbnailImage(LargeurMiniature, HauteurMiniature, MonCallBackDeCalvaire, IntPtr.Zero)
        bmp.Save(MonRepertoirePhysique & MonFichierMiniature, System.Drawing.Imaging.ImageFormat.Jpeg)
        bmp.Dispose()


    End Sub
*****
Merci d'avance