這篇文章主要介紹了vbs腳本如何實現(xiàn)修改DNS和清空IE臨時文件功能,具有一定借鑒價值,感興趣的朋友可以參考下,希望大家閱讀完這篇文章之后大有收獲,下面讓小編帶著大家一起了解一下。
需要一個修改DNS為校內(nèi)DNS,并且清空IE臨時文件的腳本,想都沒想,用批處理寫了一個:
rem programed by Kaisir @echo off echo 本腳本的作用為修改您的DNS為山東青年政治學(xué)院專用DNS 222.194.76.2 同時幫您清除了電腦中的臨時文件。若有疑問,請致電網(wǎng)絡(luò)中心。 pause echo 修改DNS中... netsh interface ip set dns "本地連接" source=static addr=222.194.76.2 echo DNS已經(jīng)修改成功,接下來將開始清空ie臨時文件... pause echo 清除臨時文件中... del /f /s /q "%userprofile%Local SettingsTemporary Internet Files*.*" del /f /s /q "%userprofile%AppDataLocalMicrosoftWindowsTemporary Internet Files*.*" echo 全部操作已成功完成!感謝您的使用。 pause
你瞧,思路很簡單,用netsh把dns改了就是了,因為要適應(yīng)Win7跟Xp臨時目錄的不同,于是刪除語句寫了兩遍。
但是,仔細(xì)想想,這個腳本有很多問題,
1)若用戶有多塊網(wǎng)卡,這個腳本只會修改“本地連接”的那一個。
2)若用戶自己手動修改了臨時文件的位置,則這個腳本也無能為力。
于是,有了下面這個vbs版的腳本。
'刪除目錄下的所有文件及文件夾 Const DeleteReadOnly = True Set objFSO = CreateObject("Scripting.FileSystemObject") objFSO.DeleteFile(net_temp&"*.*"), DeleteReadOnly strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colSubfolders2 = objWMIService.ExecQuery _ ("Associators of {Win32_Directory.Name='" & net_temp & "'} " _ & "Where AssocClass = Win32_Subdirectory " _ & "ResultRole = PartComponent") For Each objFolder2 in colSubfolders2 objFSO.deleteFolder objFolder2.name , DeleteReadOnly Next MsgBox("所有操作已成功執(zhí)行!") else end if
這個就比較智能了,通過winmgmts獲取系統(tǒng)中的網(wǎng)卡列表,然后遍歷啟用的網(wǎng)卡,然后進(jìn)行修改。而臨時文件部分,也是通過讀取注冊表“HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerShell Folderscache”項的鍵值來獲取文件夾位置。之后通過創(chuàng)建的fso對象的相應(yīng)方法給他干掉~
感謝你能夠認(rèn)真閱讀完這篇文章,希望小編分享的“vbs腳本如何實現(xiàn)修改DNS和清空IE臨時文件功能”這篇文章對大家有幫助,同時也希望大家多多支持創(chuàng)新互聯(lián)網(wǎng)站建設(shè)公司,,關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道,更多相關(guān)知識等著你來學(xué)習(xí)!
網(wǎng)站題目:vbs腳本如何實現(xiàn)修改DNS和清空IE臨時文件功能-創(chuàng)新互聯(lián)
文章分享:http://www.rwnh.cn/article44/ceiehe.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供響應(yīng)式網(wǎng)站、App設(shè)計、全網(wǎng)營銷推廣、網(wǎng)站導(dǎo)航、企業(yè)建站、網(wǎng)站設(shè)計
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)