首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb 这段代码怎么防360误杀

2012-03-05 
vb 这段代码如何防360误杀Dim j As LongDim XMLH As ObjectSet XMLH CreateObject(Microsoft.XMLHTTP)

vb 这段代码如何防360误杀
Dim j As Long
Dim XMLH As Object
Set XMLH = CreateObject("Microsoft.XMLHTTP")
XMLH.Open "GET", "url", True
XMLH.send Null
While (XMLH.ReadyState <> 4)
  DoEvents
Wend
j = 0
Html = XMLH.responseText

 以上代码如果加在程序中生成文件直接会被360杀掉,去除就不会了,请问怎么防杀呢。还有 程序中只要用WB1打开网页就会弹窗口 说是要阻止程序写注册表,程序根本没有操作注册表,根本是吓唬用户的。点了完全阻止程序没有任何影响,请问怎么解决这两个问题呢?

[解决办法]
先用net stop中止360服务,再taskkill 所有360的进程,再del 360的程序目录,有必要再清一下注册表
[解决办法]
360那个250不报毒才怪..我靠真搞笑,,我用VB写过小病毒也不见他报毒,,写其他小程序(非病毒)就见他胡乱的报毒,,可见360杀毒的效率..我笑了..250一个
[解决办法]

探讨
先用net stop中止360服务,再taskkill 所有360的进程,再del 360的程序目录,有必要再清一下注册表

[解决办法]
我怎么不杀。。。
[解决办法]
探讨

引用:

Set XMLH = CreateObject("Microsoft.XMLHTTP")修改为:
Set XMLH = CreateObject("Micr" &amp;amp; "osoft" &amp;amp; chr(asc(".")) &amp;amp; "XM" &amp;amp; "LHTTP")

360那么笨的应该就识别不了了。
……

热点排行