返回   CHF站长论坛 > 综合讨论区 > 网站开发与设计

网站开发与设计 网页设计、网站开发、网站维护与调试交流区。

双至强仅二千,企商在线,最早租用商 魔兽世界私服 魔兽世界私服 亿恩1元帮您升级服务器! 天龙八部私服 完美世界私服 新开传奇私服
传奇私服 热血江湖私服 仙境私服 天龙八部私服 魔域私服 魔域私服 新开传奇私服 魔域私服 传奇私服
发表新主题 回复
 
主题工具 主题评分 显示模式
旧 2006-05-19, 14:30   #1 (页面定位)
小叶
 
注册日期: 2005-09-04
住址: 火星人
帖子: 17760
小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星小叶 是一位成功的新星
默认 GG SiteMaps 自动生成程序 [php]

将下程序生成PHP文件放到网站根目录运行即可自动生成
PHP 代码:
<?

//================== XML文件格式 ==================//
function sitemap($strxml) {
        global 
$part;
        
$xmlstr.="   <url>\n";
        
$xmlstr.="      <loc>".$strxml."</loc>\n";
        
$xmlstr.="      <lastmod>".date("Y-m-d")."</lastmod>\n";
        
$xmlstr.="       <changefreq>weekly</changefreq>\n";
        
//$xmlstr.="      <priority>".$part."</priority>\n";
        
$xmlstr.="      <priority>0.6</priority>\n";
        
$xmlstr.="   </url>\n";
        return 
$xmlstr;
}

//================== 获取目录中文件信息 ==================//
function fileinfo($dir_name) {
        global 
$dir_len,$part,$fp,$url;
        
$part+=0.3;
        
$dir opendir($dir_name);
        while(
$file_name readdir($dir)){
                if ((
$file_name != ".") && ($file_name != "..")) {
                        if(
is_dir($dir_name.'/'.$file_name)){
                                
fileinfo($dir_name.'/'.$file_name);
                        }else{
                                
$pi=pathinfo($file_name);
                                if(
$pi["extension"]=="htm" || $pi["extension"]=="asp" || $pi["extension"]=="php"){
                                        @
fwrite($fpsitemap($url.substr($dir_name.'/'.$file_name,$dir_len)));
                                }
                        }
                }
        }
}

$url='http://'.$_SERVER['SERVER_NAME'];
$part=0.3;
$dir_name dirname(realpath("./sitemap.php"));
$dir_len=strlen($dir_name);
if(
file_exists("$dir_name/sitemap.xml")) unlink("$dir_name/sitemap.xml");
@
$fp fopen("sitemap.xml"'a');
@
flock($fp2);
@
fwrite($fp"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
@
fwrite($fp"<urlset xmlns=\"http://www.google.com/schemas/sitemap/0.84\">\n");
fileinfo($dir_name) ;
@
fwrite($fp"</urlset>\n");
@
fclose($fp);
?>


匆匆人生中,你做了几件令自己骄傲的事呢?
小叶 当前离线   回复时引用此帖
旧 2006-05-22, 03:29   #2 (页面定位)
goosun
 
注册日期: 2006-03-31
帖子: 172
goosun 是普普通通的会员
默认

将下程序生成PHP文件放到网站根目录运行即可自动生成

PHP 代码:
<?

//================== XML文件格式 ==================//
function sitemap($strxml) {
global $part;
$xmlstr.=" <url>\n";
$xmlstr.=" <loc>".$strxml."</loc>\n";
$xmlstr.=" <lastmod>".date("Y-m-d")."</lastmod>\n";
$xmlstr.=" <changefreq>weekly</changefreq>\n";
//$xmlstr.=" <priority>".$part."</priority>\n";
$xmlstr.=" <priority>0.6</priority>\n";
$xmlstr.=" </url>\n";
return $xmlstr;
}

//================== 获取目录中文件信息 ==================//
function fileinfo($dir_name) {
global $dir_len,$part,$fp,$url;
$part+=0.3;
$dir = opendir($dir_name);
while($file_name = readdir($dir)){
if (($file_name != ".") && ($file_name != "..")) {
if(is_dir($dir_name.'/'.$file_name)){
fileinfo($dir_name.'/'.$file_name);
}else{
$pi=pathinfo($file_name);
if($pi["extension"]=="htm" || $pi["extension"]=="asp" || $pi["extension"]=="php"){
@fwrite($fp, sitemap($url.substr($dir_name.'/'.$file_name,$dir_len)));
}
}
}
}
}

$url='http://'.$_SERVER['SERVER_NAME'];
$part=0.3;
$dir_name = dirname(realpath("./sitemap.php"));
$dir_len=strlen($dir_name);
if(file_exists("$dir_name/sitemap.xml")) unlink("$dir_name/sitemap.xml");
@$fp = fopen("sitemap.xml", 'a');
@flock($fp, 2);
@fwrite($fp, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
@fwrite($fp, "<urlset xmlns=\"http://www.google.com/schemas/sitemap/0.84\">\n");
fileinfo($dir_name) ;
@fwrite($fp, "</urlset>\n");
@fclose($fp);
?>
goosun 当前离线   回复时引用此帖
旧 2006-05-22, 05:48   #3 (页面定位)
极品蜗牛
 
极品蜗牛 的头像
 
注册日期: 2005-10-20
帖子: 675
极品蜗牛 是一个将要出名的人极品蜗牛 是一个将要出名的人极品蜗牛 是一个将要出名的人极品蜗牛 是一个将要出名的人极品蜗牛 是一个将要出名的人极品蜗牛 是一个将要出名的人
默认

好东西...谢谢


 
网不易
 
极品蜗牛 当前离线   回复时引用此帖
回复

书签

标签

主题工具
显示模式 对此主题评分
对此主题评分:



所有时间均为北京时间。现在的时间是 08:33