<!--#include file="clsThief.asp" -->
<%
dim my,mypage,fso,ts,tofuuck,bakfuuck
'这里赋值,tofuuck是你要静态化的页面(例如-首页),bakfuuck是那个被你被静态化的页面的备份
tofuuck="/index.asp"
bakfuuck="/bakindex.asp"
set fso=server.createobject("scripting.FileSystemObject")
if fso.fileExists(server.mappath(bakfuuck)) then
else
fso.copyfile server.mappath(tofuuck),server.MapPath(bakfuuck),true
end if
set my=new clsthief
my.src=bakfuuck
my.steal
mypage=my.value
set my=nothing
set ts=fso.OpenTextFile(server.MapPath(tofuuck),2,true,-2)
ts.writeline mypage
ts.close
set ts=nothing
set fso=nothing
%>
看懂了么?把这段代码复制到DW保存,取个怪怪的名字,不要让人猜到(或者头部加个session权限控制——只有管理员可以执行),每次文档更新,要执行一下这个,那么就重新将首页或其他什么页的给固定(静化)了,这样岂非大大加快你的asp系统?(不要担心那些js引用的东东,那个照样会执行的。)
更多的先锋海盗类的妙用——页面静态化,加速你的网站!请到论坛查看: http://BBS.TC711.COM
【 双击滚屏 】 【 评论 】 【 收藏 】 【 打印 】 【 关闭 】
来源:
互联网
日期:2006-5-15