利用FSO生成静态页

最新推荐文章于 2024-07-20 17:22:43 发布
最新推荐文章于 2024-07-20 17:22:43 发布
阅读量533 收藏
点赞数
文章标签： date border sql
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/jojozhuang/article/details/1373562
版权
 利用FSO生成静态页 
 

    Filename = now ()
    Filename = replace (Filename, " - " , "" )
    Filename = replace (Filename, "   " , "" ) 
    Filename = replace (Filename, " : " , "" )
    Filename = replace (Filename, " PM " , "" )
    Filename = replace (Filename, " AM " , "" )
    Filename = replace (Filename, " 上午 " , "" )
    Filename = replace (Filename, " 下午 " , "" ) 
     Dim  Title,Content,Fso,Shtml
    Title = Replace (Request( " title " ), " ' " , " ‘ " )
    Content = Replace (Request( " content " ), " ' " , " ‘ " )
     Rem  显示页面在这里，最好是做成一个模板，直观而且便于修改
    Shtml = Shtml & " <html><meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312""> "
    Shtml = Shtml & " <title> " & Title & " </title> "
    Shtml = Shtml & " <style>td{font-size:12px;line-height:20px;}</style> "
    Shtml = Shtml & " <body> "
    Shtml = Shtml & " <table width=""500"" border=""0"" align=""center"" cellpadding=""0"" cellspacing=""0""> "
      Shtml = Shtml & " <tr> "
    Shtml = Shtml & " <td height=25 bgcolor=#F5F5F5><b> " & Title & " </b>[发布时间： " & Now () & " ]</td> "
    Shtml = Shtml & " </tr> "
    Shtml = Shtml & " <tr> "
    Shtml = Shtml & " <td> " & content & " </td> "
    Shtml = Shtml & " </tr> "
    Shtml = Shtml & " </table> "
    Shtml = Shtml & " </body> "
    Shtml = Shtml & " </html> "
     Set  Fso = Server.CreateObject( " Scripting.Filesystemobject " )
     IF   Not  Fso.Folderexists(Server.MapPath( " news/ " & date ()))  Then
    Fso.CreateFolder(Server.MapPath( " news/ " & date ()))
     End   IF
     Set  oFile = Fso.Createtextfile(server.mappath( " news/ " & date () & " / " & Filename & " .shtml " ), true )
    oFile.Write Shtml
     Set  oFile = Nothing
     Set  Fso = Nothing
    Sql = " Insert into [article] (title,content,[filepath],fbdate) values (' " & title & " ',' " & content & " ','news/ " & date () & " / " & Filename & " .shtml',' " & now () & " ') "
    Conn.Execute(Sql)
    Response.Write  " <script>alert('发布成功');location.href='add.asp'</script> "

 

