找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 26546|回复: 5

[技术讨论] VBS如何实现截屏/屏幕截图

[复制链接]
发表于 2015-9-10 10:51:17 | 显示全部楼层 |阅读模式
本帖最后由 pcl_test 于 2017-4-16 18:46 编辑

倒是有个利用第三方软件的方法,
调用该软件,然后该软件会自动截图。

但这样,违背了用VBS的初衷。
用VBS就是因为它方便快捷。要是用第三方软件的话,干脆我们直接用VB写一个好了。

那么...只好调用Excel用VBA去做了。
有什么更好的方法吗?
发表于 2015-9-10 13:47:17 | 显示全部楼层
没有什么好方法,因为实现截屏原本就不是微软设计vbs的初衷,更多的扩展功能是使用者的意愿,所以才会有第三方的出现,实际vbs调用vba也是这种方式,利用的是vba能调用API的特性,查了下网上的代码,调用的是USER32模块中的keybd_event函数实现的截屏
 楼主| 发表于 2015-9-10 14:50:31 | 显示全部楼层
回复 2# pcl_test


微软设计vbs的初衷是什么?
有相关的链接吗?
发表于 2015-9-10 16:43:01 | 显示全部楼层
回复 3# Tianorder
了解下当年的微软和网景的浏览器之争以及vbs/vb/vba、javascript/vbscript/jscript的关系史

评分

参与人数 1技术 +1 收起 理由
Tianorder + 1 感觉VBScript能做到的,JavaScript都能做到 ...

查看全部评分

发表于 2015-9-10 23:08:39 | 显示全部楼层
其实是可以的,只可惜我的代码找不到了

评分

参与人数 2技术 +2 收起 理由
Tianorder + 1 你也在这里啊。我很崇拜你的
CrLf + 1 前来膜拜

查看全部评分

发表于 2015-9-13 00:06:43 | 显示全部楼层
本帖最后由 yu2n 于 2015-9-13 00:39 编辑
  1. 'VBS截屏.vbs
  2. '  Win7x64 测试通过(已安装Word2007):
  3. '参考:
  4. '  http://qtp.blogspot.com/2010/02/screenshot-vbscript.html
  5. '  http://www.fixitscripts.com/problems/take-screenshot-of-current-user-s-session


  6. With CreateObject("Word.Basic")
  7.   .Sendkeys "{prtsc}"
  8.   .FileQuit '.AppClose
  9. End With

  10. Msgbox "已将屏幕截取到剪贴板。", vbSystemModal+vbInformation, WScript.ScriptName
复制代码

评分

参与人数 2PB +10 技术 +1 收起 理由
Tianorder + 1 嗯,接下来就是裁图的问题了
pcl_test + 10 感谢分享

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 10:41 , Processed in 0.017307 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表