subsaveconfig ()
dimfso, hf
setfso = server.createObject ("Scripting.FilesYstemObject")
sethf = fso.createtextfile (server.mappath ("../ inc/config.asp"), จริง)
hf.write "<" & "%" & vbcrlf
hf.write "constsitename =" & chr (34) & trim (คำขอ ("sitename")) & chr (34) & "'网站名称" & vbcrlf
hf.write "constsitetitle =" & chr (34) & trim (คำขอ ("sitetitle")) & ch (34) & "'网站标题" & vbcrlf
hf.write "constsiteurl =" & chr (34) & trim (คำขอ ("siteurl")) & chr (34) & "'网站地址" & vbcrlf
hf.write "%" & ">"
hf.close
sethf = ไม่มีอะไร
setfso = ไม่มีอะไร
enddub