LeNgHoSt的小窝 » 代码 http://www.lenghost.cn I did it my way, 'Cause it's my life! Tue, 08 Nov 2011 23:39:26 +0000 http://wordpress.org/?v=2.9.2 en hourly 1 简单的自动添加(更新)sitemap的php代码 http://www.lenghost.cn/original/simple-auto-update-sitemap-php-code/ http://www.lenghost.cn/original/simple-auto-update-sitemap-php-code/#comments Sat, 26 Sep 2009 10:17:03 +0000 LeNgHoSt http://www.lenghost.cn/?p=835 之前的那个免费小说网 – http://www.cobeta.com收录一直不理想，几乎没什么流量。因为内容太庞大，原站搜索引擎收录有6位数，我曾经试过用软件生成sitemap，但速度太慢，跑一个小时才近千个链接。后来就有了这个想法，干脆让网站自动更新sitemap文件，于是上网搜索了php操作xml文件的相关教程，最后用PHP5自带的SimpleXML实现了该功能。

什么是 SimpleXML？
SimpleXML 是 PHP 5 中的新特性。在了解 XML 文档 layout 的情况下，它是一种取得元素属性和文本的便利途径。
与 DOM 或 Expat 解析器相比，SimpleXML 仅仅用几行代码就可以从元素中读取文本数据。

SimpleXML 可把 XML 文档转换为对象，比如：
元素 – 被转换为 SimpleXMLElement 对象的单一属性。当同一级别上存在多个元素时，它们会被置于数组中。
属性 – 通过使用关联数组进行访问，其中的下标对应属性名称。
元素数据 – 来自元素的文本数据被转换为字符串。如果一个元素拥有多个文本节点，则按照它们被找到的顺序进行排列。

当执行类似下列的基础任务时，SimpleXML 使用起来非常快捷：
读取 XML 文件
从 XML 字符串中提取数据
编辑文本节点或属性
不过，在处理高级 XML 时，比如命名空间，最好使用 Expat 解析器或 XML DOM。


以下代码实现向已有sitemap.xml文件中添加或更新内容。
如果网站内容很多，网址多了，sitemap.xml会变的很大，不知道读取写入速度会不会太慢。Google官方规定sitemap.xml里最多50000条地址，文件大小不得超过10MB。
P.S.我的免费小说网内容应该远远超过这个限制了，不过现在流量还很少，估计一时半会还到不了50000条地址，呵呵，到时候再改进下代码看看。

$xml=simplexml_load_file('sitemap.xml');
$update=0;
$xml_url=0;
foreach($xml->url as $xml_url){
    if((string)$xml_url->loc==$xmlurl){
        $update=1;
        break;
    }
}
if($update==1)
    $xml_url->lastmod=date('c');
else{
    $xml_url=$xml->addChild('url');
    $xml_url->addChild('loc',$xmlurl);
    $xml_url->addChild('lastmod',date('c'));
    $xml_url->addChild('changefreq','daily');
    $xml_url->addChild('priority','0.2');
}
$fp=fopen('sitemap.xml','w');
$xmlfile=$xml->asXML();
$xmlfile=str_replace('><','>'."\r\n".'<',$xmlfile);
fwrite($fp,$xmlfile);
fclose($fp);

生成的sitemap.xml文件内容如下：

<?xml version="1.0" encoding="UTF-8"?>
<urlset xmlns="http://www.sitemaps.org/schemas/sitemap/0.9">
<url>
<loc>http://cobeta.cn/xiaoshuo/anshi/1874467.htm</loc>
<lastmod>2009-09-26T13:27:59+04:00</lastmod>
<changefreq>daily</changefreq>
<priority>0.2</priority>
</url>
<url>
<loc>http://www.cobeta.cn/xiaoshuo/.../1539038.htm</loc>
<lastmod>2009-09-26T13:28:01+04:00</lastmod>
<changefreq>daily</changefreq>
<priority>0.2</priority>
</url>
<url>
<loc>http://www.cobeta.cn/xiaoshuo/.../1539039.htm</loc>
<lastmod>2009-09-26T13:28:10+04:00</lastmod>
<changefreq>daily</changefreq>
<priority>0.2</priority>
</url>
<url>
<loc>http://cobeta.cn/xiaoshuo/.../1874471.htm</loc>
<lastmod>2009-09-26T13:28:12+04:00</lastmod>
<changefreq>daily</changefreq>
<priority>0.2</priority>
</url>
</urlset>
]]> http://www.lenghost.cn/original/simple-auto-update-sitemap-php-code/feed/ 0 PHP远程下载图片并按照原目录保存图片的代码，破解防盗链 http://www.lenghost.cn/original/php-remote-download-and-save-to-file/ http://www.lenghost.cn/original/php-remote-download-and-save-to-file/#comments Sun, 17 Aug 2008 21:36:36 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=4 这几天发现我写的那个小偷程序用到的主站竟然也开始搞防盗链了，我那小偷程序所有的图片都显示不正常。。。上网查了下资料，写了下面的代码，用到了crul库，还好我的空间支持crul，呵呵！

