中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-07 13:00
48,040 主题排行 / 350,125 发帖 / 今日 0 篇 / 48,252 会员排行
DOS批处理 & 脚本技术(批处理室) » 如何赋值给WINDOWS剪贴板
可打印版本  1,037 / 8
第1楼 wyd531 发表于 2007-02-09 03:42
初级用户 发帖 49 积分 137
如何赋值给WINDOWS剪贴板
我想在P中把一个变量的值赋值给WINDOWS剪贴板,不知道能不能实现.
第2楼 redtek 发表于 2007-02-09 04:52
金牌会员 发帖 1,147 积分 2,902


然后 %p% 变量的内容就到了 Windows 剪贴板里了:)




下面这样也可以,把文件内容都复制到了剪贴板里:)




把 DIR 输出内容复制到剪贴板里:)


[ Last edited by redtek on 2007-2-8 at 04:03 PM ]
第3楼 anqing 发表于 2007-02-09 06:20
高级用户 发帖 413 积分 859
佩服!!!!!
第4楼 wyd531 发表于 2007-02-09 08:26
初级用户 发帖 49 积分 137
为什么我的提示不是内部命令也不是外部命令,我的系统是XP专业版
第5楼 redtek 发表于 2007-02-09 11:07
金牌会员 发帖 1,147 积分 2,902
Originally posted by wyd531 at 2007-2-8 19:26:
为什么我的提示不是内部命令也不是外部命令,我的系统是XP专业版




C:\WINDOWS\system32>dir clip.*
驱动器 C 中的卷是 DISK-C
卷的序列号是 4089-CA39

C:\WINDOWS\system32 的目录

2003-03-27 20:00 29,184 clip.exe



如果兄没有我发给你一份:)

我用的是 Win2003, XP 里没有clip.exe(多谢slore和zh159兄帮我指正了错误,我一直都以为在XP里有--实际上XP不带clip.exe)。

剪贴板工具在8楼下载~:)

[ Last edited by redtek on 2007-2-8 at 11:07 PM ]
第6楼 slore 发表于 2007-02-09 11:51
铂金会员 发帖 2,478 积分 5,212
XP里没的。
第7楼 zh159 发表于 2007-02-09 11:58
金牌会员 发帖 1,467 积分 3,687
好像 XP 默认不安装剪切板查看程序
第8楼 redtek 发表于 2007-02-09 12:01
金牌会员 发帖 1,147 积分 2,902
在XP里没有,是我记错了,不好意思耽误兄时间了:)

clip.exe (Win2003系统带的)在附件内,兄试一下能不能用:)


还有一个更强大的第三方剪贴板工具,在下面的帖子中可以查找并下载到:)
同时下面帖子还有非常精彩的例子:)

SendTo+批处理实用小工具--加强版发送到

http://www.cn-dos.net/forum/viewthread.php?tid=23522&fpage=1&highlight=clip.exe

[ Last edited by redtek on 2007-2-8 at 11:11 PM ]

附件
clip.rar (12.7 KiB)
第9楼 bd123456789 发表于 2008-02-14 16:41
中级用户 发帖 216 积分 360
能否被VBS利用
CLIP.EXE程序在CMD下能正常使用!确实方便,但

有没有办法放到VBS中使用

我的思路是先建立一个剪切板对象,然后对此对象进行脚本操作!

问题是不知道怎么去建这个对象和下一步的编写?

而用不着像下面那样利用IE对象来间接使用剪切板!

set ie=createobject("internetexplorer.application")
ie.navigate "about:blank"
ie.visible=false
set fso=createobject("scripting.filesystemobject")
set f=fso.opentextfile("test.txt",1)
ie.document.parentwindow.clipboarddata.setdata "text",""
do while f.atendofstream <> true
line = f.readline
str=ie.document.parentwindow.clipboarddata.getdata("text")
ie.document.parentwindow.clipboarddata.setdata "text",str+vbCrLf+line
loop
str=ie.document.parentwindow.clipboarddata.getdata("text")
ie.quit
msgbox str

[ Last edited by bd123456789 on 2008-2-14 at 04:42 PM ]
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023