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对象。
打开微信,点击底部的“发现”,使用“扫一扫”即可将网页分享至朋友圈。