| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 705 人关注过本帖
标题:请问如何把动态转问静态
只看楼主 加入收藏
s6gy
Rank: 1
等 级:新手上路
帖 子:330
专家分:0
注 册:2006-10-26
收藏
 问题点数:0 回复次数:2 
请问如何把动态转问静态
比如我 动态添加 招聘信息的时候

我想在前台显示的是 静态网页
是HTML 形式
如何处理
THANKS
搜索更多相关主题的帖子: 动态 静态 
2007-03-21 10:44
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1215
专家分:1376
注 册:2005-3-14
收藏
得分:0 
用FSO将动态查询内容替换模板中固定内容!

http://toorup.3v.do
loading...
2007-03-21 13:55
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1215
专家分:1376
注 册:2005-3-14
收藏
得分:0 

生成代码:

<%
fname="template.htm"
dim replaceweb(2)
replaceweb(0)="haha"
replaceweb(1)="模版生成静态页面" '设置生成内容,实际中可从数据库读取
replaceweb(2)="模版生成静态页面实例"
set fso=server.createobject("scripting.filesystemobject")
set file=fso.opentextfile(server.mappath(fname),1,True)
FSOFileRead = file.ReadAll
set file=nothing
for i=0 to 2
FSOFileRead=Replace(FSOFileRead,"$HTMLWEB["&i&"]",replaceweb(i))
next
Set outfile = fso.CreateTextFile(Server.Mappath("index.htm"))
outfile.Write FSOFileRead
outfile.close
Set outfile=nothing
Set fso=nothing
%>

模板:template.htm

<html>
<head>
<title>$HTMLWEB[0]</title>
</head>
<body>
<center>
<h1>$HTMLWEB[1]</h1><hr>
$HTMLWEB[2]
</center>
</body>
</html>


http://toorup.3v.do
loading...
2007-03-21 13:56
快速回复:请问如何把动态转问静态
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013990 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved