织梦如何实现自动更新主页功能

织梦如何实现自动更新主页功能？

推荐学习：织梦cms

织梦DEDECMS实现自动更新主页功能

e新时代企业网站管理系统6.0 ACC版

系统共有：常规管理，公告管理，新闻管理，产品管理，采购订单管理，留言反馈管理，短信管理，用户管理，管理员管理，在线邮件管理，系统模板管理，图品缩略图及水印管理，Flash幻灯片管理，统计调查管理，系统数据调用管理，自定义扩展管理，语言标签库管理。18个主要功能模块组成。5月10号更新：1、全新双语模式设计开发2、多级动态JS菜单，支持在线添加，修改，删除3、新增单页管理模块，如扩展企业简介，联系方

下载

GetOne("Select uptime From `cmsxx_arccache` where md5hash = 'autonew';"); 
if(!is_array($row)) exit(autonew(5)); 
$interval=60;  //时间 秒 
if(time() - $row['uptime'] < $interval ) exit(); 
autonew($no); 
function machom($no=''){ 
define('DEDEADMIN', ereg_replace("[/\\]{1,}",'/',dirname(__FILE__) ) ); 
require_once(dirname(__FILE__)."/../include/common.inc.php"); 
require_once(dirname(__FILE__)."/../include/arc.partview.class.php"); 
$dsql = new DedeSql(false); 
$row  = $dsql->GetOne("Select * From cmsxx_homepageset"); 
$dsql->Close(); 
$templet=$row['templet']; 
$position=$row['position']; 
$homeFile = DEDEADMIN."/".$position; 
$homeFile = str_replace("\\","/",$homeFile); 
$homeFile = str_replace("//","/",$homeFile); 
$templet = str_replace("{style}",$cfg_df_style,$templet); 
$pv = new PartView(); 
$GLOBALS['_arclistEnv'] = 'index'; 
$pv->SetTemplet($cfg_basedir.$cfg_templets_dir."/".$templet); 
$pv->SaveToHtml($homeFile); 
} 
function autonew($no=''){ 
  global $dsql; 
    $sql = "SELECT id FROM `cmsxx_archives` where arcrank <>'0'  limit $no ;"; 
    $dsql->SetQuery($sql); 
    $dsql->Execute(); 
    while($row = $dsql->GetArray()){ 
        $id = $row['id']; 
        $time = time() - rand(0,$interval * 10); 
        $dsql->ExecuteNoneQuery("Update `cmsxx_arctiny` set `arcrank`='0', `sortrank`='$time' where id = '$id';"); 
        $dsql->ExecuteNoneQuery("Update `cmsxx_archives` set `arcrank`='0', `sortrank`='$time', `pubdate`='$time' where id = '$id';"); 
    } 
    machom($no); 
    $dsql->ExecuteNoneQuery("Update `cmsxx_arccache` set  `uptime`=".time()." where md5hash = 'autonew'"); 
} 
?>