瑞星卡卡安全论坛

<%
Function baidu(site)
Dim objXMLHTTP, xml
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET","http://www.baidu.com/s?wd=site:"&site, False
xml.Send
rt=BytesToBstr(xml.responseBody,"gb2312")
Set xml = Nothing
Response.Write rt
End Function

Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
baidu(Request.QueryString("site"))
%>
我一个TXT文件放了这么一些代码。被卡巴当成病毒给杀了。怎么都想不明白！

附件: 8893562007629105450.gif

喀吧 死机 就是厉害！能查杀未知病毒！人家喀吧的理由是：因为情人眼里出西施。所以杀毒软件眼里都是病毒！
既然电脑里的文件都是病毒！就不能开机！一开机就喀吧 死机

asp文件 这个是编程吧？
无意中变了木马的程序？？

最他妈讨厌这样的人了~~~

哎``就是这个卡巴报病毒，其他的都不报，郁闷。