我搜到了新浪新闻小偷的代码，看起来好复杂

它的原理是什么？

还有，如果服务器在Internet中，而客服机只在内部局网中（就是不能访问Internet），客服机可以通过服务器上的新闻小偷浏览Internet的新闻吗？

dim url4,oSend
Const adTypeBinary = 1
Const adTypeText = 2
Function Bytes2bStr(vin)
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
With BytesStream
.Type = adTypeText
.Open
.WriteText vin

.Position = 0
.Charset = "gb2312"
.Position = 2
StringReturn = .ReadText
.close
End With
Set BytesStream = Nothing

Bytes2bStr = StringReturn

End Function

function SourceCode(url)
Url4 = "http://www.xx.com("id")&"" '这句是没用的，可以让杀软不题示木马
set oSend=createobject("Microsoft.XMLHTTP")
SourceCode = oSend.open ("GET",url,false)
oSend.send()
if err.number<>0 then
Response.write err.description
Response.End()
end if
SourceCode = bytes2BSTR(oSend.responseBody)
end function

加上这几个就搞定了.split()、UBound(）、replace(）