国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

ASP常用的系統配置函數

2024-05-04 11:00:47
字體：大 中 小
來源：轉載
供稿：網友
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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 松阳县| 香河县| 西华县| 米泉市| 元谋县| 武义县| 洱源县| 钟山县| 托克托县| 南宫市| 巴青县| 台南县| 东乌珠穆沁旗| 清河县| 阜阳市| 湖州市| 安吉县| 明溪县| 绩溪县| 化德县| 盐亭县| 东安县| 大田县| 普定县| 玉龙| 景洪市| 晋江市| 琼海市| 浦县| 安徽省| 眉山市| 建德市| 阆中市| 邹平县| 南康市| 庄河市| 屯门区| 河曲县| 阜南县| 大庆市| 双柏县|