asp 网站静态化函数代码html_应用技巧

复制代码 代码如下:

Function htmll(mulu,htmlmulu,FileName,filefrom,htmla,htmlb,htmlc,htmld)
if mulu="" then mulu="/"
if htmlmulu="" then htmlmulu="/"
mulu=replace(SysRootDir&mulu, "//", "/")
htmlmulu=replace(SysRootDir&htmlmulu, "//", "/")
FilePath=Server.MapPath(mulu)&"\"&FileName
Do_Url="http://"
Do_Url=Do_Url&Request.ServerVariables("server_name")&htmlmulu&filefrom
Do_Url=Do_Url&"?"&htmla&htmlb&"&"&htmlc&htmld
strUrl=Do_Url
set objXmlHttp=Server.createObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
binFileData=objXmlHttp.responseBody
Set objXmlHttp=Nothing
set objAdoStream=Server.CreateObject("Adodb." & "Stream")
objAdoStream.Type=1
objAdoStream.Open()
objAdoStream.Write(binFileData)
objAdoStream.SaveToFile FilePath,2
objAdoStream.Close()
set objAdoStream=nothing
End Function

时间： 2024-09-17 07:28:35

asp 网站静态化函数代码html_应用技巧的相关文章

asp 网站静态化函数代码html

复制代码 代码如下: Function htmll(mulu,htmlmulu,FileName,filefrom,htmla,htmlb,htmlc,htmld) if mulu="" then mulu="/" if htmlmulu="" then htmlmulu="/" mulu=replace(SysRootDir&mulu, "//", "/") htmlmulu=

ASP通用分页样式函数代码_应用技巧

<% '****************************** '函数:MultiPage(Numbers,Perpage,Curpage,Url_Add) '参数:Numbers,总记录数:Perpage,每页记录数:Curpage,当前页:Url_Add,当前页其它参数如?action=list& '作者:阿里西西 '日期:2007/7/15 '描述:ASP通用分页样式函数 '示例:MultiPage(100,10,2,"?action=list&")

fso asp生成静态html的代码_应用技巧

FSO生成静态HTML文件的时候替换模板标签一直是一个很麻烦的问题,至少我是这么认为的,还要别外做一个模板,麻烦!,我今天看见有一个方法可以解决这个问题         如一个正常的index.asp页面,并且用ASP代码调出数据库中的内容,另建一个makehtml.asp的页面,加入一个textarea域,假设为name="body",将index.asp在textarea里调出来,如:  <textarea name="body"><!--#i

捕捉并保存ASP运行错误的函数代码_应用技巧

过程名:catch(str) 使用方法: 复制代码 代码如下: on error resume next '你的代码,如数据库连接 call catch("显示给用户的提示信息") 功能:清除IIS的错误提示信息,自定义错误提示返回给用户,并将出错信息保存到txt文件(当然你也可以稍做修改转向自定义页面等) 代码: 复制代码 代码如下: <% option explicit '例一--------------------------- '必须和on error resume ne

asp base64加解密函数代码_应用技巧

复制代码 代码如下: <% sBASE_64_CHARACTERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/" sBASE_64_CHARACTERS = strUnicode2Ansi(sBASE_64_CHARACTERS) Function strUnicodeLen(asContents) '计算unicode字符串的Ansi编码的长度 asContents1="a&q

ASP URL反编码函数代码_应用技巧

例如:我们在百度中搜索 ,则网址后面的参数就是http://www.baidu.com/s?cl=3&wd=%BD%C5%B1%BE%D6%AE%BC%D2 如果我们想将%BD%C5%B1%BE%D6%AE%BC%D2还原为中文,使用下面的函数即可.<% response.write urldecode("http://www.baidu.com/s?cl=3&wd=%BD%C5%B1%BE%D6%AE%BC%D2") '=====================

asp.net textarea换行函数代码_实用技巧

复制代码 代码如下: /// <summary> /// 替换html中的特殊字符 /// </summary> /// <param name="theString">需要进行替换的文本.</param> /// <returns>替换完的文本.</returns> public string HtmlEncode(string theString) { theString=theString.Replace(&

网站静态化

随着SEO 的普及,静态化便成为网站开发的必要技术之一.网页设计 时,网站静态化通常有三种方法可以实现,一种是伪静态,一种是实实在在的静态页面,最后一种是pathinfo技术. 伪静态 下, 如果是apache服务器,是通过.htaccess文件来操作.如果是IIS服务器,则是通过httpd.ini和rewrite.dll来实现.伪静 态处理的关键技术是配置文件的规则如何得到有效的控制,并在html页面里对应起来,一旦规则改变,则html页面里的链接也需要根据规则动态的改变.后 台设置规则,并且

网页静态化-如何实现网站静态化，部分能实时显示

问题描述 如何实现网站静态化,部分能实时显示 我想做一个自己的论坛网站.我的想法是把这个网站的动态页面都静态化显示.但是有一个问题是,比如说 由于我网站的页面都是静态化的,我论坛的某个用户发了个帖子,怎么让这个帖子能实时显示出来. 解决方案 Ajax技术,可以实现对页面中局部区域的动态刷新,使得用户能够以更好的方式获得最新的数据信息.只更新需要查看的信息,页面中其他信息保持不变 解决方案二: 传统WEB应用需要定时AJAX获取.页面和后端不会保持长连接.