- 'VBS截屏.vbs
- ' Win7x64 测试通过(已安装Word2007):
- '参考:
- ' http://qtp.blogspot.com/2010/02/screenshot-vbscript.html
- ' http://www.fixitscripts.com/problems/take-screenshot-of-current-user-s-session
- With CreateObject("Word.Basic")
- .Sendkeys "{prtsc}"
- .FileQuit '.AppClose
- End With
- Msgbox "已将屏幕截取到剪贴板。", vbSystemModal+vbInformation, WScript.ScriptName