用vbs實(shí)現(xiàn)將剪切板的unix格式的內(nèi)容處理成pc格式的代碼
更新時(shí)間:2007年10月24日 12:02:28 作者:
處理QQ里復(fù)制的文本'復(fù)制QQ里的文本到記事本有事可能會(huì)有黑框框...(請(qǐng)復(fù)制后運(yùn)行本腳本)
set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
s = objIE.document.parentwindow.clipboardData.GetData("text")
objie.quit
set file=fso.createtextfile("tmp.txt")
file.write s
file.close
ws.run "cmd /c more tmp.txt>test.txt",0,true
fso.deletefile "tmp.txt"
ws.run "notepad.exe test.txt"
set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")
s = objIE.document.parentwindow.clipboardData.GetData("text")
objie.quit
set file=fso.createtextfile("tmp.txt")
file.write s
file.close
ws.run "cmd /c more tmp.txt>test.txt",0,true
fso.deletefile "tmp.txt"
ws.run "notepad.exe test.txt"
相關(guān)文章
利用計(jì)劃任務(wù)和VBS腳本實(shí)現(xiàn)自動(dòng)WEB共享文件夾里的文件
其實(shí)沒有題目寫得那么復(fù)雜,就是用計(jì)劃任務(wù)每隔一段時(shí)間調(diào)用VBS腳本,刷新生成一個(gè)文件列表文件用于WEB服務(wù)調(diào)用。2008-12-12vbs實(shí)現(xiàn)恢復(fù)暫停的自動(dòng)啟動(dòng)服務(wù)的腳本
有時(shí)候我們需要把自啟動(dòng)的服務(wù)停掉,方便我們處理事務(wù),但我們?nèi)绻淮瓮5舻淖詥?dòng)服務(wù)比較多,如何一次性啟動(dòng)他們呢2008-06-06VBS教程:函數(shù)-LTrim、RTrim 和 Trim 函數(shù)
VBS教程:函數(shù)-LTrim、RTrim 和 Trim 函數(shù)...2006-11-11vbs列出內(nèi)網(wǎng)的中計(jì)算機(jī)(工作組也可以)
用vbs列出內(nèi)網(wǎng)的中計(jì)算機(jī)(工作組也可以)的代碼,需要的朋友可以參考下。2011-05-05vbs下用一個(gè)小方法實(shí)現(xiàn)批量添加域用戶
在域模式下批量添加域用戶就有些困難,下面是一個(gè)vbs腳本,在同級(jí)目錄下用放置一個(gè)users.txt的文本文檔,格式:username,password,在dc上運(yùn)行該腳本,即可以將users.txt的用戶信息批量添加到ad里面??梢酝ㄟ^移動(dòng)或拖拽的方法,將生成的用戶移動(dòng)到ou下面,以保證ou的組策略及文件夾重定向?qū)υ撚脩羯А?2008-06-06