asp生成html页面的模板类

转载 2007年09月14日 09:40:00
一直就想把页面静态化的功能实现
正好现在的项目用得到,写了一个简单的类
过几天再细化一下
 
<script type="text/javascript">google_ad_client = "pub-2048279401139630";google_ad_slot = "8856771542";google_ad_width = 728;google_ad_height = 90;document.write("<s"+"cript type='text/javascript' s"+"rc='http://pagead2.googlesyndication.com/pagead/show_ads"+"."+"js'></scr"+"ipt>");</script>
<%
'-------------------------------------------------------
'
模板类
'
blindcat
'
2006/07/12
'
-------------------------------------------------------

Class cls_Template
    
Private fso
    
Private html_in
    
Private html_out
    
Private htmlcode
    

    
'类初始化
    Private Sub Class_Initialize()
        
Set fso=Server.CreateObject("Scripting.FileSystemObject"
    
End Sub

    
    
'载入模板文件
    Public Sub loadTemplate(template)
        
On Error Resume Next
        
Set html_in=fso.OpenTextFile(Server.MapPath(template))  
        htmlcode 
= html_in.ReadAll
        html_in.close
        
Set html_in = Nothing  
    
End Sub

    
'替换模板内容
    Public Sub replaceTag(sourceTag,targetTag)
        htmlcode 
= Replace(htmlcode,sourceTag,targetTag)
    
End Sub
    
        
    
'生成html文件
    Public function makeHtml(htmlPath,filename)
        makeHtml 
= false
        
'On Error Resume Next
        Set fso = Server.CreateObject("Scripting.FileSystemObject")
        
if htmlpath<>"" then
            
if Not fso.FolderExists(Server.MapPath(htmlpath))then
                fso.CreateFolder Server.MapPath(htmlPath)
            
end if
            
if Not fso.FolderExists(Server.MapPath(htmlpath&"img/")) then
                fso.CopyFolder Server.MapPath(
"/template"),Server.MapPath(htmlpath),True
                
'fso.CopyFile Server.MapPath("cls_template.asp"),Server.MapPath("tttt.asp"),True
            end if
        
end if    
        
Set html_out = fso.CreateTextFile(Server.MapPath(htmlPath&filename))
        html_out.Write htmlcode
        html_out.close
        
Set html_out = Nothing
        makeHtml 
= true
    
End Function


    
Private Sub class_terminate()
        
set fso=Nothing 
    
End Sub 

end Class
%
>
<script type="text/javascript">google_ad_client = "pub-2048279401139630";google_ad_slot = "8856771542";google_ad_width = 728;google_ad_height = 90;document.write("<s"+"cript type='text/javascript' s"+"rc='http://pagead2.googlesyndication.com/pagead/show_ads"+"."+"js'></scr"+"ipt>");</script>

ASP.NET MVC使用HTML模板进行静态化操作

使用html模板加上自定义占位符是常见的页面静态化方法,本文将分享在asp.net mvc项目中使用静态模板进行静态化的具体代码。其实具体的实现原理还是蛮简单的,这种方法需要编写对应的html模板页,...
  • yhyhyhy
  • yhyhyhy
  • 2016年04月28日 14:18
  • 2435

ASP.NET MVC 利用Razor引擎生成静态页

实现原理及步骤: 1.通过ViewEngines.Engines.FindView查找到对应的视图,如果是部分视图,则用:ViewEngines.Engines.FindPartialView; 2....
  • a497785609
  • a497785609
  • 2016年05月09日 17:54
  • 3608

HTML动态生成模板(2)

如何通过模板动态生成HTML代码? 看过我写的(1)版本的可能都很清楚,如何通过text/html类型的script标签动态生成html代码。 那么今天我就和大家说说另一种更加牛掰的方式...
  • u013059555
  • u013059555
  • 2016年04月29日 16:36
  • 3418

asp.net mvc+jquery easyui开发实战教程之网站后台管理系统开发4- 后台模板html页面创建

上一篇教程《asp.net mvc+jquery easyui开发实战教程之网站后台管理系统开发3-登录模块开发》完成了本项目的登录模块,登录后就需要进入后台管理首页了,需要准备一个后台模板,本文主要...
  • guandebaokwstu
  • guandebaokwstu
  • 2017年11月07日 11:50
  • 301

Asp.net动态生成html页面

  • 2008年10月11日 16:06
  • 30KB
  • 下载

asp.net生成静态HTML页面

  • 2009年10月29日 11:58
  • 35KB
  • 下载

ASP生成静态HTML页面

  • 2009年02月24日 21:15
  • 1KB
  • 下载

asp.net生成html页面

  • 2009年09月12日 10:22
  • 11KB
  • 下载

ASP生成静态Html页面功能

我希望大家看到该标题就能让想象到它的功能:1,WITH TEMPLET意思是,生成的页面架构将采用某个已设定的模板,在此之前我的一篇教程中介绍过,希望各位在看本教程之前对ASP采用模板应熟悉下。(当然...
  • yeorange
  • yeorange
  • 2011年03月23日 17:01
  • 1349

ASP.NET技术动态生成HTML页面

====================================================== 注:本文源代码点此下载 =============================...
  • javazhuanzai
  • javazhuanzai
  • 2012年01月15日 01:35
  • 130
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:asp生成html页面的模板类
举报原因:
原因补充:

(最多只允许输入30个字)