curl 是使用URL语法的传送文件工具，支持FTP、FTPS、HTTP HTPPS SCP SFTP TFTP TELNET DICT FILE和LDAP。curl 支持SSL证书、HTTP POST、HTTP PUT 、FTP 上传，kerberos、基于HTT格式的上传、代理、cookie、用户＋口令证明、文件传送恢复、http代理通道和大量其他有用的技巧。

下载: pic.php
<?php   
 
/** 
 * @author LeNgHoSt 
 * @copyright 2008 
 */ 
 
$pic = $_SERVER['QUERY_STRING'];   
if(!preg_match("/.*\.jpg/", $pic)){   
    exit('图片读取错误!');   
}   
$fname='pic/'.$pic;   
if(file_exists($fname)){   
    header('Location: '.$fname);   
}else{   
    $ch = curl_init();   
    curl_setopt ($ch, CURLOPT_URL, $pic);   
    curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1);   
    curl_setopt ($ch, CURLOPT_REFERER, 'http://www.xxx.com'); /*破解防盗链*/ 
    curl_setopt ($ch, CURLOPT_USERAGENT, 'Mozilla/4.0 (compatible; MSIE 5.5; Windows 98)');   
    curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, 30);   
    $file_contents = curl_exec($ch);   
    curl_close($ch);   
    echo $file_contents;   
    $arr=split('/',$fname);   
    $max=count($arr);   
    $dir='';   
    for($i=0;$i<$max-1;$i++){   
        $dir.=$arr[$i].'/';   
        if(!file_exists($dir)){   
            @mkdir($dir,0777);   
        }   
    }   
    $fp=fopen($fname,'w');   
    if($fp){   
        fwrite($fp,$file_contents);   
        fclose($fp);   
    }   
}   
 
?>

使用方法：pic.php?http://www.xxx.com/xxx.jpg

]]> http://www.lenghost.cn/original/php-remote-download-and-save-to-file/feed/ 0 拒绝免费空间挂马！忽视html标签标记<XMP> http://www.lenghost.cn/tips/html-tag-xmp/ http://www.lenghost.cn/tips/html-tag-xmp/#comments Sat, 02 Aug 2008 21:58:49 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=7 申请过很多免费空间，但不是很慢就是服务器上挂马(当然也有放广告条的)
比如下面这个：

......
</table>
</body>
</html><iframe src=http://www.*******.cn/****.htm width=100 height=0></iframe><!-- 广告代码，不影响网站的访问 -->

这个空间上所有的html文件，在用户访问的时候都会在底部加上这么一行代码，虽然这段代码不显示广告，我的nod32也没提示木马，但还是看着它不爽，万一以后将那个地址换成木马了，后果不堪设想。

下面介绍下<XMP>这个HTML标签标记

<XMP>这个普通的标签大家很可能不熟悉，因为一般的，很少有人会用到它，其实，对于常与代码打交道的朋友来说，这是一个很实用的标签。
<XMP>标签本来是用于显示XML内容的，但是也可以让它使HTML标签不被浏览器识别。


我们可以在每个网页的底部加上<XMP>，这样即使被挂马，木马代码也是在<XMP>标签的后面，将不会被执行而是被直接显示在页面上。

</table>
</body>
</html>
<XMP><iframe src=http://www.*******.cn/****.htm width=100 height=0></iframe><!-- 广告代码，不影响网站的访问 -->

