中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 【求助】多的剪贴版

hjkk123
初级用户

积分 160
发帖 82
注册 2007-5-14
状态离线

『楼主』: 【求助】多的剪贴版

下面的vbs脚本，是把123传到剪贴版
Dim objIE
Set objIE = WScript.CreateObject("InternetExplorer.Application")
objIE.Visible = False
objIE.Navigate("about:blank")
objIE.document.parentwindow.clipboardData.SetData "text","123"
Set objIE = Nothing
WScript.Quit(0)

那么谁能帮忙写个脚本，假设剪贴版内容当时为456，双击后在这个脚本旁边生成和上面功能一样的代码，且旁边这个代码的名字为45（取前两个字），使双击45.vbs可以把剪贴版内容再变成456

[ Last edited by hjkk123 on 2008-5-28 at 09:20 PM ]

2008-5-27 20:44