<!--#include file="inc.asp"-->
<%
 '只适用于更新页面\
     If indextime<>0 Then
   		Set fsoi = YXFSO
		 If fsoi.FileExists(server.MapPath(HOPE_InstallDir&"index.html")) Then
    	 Set fmodifyi = fsoi.GetFile(server.MapPath(HOPE_InstallDir&"index.html"))
 		  ShowDateModifiedi = fmodifyi.DateLastModified
 		  dtimei=DateDiff("s",ShowDateModifiedi,now())
		  mtimei=dtimei/60
       If cint(trim(mtimei))>=cint(indextime) Then
  		  Set rs=Server.createobject("ADODB.RecordSet")
		  rs.Open ("select home_index  from [Yixiang_worldec_Temp] where yx_selected=1"),conn,1,1
			If rs.Eof Then
			  Response.Write("<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color=red>对不起！该模版不存在！</font><a href='#' onclick='javascript:history.back(-1);'>返回</a>")
			  Response.End()
			Else
			  Code_index=rs("home_index") 
			  rs.Close       
			End If
				stri= Hope_HtmlResult(Code_index) 
				Set sort_savei = fsoi.CreateTextFile(Server.Mappath(HOPE_InstallDir&"index.html"))
				sort_savei.Write stri&"<script src="&HOPE_InstallDir&"autoindex/index_html.asp></script>"
				sort_savei.Close
	    End If
		End If
	  End If
%>