【求助】多的剪贴版 - 中国DOS联盟论坛 - 中国DOS联盟之联合DOS论坛

下面的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 ]

第1楼　hjkk123	发表于 2008-05-27 20:44
初级用户　发帖 82　积分 160
【求助】多的剪贴版下面的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 ]

第2楼　slore	发表于 2008-05-27 23:05
铂金会员　发帖 2,478　积分 5,212
getDATA 可以得到剪切板内容，你if下……

第3楼　hjkk123	发表于 2008-05-28 21:14
初级用户　发帖 82　积分 160
帮我写出来算了哈 [ Last edited by hjkk123 on 2008-5-29 at 06:52 PM ]