用vbs實現(xiàn)顯示系統(tǒng)調(diào)色板的代碼
更新時間:2007年10月23日 21:20:12 作者:
復(fù)制代碼 代碼如下:
set ie = createobject("internetexplorer.application")
ie.navigate "about:blank"
do until ie.readystate = 4 : wscript.sleep 25 : loop
set doc = ie.document
set body = doc.body
set win = doc.parentwindow
body.innerhtml = "<OBJECT id=dlg CLASSID='clsid:3050f819-98b5-11cf-bb82-00aa00bdce0b'></OBJECT>"
body.innertext = doc.getElementById("dlg").choosecolordlg
win.clipboarddata.setdata "text", body.innertext
ie.quit
相關(guān)文章
VBScript 根據(jù)IE窗口的標(biāo)題輸出ESC
這篇文章主要介紹了VBScript 根據(jù)IE窗口的標(biāo)題輸出ESC,代替人工按esc操作的實現(xiàn)代碼,需要的朋友可以參考下2018-04-04