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



相关阅读:
比较简单实用的使用正则三种版本的js去空格处理方法
实现 win2003 下 mysql 数据库每天自动备份
HTML表格标记教程(17):表格标题垂直对齐属性VALIGN
Windows Server 2008:服务器与域分离
没有form表单情况下敲回车键提交表单的js代码
一句话JavaScript表单验证代码
Access 2007 创建和使用附件字段
phpBB 3.0.6 RC1简单介绍和下载
让批处理被wsh解析的代码
PHP下利用shell后台运行PHP脚本,并获取该脚本的Process ID的代码
JGrid中拖动改变列宽的脚本 原型
PHP循环语句笔记(foreach,list)
总结AJAX相关JS代码片段和浏览器模型
MySQL 查找价格最高的图书经销商的几种SQL语句
快速导航

Copyright © 2016 phpStudy |