Error merge

[alenavafer]

I´m trying this code but always return error

Code: Select all

GflAx.GflAx.1 error '80004005' 

Bad parameters 

The error is in line ctrl2.Merge
The image exists and the path are correct.

Code: Select all

				
Set ctrl2 = server.createobject("GflAx.GflAx")
ctrl2.enablelzw= True
ctrl2.NewBitmap 300, 200
ctrl2.MergeAddFile fotoOrigen, 10, 0, 0
ctrl2.Merge
ctrl2.Saveformat = AX_JPEG
ctrl2.SaveJPEGProgressive = True
ctrl2.saveBitmap fotoOrigen