用vbs实现显示系统调色板的代码
摘要:复制代码代码如下:setie=createobject("internetexplorer.application")ie.navigate...
复制代码 代码如下:
setie=createobject("internetexplorer.application")
ie.navigate"about:blank"
dountilie.readystate=4:wscript.sleep25:loop
setdoc=ie.document
setbody=doc.body
setwin=doc.parentwindow
body.innerhtml="<OBJECTid=dlgCLASSID='clsid:3050f819-98b5-11cf-bb82-00aa00bdce0b'></OBJECT>"
body.innertext=doc.getElementById("dlg").choosecolordlg
win.clipboarddata.setdata"text",body.innertext
ie.quit
【用vbs实现显示系统调色板的代码】相关文章:
下一篇:
用vbs遍历文件并随机显示的脚本