用这个获取页面内容，然后用邮件发出去！下面是远程获取内容的代码
content=getHTTPPage("http://www.google.net")
response.write content
function getHTTPPage(url)
on error resume next
dim http
set http=Server.createobject("Msxml2.XMLHTTP")
Http.open "GET",url,false
Http.send()
if Http.readystate<>4 then exit function
getHTTPPage=bytes2BSTR(Http.responseBody)
set http=nothing
if err.number<>0 then err.Clear
end function
伊图教程网[www.etoow.com]
http://www.etoow.com/html/2007-08/1186276486.html
返回一个ASP页面执行后的静态HTML代码
'http://www.etoow.com/html/2007-08/1186276486.html