AddaPicturetoaMicrosoftWordDocument

Demonstration script that adds a picture (C:\Scripts\Logo.jog) to
a Microsoft Word document

代码如下:

Set objWord = CreateObject("Word.Application") 
objWord.Visible = True 
Set objDoc = objWord.Documents.Add() 
Set objSelection = objWord.Selection 

Set objShape = objDoc.Shapes 
objShape.AddPicture("C:\Scripts\Logo.jpg") 

AddaPicturetoaMicrosoftWordDocument_javascript技巧