ASP常用的系统配置函数

2018-09-06 13:02

阅读:314

  subSaveConfig()
dimfso,hf
setfso=Server.CreateObject(Scripting.FileSystemObject)
sethf=fso.CreateTextFile(Server.mappath(../inc/config.asp),true)
hf.write<&%&vbcrlf
hf.writeConstSiteName=&chr(34)&trim(request(SiteName))&chr(34)&网站名称&vbcrlf
hf.writeConstSiteTitle=&chr(34)&trim(request(SiteTitle))&chr(34)&网站标题&vbcrlf
hf.writeConstSiteUrl=&chr(34)&trim(request(SiteUrl))&chr(34)&网站地址&vbcrlf
hf.write%&>
hf.close
sethf=nothing
setfso=nothing
endsub


评论


亲,登录后才可以留言!