ASP常用的系统配置函数
更新时间：2008年04月29日 22:22:32 作者：
这个函数多用来后台表单设置，然后生成asp配置文件的函数，这样不用每次都读取数据库，提高程序速度
sub SaveConfig()
dim fso,hf
set fso=Server.CreateObject("Scripting.FileSystemObject")
set hf=fso.CreateTextFile(Server.mappath("../inc/config.asp"),true)
hf.write "<" & "%" & vbcrlf
hf.write "Const SiteName=" & chr(34) & trim(request("SiteName")) & chr(34) & " '网站名称" & vbcrlf
hf.write "Const SiteTitle=" & chr(34) & trim(request("SiteTitle")) & chr(34) & " '网站标题" & vbcrlf
hf.write "Const SiteUrl=" & chr(34) & trim(request("SiteUrl")) & chr(34) & " '网站地址" & vbcrlf
hf.write "%" & ">"
hf.close
set hf=nothing
set fso=nothing
end sub
dim fso,hf
set fso=Server.CreateObject("Scripting.FileSystemObject")
set hf=fso.CreateTextFile(Server.mappath("../inc/config.asp"),true)
hf.write "<" & "%" & vbcrlf
hf.write "Const SiteName=" & chr(34) & trim(request("SiteName")) & chr(34) & " '网站名称" & vbcrlf
hf.write "Const SiteTitle=" & chr(34) & trim(request("SiteTitle")) & chr(34) & " '网站标题" & vbcrlf
hf.write "Const SiteUrl=" & chr(34) & trim(request("SiteUrl")) & chr(34) & " '网站地址" & vbcrlf
hf.write "%" & ">"
hf.close
set hf=nothing
set fso=nothing
end sub
相关文章
用asp脚本实现限制IP访问...2007-06-06
验证码识别技术...2007-02-02
ASP中实现的URLEncode、URLDecode自定义函数
这篇文章主要介绍了ASP中实现的URLEncode、URLDecode自定义函数,和ASP自带的server.urlencode是不一样的哦,需要的朋友可以参考下2014-07-07
SQLServer ADODB.Recordset 错误“800a0e78”，对象关闭时，不允许操作
今天在帮一个客户维护网站的时候，运行asp提示ADODB.Recordset 错误“800a0e78”，对象关闭时，不允许操作，原来是asp与sqlserver的连接出问题导致2014-07-07
使用XMLDOM在不支持FSO的服务器上...2006-08-08
asp中去除html中style,javascript,css代码
剔除页面中html中除文字以外的任何代码，刚才发布了php版这个是ASP中的版本。2010-10-10
PR值查询代码制作...2006-08-08
asp下将数据库中的信息存储至XML文件中...2007-04-04
检测ASP图片木马的函数。由于FSO无法读取客户端文件的内容，所以只能在文件上传到服务器后再打开文件进行内容检查。2010-09-09
asp下调试程序的debug类...2007-04-04
最新评论