最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
关于通过vbs类处理模板实现代码与界面分离的程序,建议入精华备查。有演示
时间:2022-07-02 23:59:33 编辑:袖梨 来源:一聚教程网
文章标题:vbs类处理模板实现代码与界面分离
'作者:yanek
'email:[email protected]
本程序通过vbs类处理模板实现代码与界面分离的程序,主要有下面文件组成
index.asp,parse_cls.asp,template.html
下面是代码
1。index.asp 调用vbs类处理模板
<%
'作者:yanek
'email:[email protected]
'--- ---
' index.asp
'------ ----
' (c)2000 James Q. Stansfield ([email protected])
' This code is free for use by anyone. It is meant as a learning tool and can be passed along in any format.
option explicit
%>
<%
'Declare our variables
dim g_oPageGen
'Cerate the class object
set g_oPageGen = New parseTMPL
'Set the template file
g_oPageGen.TemplateFile = "template.html"
'Add some custom tags to the dictionary
g_oPageGen.AddToken "title", "Template Example"
g_oPageGen.AddToken "copyright", "This is mine! All mine!"
g_oPageGen.AddToken "quote", """Tell Jabba I've got his money!""
--Han Solo, Star Wars 1977"
g_oPageGen.AddToken "menu", "Home Page
News Page
Link Page"
g_oPageGen.AddToken "content", "Welcome To My Home Page... Yadda Yadda Yadda!"
'Generate the page
g_oPageGen.GenerateHTML
'Destroy our objects
set g_oPageGen = nothing
%>
2。parse_cls.asp 处理模板类文件
<%
'作者:yanek
'email:[email protected]
'--- ---
' parse_cls.asp
' This code is free for use by anyone. It is meant as a learning tool and can be passed along in any format.
class parseTMPL
'Dimension variables
private g_sTMPLFILE
private g_oDict
'作者:yanek
'email:[email protected]
本程序通过vbs类处理模板实现代码与界面分离的程序,主要有下面文件组成
index.asp,parse_cls.asp,template.html
下面是代码
1。index.asp 调用vbs类处理模板
<%
'作者:yanek
'email:[email protected]
'--- ---
' index.asp
'------ ----
' (c)2000 James Q. Stansfield ([email protected])
' This code is free for use by anyone. It is meant as a learning tool and can be passed along in any format.
option explicit
%>
<%
'Declare our variables
dim g_oPageGen
'Cerate the class object
set g_oPageGen = New parseTMPL
'Set the template file
g_oPageGen.TemplateFile = "template.html"
'Add some custom tags to the dictionary
g_oPageGen.AddToken "title", "Template Example"
g_oPageGen.AddToken "copyright", "This is mine! All mine!"
g_oPageGen.AddToken "quote", """Tell Jabba I've got his money!""
--Han Solo, Star Wars 1977"
g_oPageGen.AddToken "menu", "Home Page
News Page
Link Page"
g_oPageGen.AddToken "content", "Welcome To My Home Page... Yadda Yadda Yadda!"
'Generate the page
g_oPageGen.GenerateHTML
'Destroy our objects
set g_oPageGen = nothing
%>
2。parse_cls.asp 处理模板类文件
<%
'作者:yanek
'email:[email protected]
'--- ---
' parse_cls.asp
' This code is free for use by anyone. It is meant as a learning tool and can be passed along in any format.
class parseTMPL
'Dimension variables
private g_sTMPLFILE
private g_oDict
相关文章
- 洛克王国世界风铃鲨怎么样 风铃鲨介绍一览 09-30
- 洛克王国世界茉莉亚怎么打 茉莉亚打法介绍 09-30
- 植物大战僵尸3植物羁绊玩法怎么玩 植物羁绊玩法介绍一览 09-30
- 地下城堡4夜魅天赋怎么点 夜魅天赋加点推荐 09-30
- 表达悲伤难过的句子(悲伤的句子越悲伤越好) 09-30
- 地下城堡4隐村门任务怎么做 隐村门任务流程攻略 09-30