Insert a logo in an image file in access

S

Sandoval. Alex

lHi.. Im doing a DB to manage images and videos files. The database search
file in a folder caled "For Classify", and when I classify a file, the
original file is deleted an copied in other folder called "Classify" with
other name. The idea is to put a logo in the left corner of the new clasify
file and save it with this logo. It is possible to do this in access? Any
ideas?
Thanks

Note: The database don´t save any files on any table, only the file direction
 
S

Sandoval. Alex

I'm going to try... I'm new in this matters... Is there a Manual to use this
library?
thanks in advance
Alex
 
S

Sandoval. Alex

Hi Alex
Do you have an example to run imagemagick with a command line to
modify/copy or whatever an image from visual basic of access?
Thanks
Alex
 
S

Sandoval. Alex

Hi Alex
Do you have an example to run imagemagick with a command line to
modify/copy or whatever an image from visual basic of access?
Thanks
Alex
 
A

Alex Dybenko

hi,
I am using their com interface like this:
Dim im As ImageMagickObject.MagickImage
Set im = CreateObject("ImageMagickObject.MagickImage.1")

Dim msg As Variant
msg = im.Convert(FilePDF, "-rotate", intAngle & "", FilePNG)

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com
 
A

Alex Dybenko

hi,
I am using their com interface like this:
Dim im As ImageMagickObject.MagickImage
Set im = CreateObject("ImageMagickObject.MagickImage.1")

Dim msg As Variant
msg = im.Convert(FilePDF, "-rotate", intAngle & "", FilePNG)

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com
 
S

Sandoval. Alex

Hi Alex
I try using and modifying the code example that you send me, but when I
execute the procedure, an execution error apear: -2147418113(8000ffff) Error
Method with 'Composite' of object IMagickImage.
Could you help me telling me what I'm doing wrong or what I forget to do?

This is the code that I'm using..

Private Sub Comando0_Click()
Dim im As ImageMagickObject.MagickImage
Dim logo, image, NewFile
Set im = CreateObject("ImageMagickObject.MagickImage.1")

logo = "C:\Documents and Settings\Alejandro\My Documents\logo.JPG"
image = "C:\Documents and Settings\Alejandro\My Documents\ArtCirugia.JPG"
NewFile = "C:\Documents and Settings\Alejandro\My Documents\Salida.JPG"

Dim msg As Variant
msg = im.Composite("-gravity south \" & image & " " & logo & " " & NweFile)

End Sub

Thank
Alejandro
 
S

Sandoval. Alex

Hi Alex
I try using and modifying the code example that you send me, but when I
execute the procedure, an execution error apear: -2147418113(8000ffff) Error
Method with 'Composite' of object IMagickImage.
Could you help me telling me what I'm doing wrong or what I forget to do?

This is the code that I'm using..

Private Sub Comando0_Click()
Dim im As ImageMagickObject.MagickImage
Dim logo, image, NewFile
Set im = CreateObject("ImageMagickObject.MagickImage.1")

logo = "C:\Documents and Settings\Alejandro\My Documents\logo.JPG"
image = "C:\Documents and Settings\Alejandro\My Documents\ArtCirugia.JPG"
NewFile = "C:\Documents and Settings\Alejandro\My Documents\Salida.JPG"

Dim msg As Variant
msg = im.Composite("-gravity south \" & image & " " & logo & " " & NweFile)

End Sub

Thank
Alejandro
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Add a logo to the report header with code 2
Illustrator to Photoshop to Access 2
find subfolders in Outlook file moved from an old computer 1
Logos stored in database 1
Company Logo in Reports 3
Logo in an e-mail signature. 4
Saving from clipboard into file from ms access 0
Images in header using OutputTo to Word 3

Top