* 将001.jpg和002.jpg合并输出至001.pdf,注意WORD版本须2007以上
oDoc=CREATEOBJECT('word.application')
odoc.Documents.Add
odoc.Selection.InlineShapes.AddPicture('001.jpg')
odoc.Selection.InlineShapes.AddPicture('002.jpg')
odoc.ActiveDocument.ExportAsFixedFormat('001.pdf',17)
odoc.ActiveDocument.Close(.f.)
odoc.Quit