[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[系统相关] [已解决]批处理怎样把需要的字符复制到windows剪贴板?

假如我要将c:\windows\system32\drivers  该路径或相关内容复制到剪贴板。请问下该怎样做呢?

  1. mshta vbscript:clipboarddata.setdata("text","c:\windows\system32\drivers")(close)
复制代码

TOP

我太爱你了,老大,谢谢你的帮忙。

TOP

假如在P当中呢。。
可以做到这点吗?

TOP

回复 4楼 的帖子

2楼的不是P么?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

如果是要复制一个文件呢?rat兄可以实现吗?
虚心使人进步 细节成就完美

TOP

回复 6楼 的帖子

sure.
拷贝cmd.exe到剪贴板,可以写个无临时文件版的或隐藏运行版的,这段代码优势在于“可移植性”应当还行吧:)
  1. @echo off
  2. call :CF2CB "%COMSPEC%"
  3. exit/b
  4. ::CopyFile2ClipBoard
  5. :CF2CB
  6. setlocal
  7. set f=%~1&set h=cf2cb
  8. set e=^>^>%h% echo&cd.>%h%
  9. %e% ^<img id="i" src="%f:\=\\%"^>
  10. %e% ^<script language="vbscript"^>
  11. %e% With document.body.createControlRange
  12. %e%  .add document.getElementById("i")
  13. %e%  .execCommand "Copy"
  14. %e% End With
  15. %e% Close
  16. %e% ^</script^>
  17. mshta "%cd%\%h%"
  18. del %h%
  19. goto :eof
复制代码

[ 本帖最后由 rat 于 2008-12-2 03:22 编辑 ]

TOP

原帖由 rat 于 2008-11-4 16:25 发表
mshta vbscript:clipboarddata.setdata("text","c:\windows\system32\drivers")(close)

这个代码可以用,但如果想把如下字符串复制到剪贴板,就不行了。。。
  1. [aaa]
  2. [/aaa]
复制代码

TOP

返回列表