用ASP获取远程目标网页指定内容有一个弊端,就是无法处理乱码的问题,在链接远程ASP文件时,只能对文件进行读取并转换成远程ASP文件运行后的结果,不能读取源代码,而且读取后的内容即使原网站已经更新,读取后的将不会同步更新。这个问题我目前没有解决,以后解决后会更新代码的。
<%URL="http://www.zwid.com"%>
<%FUNCTION GETHTTPPAGE(URL)%>
<%SET HTTP=SERVER.CREATEOBJECT("MSXML2.XMLHTTP")%>
<%HTTP.OPEN "GET",URL,FALSE%><%HTTP.SEND()%>
<%GETHTTPPAGE=BYTESTOBSTR(HTTP.RESPONSEBODY,"GBK")%>
<%SET HTTP=NOTHING%><%END FUNCTION%>
<%FUNCTION BYTESTOBSTR(BODY,CSET)%>
<%SET OBJ=SERVER.CREATEOBJECT("ADODB.STREAM")%>
<%OBJ.TYPE=1%><%OBJ.MODE=3%><%OBJ.OPEN%>
<%OBJ.WRITE BODY%><%OBJ.POSITION=0%><%OBJ.TYPE=2%>
<%OBJ.CHARSET=CSET%><%BYTESTOBSTR=OBJ.READTEXT%>
<%OBJ.CLOSE%><%SET OBJ=NOTHING%><%END FUNCTION%>
<%=GETHTTPPAGE(URL)%>
目前只有一个强制更新的方法,就是在远程页面后面加一个参数,比如加时间,如:
<%URL="http://www.zwid.com?"&TIMER%> |