ASP内部网页动态直接读取代码
用<!-- #include...不能传ASP参数,这里我们介绍两种能传递ASP参数并直接读取的方法。
方法1:
<%
Function getFileContents(strIncludeFile) '函数:读取包含文件内容
Set objFSO = Server.CreateObject("Scripting.FileSystemObject") '调用FSO对象
Set objText = objFSO.OpenTextFile(Server.MapPath(strIncludeFile),,True)
getFileContents = objText.ReadAll
objText.Close
Set objText = Nothing
Set objFSO = Nothing
End Function
attachurl="index.asp" '读取网页
response.write getFileContents(""&attachurl&"")
%>
注意:此方法读取的网页不支持utf-8编码。
方法2:
<%
Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP")
objXML.open "GET","http://www.wqhl.cn/index.asp",false
objXML.send()
response.write(objXML.responseText)
%>
客户机接收响应是通过XMLHTTP对象的属性实现的:
responseText:将返回消息作为文本字符串;
responseBody:将返回消息作为HTML文档内容;
responseXML:将返回消息视为XML文档,在服务器响应消息中含有XML数据时使用;
responseStream:将返回消息视为Stream对象。
打开微信,点击底部的“发现”,使用“扫一扫”即可将网页分享至朋友圈。











