[求助]麻烦高手帮忙看看这段代码

麻烦高手帮忙看看这段代码，AVAST检测出病毒，具体是哪一句：
dim http,reurl,ID
    ID=request("ID")
    set http=Server.createobject("Microsoft."&chr(120)&"MLHTTP")
    Http.open "GET","http://"&request.ServerVariables("Server_NAME")&""&SitePath&"images/css.asp?id="&ID&"",false
    Http.send()
    set objStream = Server.CreateObject("ADODB.Stream")
    objStream.type = 1
    objStream.open
    objstream.write http.responseBody
    objstream.saveToFile server.mappath("../images/Css"&ID&".css"),2
    Call Alert ("风格 "&ID&" 已更新","-1")