当然我们希望它既不执行也不显示，所以还要在css里加入
XMP {display:none;}。
这样几乎所有在文件底部挂马的情况，都可以用这种方法解决。

]]> http://www.lenghost.cn/tips/html-tag-xmp/feed/ 1 PHP学习成果：美女写真网图片小偷-PHP版 http://www.lenghost.cn/original/mmxzmm-php-version/ http://www.lenghost.cn/original/mmxzmm-php-version/#comments Fri, 01 Aug 2008 05:45:15 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=8 程序名称：美女写真网图片小偷-PHP版
官方网站：http://www.mmxzmm.cn/
联系方式：gtzone@163.com
更新日期：2008-08-24

使用说明：
根据需要修改config.php的内容，上传即可
模板文件在template目录里，需要者可自行添加广告代码
P.S.需要空间支持.htaccess RewriteRule

更新说明：1.1
破解目标站防盗链，需PHP支持curl库！
可选择保存远程图片，需PHP支持curl库！
这样不久以后你就会拥有自己的图片库了。

mmxzmm_php.rar

]]> http://www.lenghost.cn/original/mmxzmm-php-version/feed/ 0 php中preg_match的用法 http://www.lenghost.cn/tips/php-preg_match-usage/ http://www.lenghost.cn/tips/php-preg_match-usage/#comments Tue, 29 Jul 2008 03:08:28 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=9 http://www.php.net [1] => http:// [2] => www.php.net ) 这回明白了吧。。$matches[0] 将包含与整个模式匹配的文本，$matches[1] 将包含与第一个捕获的括号中的子模式所匹配的文本。在正则中，()代表模式：匹配 pattern 并获取这一匹配。所获取的匹配可以从产生的 Matches 集合得到，在VBScript 中使用 SubMatches 集合，在JScript 中则使用 $0…$9 属性。就是说数组中下标为1的值就是正则中/^(http:\/\/)?([^\/]+)/i第一个()里的值！数组下标２的值以此类推 ]]> 大家一看到preg_match肯定会头痛的。。。其实没什么，下面我就尽力给还不明白的兄弟们争取讲明白了，在这里我就不解释preg_match的说明了，朋友们可以通过php手册查看..先来个简单点的:

<?php
preg_match("/^(http:\/\/)?([^\/]+)/i","http://www.php.net/index.html", $matches);
$host = $matches[2];// 从主机名中取得后面两段
preg_match("/[^\.\/]+\.[^\.\/]+$/", $host, $matches);
echo "domain name is: {$matches[0]}\n";
?>


这是手册里的例子。多数人对preg_match犯晕都出在正则上，以后我也会介绍正则。先看这个例子，
preg_match($pattern,$string,$matcher)其中$pattern对应的就是/^(http:\/\/)?([^\/]+)/i，$string 是http://www.php.net/index.html，$match是匹配到的结果。
按照手册上的意思：
如果提供了 matches，则其会被搜索的结果所填充。$matches[0] 将包含与整个模式匹配的文本，$matches[1] 将包含与第一个捕获的括号中的子模式所匹配的文本，以此类推。
这是什么意思呢？第一句就不用解释了，$matches[0] 将包含与整个模式匹配的文本。
咱们用pring_r打印出来第一个$matches：
Array ( [0] => http://www.php.net [1] => http:// [2] => www.php.net )
这回明白了吧。。$matches[0] 将包含与整个模式匹配的文本，$matches[1] 将包含与第一个捕获的括号中的子模式所匹配的文本。在正则中，()代表模式：匹配 pattern 并获取这一匹配。所获取的匹配可以从产生的 Matches 集合得到，在VBScript 中使用 SubMatches 集合，在JScript 中则使用 $0…$9 属性。就是说数组中下标为1的值就是正则中/^(http:\/\/)?([^\/]+)/i第一个()里的值！数组下标２的值以此类推

]]> http://www.lenghost.cn/tips/php-preg_match-usage/feed/ 0 PHP-Web应用程序开发：使用模板 http://www.lenghost.cn/tips/php-develop-use-template/ http://www.lenghost.cn/tips/php-develop-use-template/#comments Sat, 26 Jul 2008 18:22:04 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=10 每个进行过较大型的PHP-Web应用程序设计的开发人员大概都有如下的经历：花大量的时间写超文本语句，为页面排版，兼作美工等；或在整合的程序代码在和HTML静态页面时花费大量的时间。的确，用脚本语言开发Web应用不容易将数据的处理和数据的显示分开，但在多人合作的情况下，如果无法将数据和显示分开，将大大影响开发的效率，专业分工的发挥。为了解决这个问题，PHP也提供了自己的解决方案，有多种，本文主要介绍PHPLIB中的Template类。
1 模板处理类的设计
模板处理类主要需完成以下的任务：
·从模板文件中读取显示用的HTML代码。
·将模板文件和实际生成的数据结合，生成输出的结果。
·允许同时处理多个模板。
·允许模板的嵌套。
·允许对模板中的某个单独的部分进行处理。
归纳上述任务，模板类的设计目标为：从多个模板文件中读入显示的HTML代码，将这些显示代码中需要动态数据的地方替换为PHP程序运算所得出的数据，然后按照一定的顺序输出。其中，替换的部分可以自由的设定。
读取显示用的HTML代码采用读文件的方式
模板文件和数据的结合采用正则替换
处理多个模板用数组存储来实现。
模板的嵌套的实现主要的想法是：将模板和输出（任何中间的分析结果）一视同仁，都可拿来做替换，即可实现。
单独部分的处理的通过在模板文件中设定标注，然后在正则替换中结合标注来控制，实现部分替换。
2 模板处理类的实现
请参看PHPLib中的Template.inc，总共345行代码，有详细的注释。以下列举一些主要的函数，供研读参考：

