De onderstaande module laat zien hoe men een module bouwt met behulp van VBA Automation om een afbeelding in een Worddocument te laden:
ox_word=createobject('word.application')
ox_word.documents.add
ox_word.visible=.T.
ox_word.selection.InlineShapes.AddPicture("C:\sql.bmp",.F.,.T.)
Desgevallend kan de naam van de afbeelding (inclusief de aanhalingstekens) worden vervangen door een Mercator-variabele die verwijst naar een afbeelding.
Bijvoorbeeld:
ox_word.selection.InlineShapes.AddPicture(alltrim(stock.s_image),.F.,.T.)
De andere VBA-methodes en -eigenschappen van Word vindt u in het helpbestand in de zip. (VBAWD10CHM)
Te laden : 0000000726.zip (1984 Kb - 11-02-2004)