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