word 嵌入图片 和相关的问题，大侠请帮忙。

Set wordApp = CreateObject("Word.Application") 
Set wordDoc =wordApp.Documents.Open("d:\FileReceiveTemplate.doc",True)
Set wordTable = wordDoc.Tables.Item(1)
wordTable.Cell(10,1).select
wordApp.Selection.InlineShapes.AddPicture "d:\jpg", True,True   （****)
Call wordDoc.saveas("d:\b.doc")
Call wordApp.Quit 
Set wordTable=Nothing
Set wordDoc=Nothing
Set wordApp = Nothing b/s下的服务器上执行该代码，当执行到 (***)所在的行时，服务器上跳出是否保存"FileReceiveTemplate.doc"的对话框，程序停止。什么方法可以不跳出对话筐。生成word以后，客户端上word已内嵌的在ie的方式打开。有没有方法使客户端打开的word使只读不能修改的。谢谢