function set_file($handle,$filename="")
//line 77, 读取文件
function set_var($varname,$value = "")
//line 119, 设置映射数据-替换变量
function set_block($parent, $handle, $name = "")
//line 96, 设置标注
function subst($handle)
//line 136, 执行数据替换
function parse($target, $handle, $append = false)
//line 165, 执行模板文件与数据的结合
function p($varname)
//line 268, 输出处理结果

3 模板处理类的使用
3.1 最基本的例子
为了简单起见，这里假设模板文件、使用模板的PHP文件和模板处理类的文件都放在同一个目录下。PHPLIB中的习惯是使用ihtml后缀为模板文件的后缀。
下面是要使用的模板文件：
使用模板的测试
这是一个使用模板的测试文件！
当前的时间是{currenttime}!
注：模板文件和通常的HTML文件差不多，唯一不同的是使用“{}”括起来的是可以被模板处理类替换的动态内容的变量。
接下来使用模板处理类来处理上面的模板：

set_file("handle1","test.ihtml");
//使用$timeNow的值替换模板中的currenttime
$template->set_var("currenttime",$timeNow);
//进行实际的模板操作
$template->parse("output","handle1");
//输出最后结果
$template->p("output");

注：如果只想用PHPLIB中的模板类，只需在文件头包含Template.inc类即可。
创建Template对象时，可以指定模板文件路径，如：new Template（“/htdocs/apps/templates/”），缺省为当前路径。
3.2 模板嵌套与块设定
下面这个例子来自与PHPLIB的参考手册，综合性较强，这里需说明的一点是设定块的目的与嵌套无关，但这个范例包含了两者。请仔细阅读，块设定是为了避免这种情况：原本可在一个模板文件（静态页面）里完成的内容，因需要部分循环，而将部分循环内容提取单独做成模板文件。请思考，如果不用块设定，这个例子是不是需要3个模板文件呢？
模板文件1，page.ihtml
{PAGETITLE}
{PAGETITLE}
{OUT}
Content
模板文件2，box.ihtml
{TITLE}
{NUM}
{BIGNUM}
模板处理文件，test.php

set_file(array("page" => "page.ihtml","box" => "box.ihtml"));
//载入模板文件box中的一个块row,引用名称为rows
$t->set_block("box", "row", "rows");
//设置替换
$t->set_var(array("TITLE" => "Testpage","PAGETITLE" => "hugo"));
//生成数据NUM，BIGNUM
for ($i=1; $iset_var(array("NUM" => $n,"BIGNUM" => $nn));
//进行分析，分析的结果添加到rows的后面
$t->parse("rows", "row", true);
}
//生成box，再生成page
$t->parse("OUT", array("box", "page"));
//输出最后结果
$t->p("OUT");
?>

