常用vbs腳本(編輯修改稿)
2024-08-19 13:51 本頁面
【文章內(nèi)容簡介】 T://MYCOMPUTER,puter) Set objService = (Service,MYSERVICE) If ( = ADS_SERVICE_STOPPED) Then End If 。并通過如下命令執(zhí)行：cscript c:/。運(yùn)行后，經(jīng)你指定的IIS服務(wù)項(xiàng)將被重新開啟。 最后，我們再說說開篇時提到的VBS腳本病毒的防范方法。VBS病毒的執(zhí)行離不開WSH，在帶給人們便利的同時，WSH也為病毒的傳播留下可乘之機(jī)。所以要想防范VBS病毒，可以選擇將WSH卸載，只要打開控制面板，找到“添加/刪除程序”，點(diǎn)選“Windows安裝程序”，再鼠標(biāo)雙擊其中的“附件”一項(xiàng)，然后再在打開的窗口中將“Windows Scripting Host”一項(xiàng)的“√”去掉，然后連續(xù)點(diǎn)兩次“確定”就可以將WSH卸載。或者，你也可以點(diǎn)擊“我的電腦”→“查看”→“文件夾選項(xiàng)”，在彈出的對話框中，點(diǎn)擊“文件類型”，然后刪除VBS、VBE、JS、JSE文件后綴名與應(yīng)用程序的映射，都可以達(dá)到防范VBS腳本病毒的目的。 3 如何確定哪些 USB 設(shè)備已連接到計(jì)算機(jī)上？ strComputer = . Set objWMIService = GetObject(winmgmts:// amp。 strComputer amp。 /root/cimv2) Set colDevices = _ (Select * From Win32_USBControllerDevice) For Each objDevice in colDevices strDeviceName = strQuotes = Chr(34) strDeviceName = Replace(strDeviceName, strQuotes, ) arrDeviceNames = Split(strDeviceName, =) strDeviceName = arrDeviceNames(1) Set colUSBDevices = _ (Select * From Win32_PnPEntity Where DeviceID = 39。 amp。 strDeviceName amp。 39。) For Each objUSBDevice in colUSBDevices Next Next 4 如何在指定的一段時間后自動消除消息框？ Const wshYes = 6 Const wshNo = 7 Const wshYesNoDialog = 4 Const wshQuestionMark = 32 Set objShell = CreateObject() intReturn = (Do you want to delete this file?, _ 10, Delete File, wshYesNoDialog + wshQuestionMark) If intReturn = wshYes Then You clicked the Yes button. ElseIf intReturn = wshNo Then You clicked the No button. Else The popup timed out. End If 5 回復(fù) 4：如何在指定的一段時間后自動消除消息框？ Const wshYes = 6 Const wshNo = 7 Const wshYesNoDialog = 4 Const wshQuestionMark = 32 Set objShell = CreateObject() Set objFSO = CreateObjec
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號-1