SaveWithStamp example for Access 2.0

This example saves the image in a JPEG file that includes a thumbnail (stamp) image. It then loads the thumbnail from the new file.

SavedMode = Me![LEAD1].Object.ScaleMode 
Me![LEAD1].Object.ScaleMode = 3 ' Use pixels for sizing the thumbnail
Me![LEAD1].Object.SaveWithStamp "c:\lead\images\stamp.jpg", FILE_JPEG, 24, 30, 150, 100, 24
Me![LEAD1].Object.ScaleMode = SavedMode
Me![LEAD1].Object.LoadStamp "c:\lead\images\stamp.jpg"
Me![LEAD1].Object.ForceRepaint