SubsaveConfig ()
Dimfso, Hf
setfso = server.createObject ("scripting.filesystemobject")
sethf = fso.createtextfile (server.mappath ("../ inc/config.asp"), true)
hf.write "<" & "%" & vbcrlf
hf.write "constsiteName =" & chr (34) & trim (request ("siteName")) и Chr (34) & "'网站名称" & vbcrlf
hf.write "constsiteTitle =" & chr (34) & trim (запрос ("sitetitle")) и Chr (34) & "'网站标题" & vbcrlf
hf.write "constsiteurl =" & chr (34) & trim (request ("siteurl")) и chr (34) & "'网站地址" & vbcrlf
hf.write "%" & ">"
hf.close
Sethf = ничего
setfso = ничего
заканчивая