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

首頁 > 編程 > ASP > 正文

ASP常用的系統配置函數

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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 汕头市| 西昌市| 西藏| 承德市| 军事| 黄梅县| 新巴尔虎右旗| 永州市| 元朗区| 闽清县| 应城市| 新源县| 钦州市| 上饶县| 木兰县| 驻马店市| 玉山县| 手游| 济源市| 壶关县| 廊坊市| 齐河县| 峨眉山市| 古交市| 峡江县| 南川市| 中阳县| 五常市| 阳城县| 喜德县| 铜山县| 新闻| 邻水| 清徐县| 台前县| 屯门区| 米脂县| 屏东县| 贡山| 大宁县| 西安市|