[会员中心]  [发布文章][发布软件]  [中文繁體] 
 文章·资料  电脑软件  手机软件  网站源码
   本 站 搜 索
[选项]
   推 荐 文 章       More...
华硕易电脑(ASUS Eee PC 1025C)驱动程序(Windows XP)安装参考(图) 华硕易电脑(ASUS Eee PC 1025C..
先来段开场白:为了外出携带方便..
Acronis True Image 使用说明 Acronis True Image 使用说明
  一款可以在Windows下使用..
Norton Ghost 使用详解 Norton Ghost 使用详解
一、分区备份   使用Ghost..
   阅 读 排 行
Windows 系统安装或备份时 ISO,GHO,WIM,ESD,PMF 都是什么文件类型 Windows 系统安装或备份时 ISO,GH..
【ISO 文件】 ISO 文件其实就..
使用“自动点击器”APP 在抖音直播间自动点赞 使用“自动点击器”APP 在抖音直..
看过抖音直播的朋友都知道,进入..
OPPO 手机的锁屏时间设置成横向显示 OPPO 手机的锁屏时间设置成横向..
第一次使用 OPPO 手机,桌面和锁..
电脑机箱(主板)前面板 USB 数据线的接线参考(图) 电脑机箱(主板)前面板 USB 数据..
  一、概述   因为每个 US..
抖音直播录屏的草稿保存位置 抖音直播录屏的草稿保存位置
抖音直播录屏,保存为“草稿”后,..
微信收到 flv 格式视频,如何播放? 微信收到 flv 格式视频,如何播放?
  微信上收到一个 flv 格式视频..
TrustAsia/DigiCert/Let s Encrypt 的免费 SSL 证书,多款网页浏览器都无法正常打开 TrustAsia/DigiCert/Let s Encryp..
云服务器安装了 Windows Server 2..
三星打印机(SCX-4521)提示“墨粉不足”设置 三星打印机(SCX-4521)提示“墨粉..
  三星打印机(SCX-4521)在添加..
文 章 信 息
ASP生成静态网页的方法
评论()][留言][收藏
[文章分类:电脑·手机·网络 / 网站设计·开发·优化][阅读选项
  随着网站访问量的加大,每次从数据库读取都是以效率作为代价的,很多用 Access 作数据库的更会深有体会,静态页加在搜索时,也会被优先考虑。互联网上流行的做法是将数据源代码写入数据库再从数据库读取生成静态面,这样无形间就加大了数据库。将现有的ASP页直接生成静态页,将会节省很多。
  下面的例子是将、index.asp?id=1/index.asp?id=2/index.asp?id=3/这三个动态页面,分别生成 index1.htm,index2.htm,index3.htm 存在根目录下面:
  
<% 
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp 
Html_Temp="<UL>" 
For i=1 To 3 
Html_Temp = Html_Temp&"<LI>" 
Item_Classid = i 
FileName = "Index"&Item_Classid&".htm" 
FilePath = Server.MapPath("/")&"\"&FileName 
Html_Temp = Html_Temp&FilePath&"</LI>" 
Do_Url = "http://" 
Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/main/index.asp" 
Do_Url = Do_Url&"?Item_Classid="&Item_Classid 
strUrl = Do_Url 
dim objXmlHttp 
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP") 
objXmlHttp.open "GET",strUrl,false 
objXmlHttp.send() 
Dim binFileData 
binFileData = objXmlHttp.responseBody 
Dim objAdoStream 
set objAdoStream = Server.CreateObject("ADODB.Stream") 
objAdoStream.Type = 1 
objAdoStream.Open() 
objAdoStream.Write(binFileData) 
objAdoStream.SaveToFile FilePath,2  
objAdoStream.Close() 
Next 
Html_Temp = Html_Temp&"<UL>" 
%> 
<% 
Response.Write ( "成功生成文件:" ) 
Response.Write ( "<BR>" ) 
Response.Write Html_Temp 
%>

文章作者:未知  更新日期:2006-05-13
[文章浏览:][打印文章][发送文章
相关文章
·ASP生成HTML静态文件件技术杂谈2007-10-30
·ASP生成文本文件(.txt)的代码2008-03-07
·ASP生成HTM文件方法(用于将原有ASP文件转换成对应HTM代码的新文件)2009-06-16
·ASP+FSO+框架实现ASP生成HTML并分页的方法(批量)2009-06-16
阅读说明
·本站大部分文章转载于网络,如有侵权请留言告知,本站即做删除处理。
·本站法律法规类文章转载自[中国政府网(www.org.cn)],相关法律法规如有修订,请浏览[中国政府网]网站。
·本站转载的文章,不为其有效性,实效性,安全性,可用性等做保证。
·如果有什么问题,或者意见建议,请联系[网站管理员]
  原“浪人文章”和“浪人下载”网站已合并为“老若尔文章软件站”,域名:https://lre.cn
  本站使用【啊估文章软件站】网站系统    网站管理员留言簿〗〖捐助     闽ICP备08009617号