if runMode="0" then dim templateobj,templatePath : set templateobj = new TemplateClass templatePath=sitePath&"/"&"templates/"&setting.defaultTemplate&"/"&setting.htmlFilePath&"/index.html" if not CheckTemplateFile(templatePath) then echo "index.html"&err_16 with templateObj .content=loadFile(templatePath) .parseHtml() .parseCommon echo .content end with set templateobj =nothing : terminateAllObjects Else On Error Resume Next Server.Transfer(sitePath&setting.languagepath&"index"&FileExt) If -2147467259 = Err.Number Then Response.Charset="gbk":Response.Write "缺少首页文件,请登录后台生成首页文件!" end if If DebugMode Then echo timer - AppSpan %>