Plugin ImageManager: auto resize uploaded pic

Hello christophe,

You are right, the max widht and height config settings do not affect the upload through the manager. They only work for the replacement of an image through the editor.
But I've updated the ImageManager for you. There were several updates that I need to pack together which I finally did when I saw your post. You can download the new package at http://www.saulmade.nl/FCKeditor/FCKPlugins.php .

(The package at FCKeditor's plugins section (http://sourceforge.net/tracker/index.ph ... tid=737639) is deprecated as the admin, Gerhard, does not reply on my request to update the package there)

Should you want to say thank you, try paypal You can use any button at http://www.saulmade.nl/FCKeditor/FCKPlugins.php (just above the demo below on the page) or go to paypal.com and send something to mail a*t saulmade.nl .

definitely remember what? Paypal?

Well, when talking about Paypal, that's very easy, just go to Paypal.com or my fckplugins page and click a button.

About the ImageManager you were !Paypal! right. I forgot some code. Just download it again !Paypal!!Paypal! and it should work.

(I have included the watermarks used on my !Paypal! demo)

Cheers

!Paypal! couldn't resist

Hello Christophe!

>For the standard/default FCKEditor install, I have managed to add a PHP function which checks and resize the >image right after the upload, and this works just great !

Do you mind posting here the code you used? I just need the same feature and nothing more, so it's not worth adding plugins and so on.
Thank you very much!

Cristina

<%@ Import Namespace=System.Drawing %>
<%@ Import Namespace=System.Drawing.Imaging %>
<%@ Import Namespace=System %>
<%@ Import Namespace=System.Web %>
<script language="VB" runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
   
        Dim originalimg, thumb As System.Drawing.Image
        Dim FileName As String
        Dim inp As New IntPtr()
        Dim width, height As Integer
        Dim rootpath, is_error As String
      is_error = 0
      
        rootpath = Server.MapPath("/") ' Get Root Application Folder
        FileName = rootpath & Request.QueryString("f") ' Root Folder + filename
        Try
            originalimg = originalimg.FromFile(FileName) ' Fetch User Filename
        Catch
            originalimg = originalimg.FromFile(rootpath & "/images/image.png") ' Fetch close.gif
         is_error = 1
        End Try

        ' Get width using QueryString.
        If Request.QueryString("width") = Nothing Then
            ' Use original Width. 
         If is_error = 1 then
            width = originalimg.Width
         else
            width = 100
         end if
        ElseIf Request.QueryString("width") = 0 Then  ' Assign default width of 100.
            width = 100
        Else
            width = Request.QueryString("width") ' Use User Specified width.
        End If

        ' Get height using QueryString.
        If Request.QueryString("height") = Nothing Then
         If is_error = 1 then
            height =  originalimg.Height
         else
            height = 75
         end if
        ElseIf Request.QueryString("height") = 0 Then ' Assign default height of 100.
            height = 75
        Else
            height = Request.QueryString("height") ' Use User Specified height.
        End If

        thumb = originalimg.GetThumbnailImage(width, height, Nothing, inp)

        ' Sending Response JPEG type to the browser. 
        Response.ContentType = "image/jpeg"
        thumb.Save(Response.OutputStream, Imaging.ImageFormat.Jpeg)

        ' Disposing the objects.
        originalimg.Dispose()
        thumb.Dispose()

  End Sub
</script>