Solved

ActiveX DLL to scale-resize an image (jpg or gif) from ASP.

Posted on 2003-11-21
14
1,853 Views
Last Modified: 2013-11-19
Hi,

I am trying to build an ActiveX Dll for use from ASP, to resize a specified image to the required size.  The image resize must be to scale and the program must support JPG, GIF and BMP.

I have some code (in VB6) which I have started with (not sure if this will only work for bitmaps - if at all).

=============Code in VB6 (the dll file) ====================
Public Sub ResizeImage(sImgPath, sNewPath, iWidth, iHeight)

Form1.Image1.Picture = LoadPicture(sImgPath)
Set Picture1.Picture = Image1.Picture

Form1.Picture1.AutoRedraw = 1

Form1.Picture1.PaintPicture Form1.Image1.Picture, 1, 1, iWidth, iHeight
SavePicture Form1.Picture1.Picture, sNewPath

End Sub


I then call this from the ASP page:

========ASP Code (in the resizeimage.asp file)==========
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim objResize

Set objResize = Server.CreateObject("MyResize.ImageResizer")
MyResize.ResizeImage "C:\Site\htDocs\Futurama.bmp","C:\Site\htDocs\Futurama_sm.bmp",80,60
Set MyResize=Nothing
%>

NB: This is example code and intentionally uses literals.


The ASP page returns "Object Required" on line 6 (MyResize.ResizeImage) - but does seem to execute past the Form1.Image1.Picture = LoadPicture(sImgPath) line because if you pass an invalid filename to MyResize.ResizeImage then the ASP error returns "File not found".

P.S

The DLL file is correctly registered and I cannot see any permissions problems (either to the DLL file or the Image Files).

Please advise if this method is innappropriate for my requirements.

Thank you for your time,

James.
0
Comment
Question by:James_Andrews
  • 4
  • 3
  • 2
  • +2
14 Comments
 
LVL 5

Accepted Solution

by:
rajaamirapu earned 125 total points
ID: 9796424
0
 
LVL 16

Assisted Solution

by:Richie_Simonetti
Richie_Simonetti earned 125 total points
ID: 9796660
0
 
LVL 9

Assisted Solution

by:Dang123
Dang123 earned 125 total points
ID: 9796726
0
Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

 

Author Comment

by:James_Andrews
ID: 9796953
Thanks for your responses.

The resizing of the image is not for display.  I want to take load an image file, "Dog_Big.jpg", and create a scaled down version of it "Dog_Small.jpg".

Sorry if this wasn't clear.
0
 
LVL 28

Assisted Solution

by:AzraSound
AzraSound earned 125 total points
ID: 9799333
Shouldn't your ASP code say:

objResize.ResizeImage ??


Have you tried debugging the dll at all?
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 9799459
:))
, azra is right!
0
 

Author Comment

by:James_Andrews
ID: 9799710
Yes, sorry, that is a typo.

Azra,

I am trying to debug the DLL, but the only error I get is the error from the ASP page, which is object required (the other code does not have that typo).
0
 
LVL 28

Expert Comment

by:AzraSound
ID: 9799769
How far into the code of the DLL do you get when debugging before the error occurs?
0
 

Author Comment

by:James_Andrews
ID: 9799792
From above:

The ASP page returns "Object Required" on line 6 (MyResize.ResizeImage) - but does seem to execute past the Form1.Image1.Picture = LoadPicture(sImgPath) line because if you pass an invalid filename to MyResize.ResizeImage then the ASP error returns "File not found".
0
 
LVL 28

Expert Comment

by:AzraSound
ID: 9799826
Is the picture saved to the file?  I assume Set MyResize = Nothing is a typo as well?

What I meant be debugging was, go to Project -> Properties in your DLL project, select the Debugging tab, ensure "wait for components to be created" option is selected.  Press F5 to put your project in "run" mode with a breakpoint set on the first line in your ResizeImage sub routine.  Then open your ASP page that calls this dll and it should jump into your DLL project allowing you to step through the code.
0
 

Author Comment

by:James_Andrews
ID: 9799865
Yes, thats's a typo as well.  I renamed it MyResize in the code to make it obvious that it was my component - must have missed those two.

OK - Thanks very much - I didn't know you could do that.
0

Featured Post

Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
Many programs have tried to outwit PowerPoint in terms of technology and skill. These programs, however, still lack several characteristics that PowerPoint has possessed from the start. Here's why PowerPoint replacements won't entirely work for desi…
In addition to being a great web-based presentation tool, Prezi also makes it easy to save your presentation as a PDF to share with others as well. Learn how in this tutorial. Select the share icon from the top menu in your Prezi editor: Select "D…
Learn how to download your full Prezi presentation for offline presenting. Prezi doesn’t have to be viewed and shared in a web browser, even with a free account you can download your full presentation to share with others. Be sure to download any vi…

697 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question