<% '************************************************************** ' Software name: PowerEasy SiteWeaver ' Web: http://www.powereasy.net ' Copyright (C) 2005-2008 佛山市动易网络科技有限公司 版权所有 '************************************************************** ChannelID = 0 If fso.FileExists(Server.mappath("NotInsalled.txt")) Then Response.Write "
  • 请先运行 Install.asp 以进行系统安装过程!


  • " Response.Write "
  • 如果你已经反复运行此程序,但仍然出现此提示,请使用FTP工具手动删除 NotInstalled.txt 文件。
  • " Response.End End If If FileName_SiteIndex <> "Index.asp" Then Call CloseConn Response.Redirect FileName_SiteIndex Else If CurrentPage > 1 Or PE_Cache.CacheIsEmpty("Site_Index") Then Call GetHTML_SiteIndex If CurrentPage = 1 Then PE_Cache.SetValue "Site_Index", strHtml Else strHtml = PE_Cache.GetValue("Site_Index") End If Response.Write strHtml End If Call CloseConn %>