下沙论坛

 找回密码
 注册论坛(EC通行证)

用新浪微博连接

一步搞定

QQ登录

QQ登录

下沙大学生网QQ群8(千人群)
群号:6490324 ,验证:下沙大学生网。
用手机发布本地信息严禁群发,各种宣传贴请发表在下沙信息版块有问必答,欢迎提问 提升会员等级,助你宣传
新会员必读 大学生的论坛下沙新生必读下沙币获得方法及使用
查看: 2283|回复: 0
打印 上一主题 下一主题

用标签替换的方法生成静态网页

[复制链接]
  • TA的每日心情
    开心
    2014-7-28 21:47
  • 签到天数: 2 天

    [LV.1]初来乍到

    跳转到指定楼层
    1
    发表于 2009-4-17 08:54:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
    大家都知道HTML静态网页更容易被搜索引擎收录索引,动态生成HTML网页,也可使网站的网页数量增多,搜索引擎收录的数量也可能多,再加下提高网页的质量也意未着什么呢?我想大家也知道。
    : z" Q) w- |- C* C) p为了这个,我决定了改变之前网站建设,网页设计的方法,经过多翻的研究及思考,对多种网页动态生成的方法,我比较喜欢用标签替换的方法成生网页。
    % w( t0 B4 V) z9 S' H标签替换法:这是我个人理解的定义,不知道别人怎么叫它的,呵呵!2 D- i* F; O2 ~* b
       

    7 x1 p' n5 ~, {9 J3 X2 t: q1 l 标签替换法,就是在设计好了的网页模板中,放入自已设定的标签,然后用你需要显示出来的东东替换它。如. J# I8 p# v( D

    $ y- l- @8 c6 g, H! l模板文件11 ~5 d( y) Y! S
      }+ E0 U6 `: x/ j
    这个模板我们保存在数据库表中  temptable
    # L  j+ |% m, _, Q: N8 Z$ d- \9 ?
    2 F. F! O8 W5 r  i<html>8 O! G6 p2 P" }3 I2 u" A$ |
    <head>+ b6 F2 U5 K- V0 n6 a
    <title>{$SiteName} </title>
    # C: e* Y8 t' W* g/ W- ^1 O- L4 F</head>
    ! w4 L7 ]( j3 N  W6 N! d" @* f<body>) z; r2 Z$ |3 W, R6 O  Q
    {$Arc_List$}   
    . W) b' u0 u9 e# o</body>5 y! r1 i) T$ j6 Y$ F6 ^: V
    <html>
    6 C% E. v/ _5 p% |# t! a+ x7 r. p  A
    在以上模板中我放入了两个标签{$SiteName}网站名称和{$Arc_List$}文章列表,再来看下面的代码
    % y, K6 |) e" j1 g0 e
    : z$ q5 U+ j: {: }, G2 d<%
    7 L1 y# U  p$ k- v3 }, [    dim rs,SiteName,Arc_List,fso,myFile,FilePath,html2 x' i- T  i3 Y1 H2 D* h
        SiteName="我的第一个动态生成的HTML网页"
    # C$ A* Q# k. v# j8 j) ]    FilePath = Server.MapPath("/html/index.html")& S3 y7 u% F6 B
       set rs=server.createobject("adodb.recordset")- }1 j2 L1 Y# t  O) V- L: C1 Y$ g' c
       rs.open"select  [temp] from  temptable,conn,1,1
    " v: e, a) z' f9 A   html = rs("temp")   '读取网页模板( q5 F  y6 z4 Q' ^8 d: {  g
       rs.close& L& F( K! u, a- K( L
       
    ! y! F2 \, ?9 z8 o3 S0 h   html  = replace(html, "{$SiteName}" , SiteName)          '用自定义的  SiteName 替换{$SiteName}标签
    $ O. w$ }9 ~7 F6 x6 W   html  = html & replace(html, "{$Arc_List$} " , get_ArcList())   '用自定义的get_ArcList()函数替换{$Arc_List$}标签
    & e3 j* a& D6 g: j  set rs=nothing! R% m1 e; E4 F0 }
      conn.close
    & w* H- s# o6 F4 e& v2 ^8 h  set conn=nothing
    & q& q  F* Z- W0 ]4 o4 B   
    , m' g& V8 E- Q   set fso=CreateObject("***ing.FileSystemObject")     '创建文件系统对象
    ! T$ T" k8 P1 c" m! ~   Set MyFile = fso.CreateTextFile(FilePath,True)               '创建文件
    % a" H5 x3 z* w% q4 s7 w: X   MyFile.WriteLine(html)                                                         '把htm代码写入文件
    / T! }) W; Y  L+ ~9 c   MyFile.close    '关闭文件0 y8 S  G: E) o/ h  g
       Set MyFile = nothing    '释放文件对象
    ; J0 q9 e& `( S4 a/ N+ o8 F$ x3 D   set fso = nothing     '释放系统文件对象! T! [6 c) i1 A
       response.write "<*** language='java***'>window.alert('文件生成成功了');</***>"4 z$ T) [( Q  q, g6 B9 Z
      response.end()! [+ w7 s0 q; @  p  n: _) O
       
    5 s: n* Q5 n4 z# r* J  A
    7 f7 A3 L* z9 V5 G. G" O* E/ g   Function get_ArcList()" |. d; U$ f* v2 B- Z1 @
             dim str,str18 w  R" w0 \1 D' O
             str1=""
    ( t% K* y' _5 i) h3 b3 _( s         str = "<ul>{list}</ul>"2 V$ `  p, j' a
             rs.open"select  Title,url from Arc"
    " x, K. H7 Y, i1 J         while not rs.eof & m6 V# {3 u& T. c6 e# I
                    str1 = str1 & "<li><a href="&rs("url")&">"&rs("Title")&"</a></li>"
    0 F0 i% I7 F: s2 n        rs.movenext% k' M8 V9 ^. [. G7 N2 e
            wend2 t0 c( N# M( M  z. x3 V- N
            rs.close
    % A# U/ n# I1 V+ f       str = replace(str, "{list}", Str1)' `6 j: d" n0 p, Z/ Z1 x  x, M
           get_ArcList = str
    / ?. P$ D" n3 g0 e: }0 Q7 U* Y; T( I
    %>
    & A9 m; F1 t+ {
    End Function1 V/ u5 R0 w5 Z5 V4 A

    , Z' I% V5 O  X$ n# b以上的方法是不是很简单,现在很多CMS都是采用这种方法生成静态网页的,这种方法使用比较灵活,只要你用心去设计一下你的系统,以后做一个网站,只要设计模板就可以了。。。
    分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
    收藏收藏 分享分享 顶 踩 转发到微博

    本版积分规则

    关闭

    下沙大学生网推荐上一条 /1 下一条

    快速回复 返回顶部 返回列表