asp模板也使用include(“文件名.html”)类似于{dede:include filename=”文件名.htm”/}

   一直很喜欢DEDE的那个模板中文件载入的功能,苦于本人PHP不精通,只好使用ASP来完成此工作了!经过再下不屑努力,终于实现了像dede模板那样可以include文件进来,并解析了!

  不知道为什么,找了好多ASP企业站,什么样式的都测试了,没有一个实现此功能的,也不知道是我找的少了还是我没有找到....比较纠结。

  不多说了,马上下班了,附上代码如下,欢迎朋友们留意交流:

'//私有办法----循环嵌套include(从代码解析,文件名)

Private Function LoadInclude(ByVal html,ByVal fromPath)

Dim incpath

Dim Match,Matches

'include优先

 EX.Pattern = "{include\(['""]*(.+?)['""]*\)}"

Set Matches = EX.Execute(html) '执行搜索。

For Each Match in Matches

 incpath = Replace(strSITEROOT & strTemplate_dir & Match.SubMatches(0),"/","\")

 If Lcase(fromPath)<>Lcase(incpath) Then

  '*******incpath文件详细路径*******

  html = Replace(html,Match.value,LoadInclude(LoadFile(incpath),incpath))        'LoadFile 载入文件用的

 Else

  html = Replace(html,Match.value,"")

 End If

Next

Set Matches = Nothing

LoadInclude = html

End Function

这个主要是载入 include文件的 你可以很方便的进行修改 或是改成像DEDE那样的也可以啊! 模板文件中使用 {include("head.html")}  形式调用!

欢迎大家留意交流!

 

参与评论