举报
While 1 Local $obj = ObjGet("", "Word.Application") If IsObj($obj) then $filename=$obj.documents(1).name Msgbox(1,'test',$filename) ExitLoop EndIf Wend
171239435 发表于 2019-2-23 20:47 代码中间不全的地方补充了一下。看下行不行
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-7-27 13:46 , Processed in 0.128001 second(s), 20 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.