If im.PostedFile.ContentLength > MaxLength Then
      ' Controlla il peso dell'immagine
      lblMessage.Text = "Il file è di dimensioni troppo elevate. Max " & MaxLength / 1024 & "KB"
    ElseIf Not im.PostedFile.ContentType.StartsWith("image") Then
      ' Controlla il tipo di file caricato in bytes
      lblMessage.Text = "Il file non è valido. Dev'essere un'immagine"
    Else
      ' Controlla le dimensioni dell'immagine
      Dim img As System.Drawing.Image = System.Drawing.Image.FromStream(imageUpload.PostedFile.InputStream)
      If img.Width > MaxWidth OrElse img.Height > MaxHeight Then
        lblMessage.Text = "L'immagine ha dimensioni superiori a quelle consentite. Max " & MaxWidth & "x" & MaxHeight
      Else
        ' Se è tutto ok, salvo l'immagine
        im.PostedFile.SaveAs(Server.MapPath("images/" & imageUpload.FileName))
      End If
    End If