注：这里page.ihtml模板文件中变量的命名与最后的输出句柄都用了“OUT”。
循环取值部分采用数据库类，即可将数据的生成与数据库应用结合起来。
执行结果如下图：

模板嵌套与块设定执行结果图
4 小结
本文主要简要介绍了PHPLIB中Template类的设计、实现及使用方法。当然，还有许多其他的PHP模板方案，如由Perl中演化而来的FastTemplates。目前Internet小组采用的是另一种方案，主要的实现方式是模板文件入库，采用eval来实现数据与模板文件的结合等，相对来说模板文件的管理与模板处理的使用比较简洁，但缺少文件存放的模式。本人目前在做的一些尝试是将两者结合起来，并想在PHPLIB的Template类的基础上进行改进。初步的目标任务有两个：1、在读取模板文件时扩展其对数据库的支持，这样可以在必要时增强灵活性与使用数据库管理工具 2、化简模板文件与数据的结合，因为在实际使用中大多数情况下无需将模板文件中的变量在处理程序中再设置（数据变量映射）一遍。
在此也希望读者、PHP程序爱好者一起参与进来，多提宝贵意见，祝好运！

]]> http://www.lenghost.cn/tips/php-develop-use-template/feed/ 0 5个有趣的浏览器地址栏Javascript代码 http://www.lenghost.cn/tips/5-javascript/ http://www.lenghost.cn/tips/5-javascript/#comments Mon, 21 Jul 2008 05:57:10 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=12 这篇文章分享几个在地址栏实现的Javascript有趣效果和应用。能在浏览器地址栏实现的效果太多了，字体放大、显示所有图片、显示Cookie等等。但这篇文章重点放在“有趣”上面，当你无聊的时候，不妨玩玩。原文来自BlogOhBlog。

1、编辑网页
在地址栏输入下面的代码按enter，网页上所有元素都能变成可编辑状态，你可以移动、调整元素大小。如果你只是讨厌某个网站想发泄一下，我建议你使用NetDisater。
代码如下：

javascript:document.body.contentEditable='true'; document.designMode='on'; void 0

这是经我重新编辑的google.cn：


2、无敌风火轮
在地址栏运行下面的代码可使页面上所有图片元素一个接一个地转圈。
这种效果最好的实现地方就是图片搜索了：

改变代码里的“img”成任何网页上有的字符，可以使这些字符做无敌风火轮运动。
代码如下：

javascript:R=0; x1=.1; y1=.05; x2=.25; y2=.24; x3=1.6; y3=.24; x4=300; y4=200; x5=300; y5=200; DI=document.getElementsByTagName("img"); DIL=DI.length; function A(){for(i=0; i-DIL; i++){DIS=DI[ i ].style; DIS.position='absolute'; DIS.left=(Math.sin(R*x1+i*x2+x3)*x4+x5)+"px"; DIS.top=(Math.cos(R*y1+i*y2+y3)*y4+y5)+"px"}R++}setInterval('A()',5); void(0);

3、晃来晃去
不但是你，浏览器也不是那么喜欢这个javascript。在地址栏运行这个代码后，浏览器会迅速地晃来晃去。代码如下：

javascript:function flood(n) {if (self.moveBy) {for (i = 200; i > 0;i--){for (j = n; j > 0; j--) {self.moveBy(1,i); self.moveBy(i,0);self.moveBy(0,-i); self.moveBy(-i,0); } } }}flood(6);{ var inp = "D-X !msagro na dah tsuj resworb rouY"; var outp = ""; for (i = 0; i <= inp.length; i++) {outp =inp.charAt (i) + outp ; } alert(outp) ;}; reverse

如果这个代码无效，请将”>”改成”>”，”&It;”改成”<"。

4、计算器
在地址栏输入下面的代码，可以实现简单的四则运算：

javascript:alert(34343+3434-222);

事实上这个代码可以继续简化，比如简化成这样：

javascript:34343+3434-222

5、防钓鱼验证
某些钓鱼网站提供的URL和网页本身的URL是不一致的，你可以用下面的代码进行验证，当两个URL相差太大的时候，你就要稍加小心了：

javascript:alert("The actual URL is:" + location.protocol + "//" + location.hostname + "/" + "\nThe address URL is:" + location.href + "\n" + "\nIf the server names do not match, this may be a spoof.");

