Board logo

标题: [问题求助] 求助大神!VBS怎样把文本内容复制到剪贴板，在别的地方进行粘贴？ [打印本页]
作者: wslbbdb    时间: 2015-8-15 11:27     标题: 求助大神!VBS怎样把文本内容复制到剪贴板，在别的地方进行粘贴？

本帖最后由 wslbbdb 于 2015-8-18 11:26 编辑

我想将以c:\1.txt里面在内容复制到剪贴板，在别的地方进行粘贴，求大神们给写个批处理啊，谢谢了


谢谢大家!问题解决了!
作者: pcl_test    时间: 2015-8-15 12:51

本帖最后由 pcl_test 于 2015-8-15 15:20 编辑

bat
  1. @echo off

  2. ::win7及以上系统

  3. type "c:\1.txt"|clip

  4. pause
复制代码
  1. @echo off

  2. type "c:\1.txt"|mshta "javascript:clipboardData.setData('text',new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(0).ReadAll());close()"

  3. pause
复制代码
第三方
http://www.bathome.net/s/tool/in ... filterby=help,label

vbs
  1. set ws=createobject("wscript.shell")

  2. set fso=createobject("scripting.filesystemobject")

  3. set f=fso.opentextfile("c:\1.txt",1)

  4. ws.run "mshta vbscript:ClipBoardData.setData(""Text"","""&f.readall&""")(window.close)", 0, true
复制代码
作者: wslbbdb    时间: 2015-8-15 14:53

谢谢2楼,很好用!
作者: wslbbdb    时间: 2015-8-18 11:23

回复 1# wslbbdb
已解决,谢谢大家!



欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2