生成静态页
来源:百度文库 编辑:神马文学网 时间:2024/04/27 15:34:35
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mydb As New AccessDb
Dim myReader As OleDb.OleDbDataReader
‘读取模板布局html代码
Dim myTemplate As String
myReader = mydb.ExecuteSqlStrDetails("select * from Portal_templates where templateId=1")
If myReader.Read Then
myTemplate = myReader("TemplateBody")
End If
myReader.Close()
‘读取文章信息
Dim myArticleBody As String
myReader = mydb.ExecuteSqlStrDetails("select * from portal_articles where articleid=2")
If myReader.Read Then
myArticleBody = myReader("content")
End If
myReader.Close()
‘组合成要生成静态页
Dim myHtml As String
myHtml = Replace(myTemplate, "‰ArticleContent‰", myArticleBody)
‘生成静态页
Dim path As String = Server.MapPath(".") & "\article2.htm"
If File.Exists(path) = False Then
‘ Create a file to write to.
Dim sw As StreamWriter = File.CreateText(path)
sw.Write(myHtml)
sw.Flush()
sw.Close()
End If
Response.Write("Success!")
End Sub
Dim mydb As New AccessDb
Dim myReader As OleDb.OleDbDataReader
‘读取模板布局html代码
Dim myTemplate As String
myReader = mydb.ExecuteSqlStrDetails("select * from Portal_templates where templateId=1")
If myReader.Read Then
myTemplate = myReader("TemplateBody")
End If
myReader.Close()
‘读取文章信息
Dim myArticleBody As String
myReader = mydb.ExecuteSqlStrDetails("select * from portal_articles where articleid=2")
If myReader.Read Then
myArticleBody = myReader("content")
End If
myReader.Close()
‘组合成要生成静态页
Dim myHtml As String
myHtml = Replace(myTemplate, "‰ArticleContent‰", myArticleBody)
‘生成静态页
Dim path As String = Server.MapPath(".") & "\article2.htm"
If File.Exists(path) = False Then
‘ Create a file to write to.
Dim sw As StreamWriter = File.CreateText(path)
sw.Write(myHtml)
sw.Flush()
sw.Close()
End If
Response.Write("Success!")
End Sub
生成静态页
php生成静态页
php生成静态页,分页
php生成静态页,分页
ASP.NET生成HTML静态页的一个类
网站生成静态页面攻略
动态网站首页的静态生成方法
网站生成静态页面攻略88
不用模板,只用ASP+FSO生成静态HTML页的一个方法(对于内容密集型页面特别适用)
ASP生成静态网页的方法ASP技术【推荐】
JSP生成静态HTML页面的几种方法
ASP生成静态网页的方法ASP技术【推荐】
Asp.NET 生成静态页面并分页的代码实现
Asp.NET 生成静态页面并分页的代码00
ASP生成静态HTML文件大荟萃【一】
用libtemplate实现静态网页生成-IT技术库 Kujs.COM
动态生成的ASP文件转换成静态的格式 Web 开发 / ASP
介绍一种用ASP+模板生成Word、Excel、静态页面一种简单、灵活多变的办法[原创] ...
ASP+模版技术生成静态HTML网页实例 - 恬悟 -- IT博客-中国最具人气的IT博客-赛迪网IT人家园
静态混合器
:静态资源:
静态混合器
静态数据成员和静态函数成员
静态页面传参数