很有趣，不是吗？

]]> http://www.lenghost.cn/tips/5-javascript/feed/ 0 10个能用JavaScript实现的图片特效 http://www.lenghost.cn/tips/10-javascript/ http://www.lenghost.cn/tips/10-javascript/#comments Mon, 21 Jul 2008 05:51:27 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=13 一般来说，我们在写博客或做网站时都需要对插图做一些效果，比如增加阴影、图片圆角、倒映等等。这些效果一般可以用3个方法实现，一是用PS实现对图片进行修改，二是使用CSS，三是使用JavaScript。使用PS会破坏原图，而且要花费一定的时间。

Netzgesta
上有很多实现图片特效的JavaScript提供下载，很多效果都是相当漂亮的。

1、水倒映



这个js将为图片添加水倒映的特效，时下web2.0站点很喜欢这种效果。
如果你喜欢在线生成水倒映效果，可以参考这里。
js下载链接

2、圆角+阴影

或许你记得用RoundPic能在线生成圆角图片，事实上用这个js也可以实现效果。
js下载链接


3、高光圆角阴影



这个效果可以用来做按钮。是我最喜欢的特效之一。
js下载链接

4、斜光阴影效果

和上面的效果看起来非常相似，但也有不同的地方。
js下载链接

5、相框效果



如果你在做图片博客，可以你会喜欢这个js，使用后博客文章内的图片都有相框的效果。
js下载链接

6、黑色相框

不喜欢白色没有立体感的相框，那试试这个立体感充足的js效果吧。
js下载链接

7、放大镜



一个很有趣的js，实现放大镜效果。记得在去年Google开发者日的时候，某个主讲人也有说到在GMaps里实现放大镜的有趣效果。具体效果点击这里。
js下载链接

8、菲林效果

如果你在写一个电影博客，这个效果或许会让你喜欢。
js下载链接

9、花边效果

很简单的图片花边效果。
js下载链接

10、翻页效果



翻页效果是很常见的，Google一下你会发现有很多相关的教程，如果你不想花时间去学，直接下载这个js吧。
js下载链接

安装使用方法：
将下载的压缩包解压之后上传到网站空间，然后在需要显示效果的head里添加代码，比如高光阴影效果Glossy，添加的代码是：

对于Wordpress，可以在header.php里添加。如果只要求文章页里出现效果，也可以考虑在single.php里添加。
然后，在想要显示特效的图片的标记里添加：
class=”glossy”
这样效果就出现了。
其它效果添加方法类似。

]]> http://www.lenghost.cn/tips/10-javascript/feed/ 0 百度了半天，终于给我的Blog加上了相关日志功能 http://www.lenghost.cn/site-news/add-related-post-to-pjblog/ http://www.lenghost.cn/site-news/add-related-post-to-pjblog/#comments Sat, 28 Jun 2008 08:45:55 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=21 修改说明:
打开文件:classcls_article.asp
1.查找下面内容

TempArticle=Replace(TempArticle,"<$log_ViewNums$>",log_ViewArr(4,0))

在此内容下增加一行,复制以下代码

'***********  相关日志功能 修改1 BY HAYDEN    *********
TempArticle=Replace(TempArticle,"<$log_relatedtag$>",getRelated(log_ViewArr(8,0),LogID))
'************  相关日志功能 修改1 END    ************

2.继续…查找

dim getTag

换行 在下面添加

'***********  相关日志功能 修改2 BY HAYDEN    ***********
Dim haydenTags : haydenTags = log_ViewArr(19,0)
'***********   相关日志功能 修改2    **********


3.继续..查找

<img src="/images/tag.gif" style="margin:4px 2px -4px 0px" alt=""/><strong>Tags:</strong> <%=getTag.filterHTML(log_ViewArr(19,0))%><br/>

换行 在下面添加

'***********  相关日志功能 修改3 BY HAYDEN    ***********
<img src="/images/search.gif" style="margin:4px 2px -4px 0px" alt=""/><strong>相关日志:</strong><%=getRelated(haydenTags,LogID)%><br/>
'**********  相关日志功能 修改3 END    ***********

4.继续 滑到文件底部 在最后一个 %> 这个符号前加入下面这段代码

