Set Word = CreateObject(“Word.Application”)
Set Tasks = Word.Tasks
For Each Task in Tasks
If Task.Visible Then response.Write Task.Name &”
”
Next
Word.Quit
Set word=nothing
set tasks=nothing
版权声明:本文为Jamie2012原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。