jojozhuang
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
简单ASP使用FSO生成静态页源码
02-17
在ASP中，我们可以使用ADODB（ActiveX Data Objects）连接并操作这个数据库，获取需要的数据，然后通过FSO生成静态页面。 最后，"content"文件可能包含具体的页面内容，比如文章正文、图片或其他媒体资源。在生成...
fso自动生成html,不用模板只用ASP+FSO生成静态HTML页的一个方法
weixin_42311375的博客
05-31 77
不用模板只用ASP+FSO生成静态HTML页的一个方法更新时间：2006年09月08日 00:00:00 作者：不用模板，只用ASP+FSO生成静态HTML页的一个方法(对于内容密集型页面特别适用)转载请注明：转自http://goaler.xicp.netFSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题，至少我是这么认为的，还要别外做一个模板，麻烦！，我今天看见有一个方法可...
不用模板，只用ASP+FSO生成静态HTML页的一个方法（对于内容密集型页面特别适用）
记事本
09-07 600
FSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题，至少我是这么认为的，还要别外做一个模板，麻烦！，我今天看见有一个方法可以解决这个问题 如一个正常的index.asp页面，并且用ASP代码调出数据库中的内容，另建一个makehtml.asp的页面，加入一个textarea域，假设为name="body"，将index.asp在textarea里
不用模板，只用ASP+FSO生成静态HTML页的一个方法
02-23 535
FSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题，至少我是这么认为的，还要别外做一个模板，麻烦！，我今天看见有一个方法可以解决这个问题 如一个正常的index.asp页面，并且用ASP代码调出数据库中的内容，另建一个makehtml.asp的页面，加入一个textarea域，假设为name="body"，将index.asp在textarea里调出来，如： ，将这个textare
不用模板只用ASP+FSO生成静态HTML页的一个方法(转)
csd3176的博客
09-18 108
不用模板只用ASP+FSO生成静态HTML页的一个方法(转)[@more@]　　FSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题，至少我是这么认为的，还要别外做一个模板，麻烦！，我今天看见有一个方法可以解决这个...
关于FSO静态生成技术的应用范围之解决思路
bigcn的专栏
05-18 1681
自从FSO技术出现，我们可以静态生成网页。可以生成后缀为"htm,html..."也可以生成".asp"的网页。其实只要是静态生成，即使生成的文件名称后缀是".asp"的文件，也应该理解为静态生成，因为读取的时候毕竟不需要读取数据库。静态生成的优缺点：静态生成的优点：读取生成页面的时候不需要读取数据库，这样对于访问量极大的网站，这个优点是无可取代的。所以纵观国内（国际）大型新闻
asp fso静态生成页面
09-09
以下是使用ASP和FSO生成静态页面的基本步骤： 1. **创建HTML模板**：首先，你需要一个HTML模板，其中包含动态内容将被插入的位置。这些通常用特殊的标记表示，例如`<!--#include virtual="..." -->`或`<% ... %>`。...
fso asp生成静态html的代码
10-30
在ASP（Active Server Pages）开发中，...总之，通过ASP和FSO生成静态HTML文件，可以显著提升网站性能，减少服务器负担。虽然这种方法简单实用，但在实际项目中还需要根据具体需求和服务器环境进行适当的优化和调整。
几种asp生成静态页面
03-20
在Web开发中，生成静态页面是优化网站性能、提高搜索引擎友好性的一种常见做法。静态页面是预先编译好的HTML文件，直接由Web服务器发送到客户端，而不需要服务器进行实时解析和执行。 一、ASP生成静态页面的几种...
asp静态页生成类 FSO生成静态类
web开发自学
10-20 87
asp静态页生成类FSO生成静态类 看到好东西怎么能不收藏呢，留下备用，呵呵~~ &lt;% '/************************* '/属性设置说明 '/foldename"文件夹名",如果不设置,将自动生成[年月日]时间格式的文件夹名 '/Filename"文件名"(含前后缀),如果不设置,将自动生成[时分秒]时间格式的文件名,后缀为.html '/Htmlstr"生成的代码内...
FSO方法列表
06-13 1242
方法：BuildPath语法：对象名.BulidPath(路径,文件名)说明：在路径上添加文件名，如果有需要的话，会自动加上/分隔符。方法：CopyFile语法：对象名.CopyFile(源路径,目标路径[,是否覆盖])说明：将一个或多个文件从源位置复制到目标位置。源位置支持通配符，如果目标路径最后字符为/则认为目标路径是目录，是否覆盖参数默认值为TURE，如果目标位置文件已经存在，而是否覆盖
简单的FSO生成html文件
x196231222
08-04 331
<br /><% <br />strHead=strHead& "A<br>"<br />str0=str0& "你好！<br>"<br />ref=ref& "我们！<br>"<br />for j=1 to 2<br />Dim fso,f<br />Dim strTitle,strContent,strOut<br />'创建文件系统对象<br />Set fso=Server.createObject("Scripting.FileSystemObject")<br />Set f=fso.crea
fso自动生成html,ASP用FSO生成HTML简单实例+详解[原创]
weixin_31764271的博客
05-31 124
以下为引用的内容：Dim post,filename,path,path1,yes,contentpost=request("post")filename=request("filename")path=request("path")path1=replace(path,"/","")yes=request("yes")content=request("content")If post=1 The...
PostgreSQL 中如何解决因大量并发删除和插入操作导致的索引抖动？
技术笔记
07-17 840
索引抖动是 PostgreSQL 中一个常见的问题，它会对数据库的性能产生严重的影响。通过采用批量操作、分区表、索引优化和调整数据库参数等方法，我们可以有效地解决索引抖动问题，提高数据库的性能和稳定性。在实际应用中，我们应该根据具体情况选择合适的解决方案，并不断地进行优化和调整，以满足业务的需求。解决索引抖动问题就像是一场战斗，我们需要根据敌人（问题）的特点和弱点，选择合适的武器（解决方案），并灵活运用战术（优化方法），才能取得最终的胜利。
多租户架构的艺术：在SQL Server中实现数据库的多租户
最新发布
2401_85762266的博客
07-20 326
多租户架构允许多个租户共享相同的应用程序和数据库架构，每个租户的数据被逻辑上隔离。这种架构的优势在于成本效益和可扩展性，但同时也带来了数据隔离、性能和安全性的挑战。
利用窗体vba生成txt
12-07
利用窗体VBA生成txt文件可以通过使用VBA代码来实现。首先，我们需要创建一个窗体，可以在窗体上添加输入框或者文本框来获取用户输入的文本内容。然后，我们需要编写VBA代码来获取窗体上用户输入的文本内容，并将其...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值