'********************************
'  显示相关日志
'  作者：静￠脉
'  出自：myhhe.cn
'  时间：2007.11.25
'********************************
Function getRelated(hayden_tag,hayden_LogID)
    getRelated=""
  Dim i,RsT,OutPut
    Dim hayden_arr_tag
    Dim hayden_sql
    Dim hayden_sqlTag : hayden_sqlTag=""
  OutPut=""
     if hayden_tag<>"" Then
            hayden_arr_tag=split(hayden_tag,"{")
            For i = 1 to Ubound(hayden_arr_tag)   
                If i > 1 Then hayden_sqlTag=hayden_sqlTag & " or "
                hayden_sqlTag = hayden_sqlTag & "log_tag like '%{" & hayden_arr_tag(i) & "%' "
            Next
                hayden_sql="Select top 10 log_Title,log_id,log_ViewNums from blog_Content where (" & hayden_sqlTag & ") and log_ID<>" & hayden_LogID & " and log_IsDraft=False and log_CateID not  in (select  cate_id from blog_Category where cate_secret=True ) order by log_PostTime desc"
'此处红色标记处，感谢 ppcode 提出指正 #2007-11-26 
                 Set RsT=conn.execute(hayden_sql)
                 if not RsT.eof then
                        Do until Rst.eof
                                OutPut=OutPut&"<font face='Wingdings'>n</font> <a href='article.asp?id="&RsT(1)&"' target='_blank'>"&RsT(0)&"["&RsT(2)&"]</a><br>"
                        Rst.movenext
                        Loop
                     End if
        End if
        If OutPut="" Then
            OutPut="无相关日志"
        Else
            OutPut="<div class='Content-body' id='hayden_tag'>"&Replace(OutPut,chr(39),chr(34))&"</div>"
            '注意上面DIV中的class名称，如果想给他设定单独的样式，可以在这里给他另定一个名称
        End If
        getRelated=OutPut
        Set rst=nothing
End Function
'********  相关日志功能 getRelated END BY HAYDEN    **********

5.打开文件:article.asp
查找:

log_DisComment FROM

修改成:

log_DisComment,log_tag FROM

打开文件:TemplateArticle.asp
查找:

<$log_tag$><br/>

换行 在下面添加:

<img src="/images/search.gif" style="margin:4px 2px -4px 0px" alt=""/><strong>相关日志:</strong> <$log_relatedtag$><br/>

最后去后台
重建数据缓存
重新统计网站数据
重新生成所有日志到文件
重新建立日志索引

]]> http://www.lenghost.cn/site-news/add-related-post-to-pjblog/feed/ 0 自动设置IE 默认主页、自动添加到设置收藏夹、判断客户端默认主页 http://www.lenghost.cn/tips/ie-homepage/ http://www.lenghost.cn/tips/ie-homepage/#comments Sat, 28 Jun 2008 23:16:20 +0000 LeNgHoSt http://godaddy.lenghost.cn/lenghost.cn/?p=22 (1)手动设置IE 默认主页

<A class=date
onclick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://blog.lenghost.cn')"
href="http://blog.lenghost.cn">
<FONT class=abc size=2>
<SPAN class=zhuyue>设为首页</SPAN>
</FONT>
</A>

(2)自动设置IE 默认主页

<script language="javascript">
function SetHomePage(){
  if (document.all) {
    document.body.style.behavior='url(#default#homepage)';
    document.body.setHomePage('http://blog.lenghost.cn');
  }
}
SetHomePage();  //自动设置默认主页
</script>


(3)自动添加到设置收藏夹

<script language="javascript">
function addFavorite() {
  window.external.addFavorite('http://blog.lenghost.cn','LuckyJan专栏');
}
addFavorite();  //自动添加到设置收藏夹
</script>

(4)怎么样用JAVASCRIPT 判断客户端默认主页

<script language="JavaScript">
 var WScript = new ActiveXObject("WScript.Shell");
 var key = "HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page";
 try {
  var Result  = WScript.RegRead(key);
  if((Result=="")||(Result=="about:blank"))
    alert("当前默认主页为空！")
  else
    alert("当前默认主页:"+Result.toString());
 } catch( e ) {}
</script>
]]> http://www.lenghost.cn/tips/ie-homepage/feed/ 0