繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP常用的系统配置函数
- ASP
- 揭开ASP神秘面纱(2)
- 揭开ASP神秘面纱(3)
- 揭开ASP神秘面纱(4)
- 揭开ASP神秘面纱(5)
- 让网站活起来(1)
- 让网站活起来(2)
- 让网站活起来(3)
- 让网站活起来(4)
- 如何在ASP.Net中取得环境变量的值
- 将HTML表单数据存储为XML格式(1)
- 将HTML表单数据存储为XML格式(2)
- 将HTML表单数据存储为XML格式(3)
- ASP.Net调试之三板斧：第一招
- ASP.Net调试之三板斧：第二招
- ASP.Net调试之三板斧：第三招
- 新闻更新系统(1)
- 新闻更新系统(2)
- 新闻更新系统(3)
- ubb风格论坛中自您上次来后有新的贴子的功能的asp实现
- 一个新版本的ubb转化程序
ASP常用的系统配置函数
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 227 ::
收藏到网摘: n/a
这个函数多用来后台表单设置，然后生成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
评论 (0) All
