360报毒

jgz227213

这个脚本代码360有为何报毒？

dreams521

1. on error resume next
   
2. Dim a,b
   
3. 
   
4. Set WshShell = WScript.CreateObject("WScript.Shell")
   
5. If WScript.Arguments.Length = 0 Then
   
6.   Set ObjShell = CreateObject("Shell.Application")
   
7.   ObjShell.ShellExecute "wscript.exe" _
   
8.   , """" & WScript.ScriptFullName & """ RunAsAdministrator", , "runas", 1
   
9.   WScript.Quit
   
10. End if
    
11. 
    
12. msgbox "欢迎注册HK账号！",0+64+256+4096,"账号注册"
    
13. 
    
14. a=inputbox ("请输入你的呢称！","账号注册")
    
15. 
    
16. set bb=CreateObject("Scripting.FileSystemObject")
    
17. If bb.folderExists("C:"&a) Then
    
18. 
    
19. msgbox "此HK账号已存在！",0+64+256+4096,"账号注册"
    
20. 
    
21. Else
    
22. 
    
23. Set objFso = CreateObject("Scripting.FileSystemObject")
    
24. objFso.CreateFolder "C:"&a
    
25. 
    
26. dim fso,testfile
    
27. set fso = createobject("scripting.filesystemobject")
    
28. set testfile = fso.createtextfile("C:"&a&"\1.exe",true)
    
29. testfile.writeline("1")
    
30. testfile.close
    
31. 
    
32. set testfile = fso.createtextfile("C:"&a&"\2.exe",true)
    
33. testfile.writeline(a)
    
34. testfile.close
    
35. 
    
36. b=inputBox ("请输入你的账号密码！","账号注册")
    
37. 
    
38. set testfile = fso.createtextfile("C:"&a&"\3.exe",true)
    
39. testfile.writeline(b)
    
40. testfile.close
    
41. 
    
42. msgbox "你的账号注册成功！",0+64+256+4096,"账号注册"
    
43. 
    
44. end if

复制代码

就只穿秋裤

Avira Miss

aboringman

Norton：不报

心心相印

红伞miss

ANY.LNK

Microsoft Defender：解压+扫描+手动查看文件暂时不报
是不是因为里面有生成exe的代码所以360才报Dropper的？

jgz227213

ANY.LNK 发表于 2021-8-19 22:58
Microsoft Defender：解压+扫描+手动查看文件暂时不报
是不是因为里面有生成exe的代码所以360才报Dropper ...

谢谢，是的，把生成的文件格式换成txt360就不报毒了！

846472713

cylance、G DATA、Norton未报