梦想飞翔 - 学习

成功的前提---马云超经典的演讲，收藏自己看~

a@b.com (Slleo) — Fri, 13 Aug 2010 20:22:38 +0800

发一个好用的php读取xml的类

a@b.com (Slleo) — Thu, 26 Jun 2008 11:21:12 +0800

<?php 
################################### 
# 
# XML Library, by Keith Devens, version 1.2b 
# <a href="http://keithdevens.com/software/phpxml" target="_blank">http://keithdevens.com/software/phpxml</a> 
# 
# This code is Open Source, released under terms similar to the Artistic License. 
# Read the license at <a href="http://keithdevens.com/software/license" target="_blank">http://keithdevens.com/software/license</a> 
# 
######################################## 
# XML_unserialize: takes raw XML as a parameter (a string) 
# and returns an equivalent PHP data structure 
##################################### 
function & XML_unserialize(&$xml){ 
    $xml_parser = &new XML(); 
    $data = &$xml_parser->parse($xml); 
    $xml_parser->destruct(); 
    return $data; 
} 
####################################### 
# XML_serialize: serializes any PHP data structure into XML 
# Takes one parameter: the data to serialize. Must be an array. 
################################### 
function & XML_serialize(&$data, $level = 0, $prior_key = NULL){ 
    if($level == 0){ ob_start(); echo '<?xml version="1.0" ?>',"\n"; } 
    while(list($key, $value) = each($data)) 
        if(!strpos($key, ' attr')) #if it's not an attribute 
            #we don't treat attributes by themselves, so for an empty element 
            # that has attributes you still need to set the element to NULL 

            if(is_array($value) and array_key_exists(0, $value)){ 
                XML_serialize($value, $level, $key); 
            }else{ 
                $tag = $prior_key ? $prior_key : $key; 
                echo str_repeat("\t", $level),'<',$tag; 
                if(array_key_exists("$key attr", $data)){ #if there's an attribute for this element 
                    while(list($attr_name, $attr_value) = each($data["$key attr"])) 
                        echo ' ',$attr_name,'="',htmlspecialchars($attr_value),'"'; 
                    reset($data["$key attr"]); 
                } 

                if(is_null($value)) echo " />\n"; 
                elseif(!is_array($value)) echo '>',htmlspecialchars($value),"</$tag>\n"; 
                else echo ">\n",XML_serialize($value, $level+1),str_repeat("\t", $level),"</$tag>\n"; 
            } 
    reset($data); 
    if($level == 0){ $str = &ob_get_contents(); ob_end_clean(); return $str; } 
} 
######################################### 
# XML class: utility class to be used with PHP's XML handling functions 
################################### 
class XML{ 
    var $parser;   #a reference to the XML parser 
    var $document; #the entire XML structure built up so far 
    var $parent;   #a pointer to the current parent - the parent will be an array 
    var $stack;    #a stack of the most recent parent at each nesting level 
    var $last_opened_tag; #keeps track of the last tag opened. 

    function XML(){ 
         $this->parser = &xml_parser_create(); 
        xml_parser_set_option(&$this->parser, XML_OPTION_CASE_FOLDING, false); 
        xml_set_object(&$this->parser, &$this); 
        xml_set_element_handler(&$this->parser, 'open','close'); 
        xml_set_character_data_handler(&$this->parser, 'data'); 
    } 
    function destruct(){ xml_parser_free(&$this->parser); } 
    function & parse(&$data){ 
        $this->document = array(); 
        $this->stack    = array(); 
        $this->parent   = &$this->document; 
        return xml_parse(&$this->parser, &$data, true) ? $this->document : NULL; 
    } 
    function open(&$parser, $tag, $attributes){ 
        $this->data = ''; #stores temporary cdata 
        $this->last_opened_tag = $tag; 
        if(is_array($this->parent) and array_key_exists($tag,$this->parent)){ #if you've seen this tag before 
            if(is_array($this->parent[$tag]) and array_key_exists(0,$this->parent[$tag])){ #if the keys are numeric 
                #this is the third or later instance of $tag we've come across 
                $key = count_numeric_items($this->parent[$tag]); 
            }else{ 
                #this is the second instance of $tag that we've seen. shift around 
                if(array_key_exists("$tag attr",$this->parent)){ 
                    $arr = array('0 attr'=>&$this->parent["$tag attr"], &$this->parent[$tag]); 
                    unset($this->parent["$tag attr"]); 
                }else{ 
                    $arr = array(&$this->parent[$tag]); 
                } 
                $this->parent[$tag] = &$arr; 
                $key = 1; 
            } 
            $this->parent = &$this->parent[$tag]; 
        }else{ 
            $key = $tag; 
        } 
        if($attributes) $this->parent["$key attr"] = $attributes; 
        $this->parent  = &$this->parent[$key]; 
        $this->stack[] = &$this->parent; 
    } 
    function data(&$parser, $data){ 
        if($this->last_opened_tag != NULL) #you don't need to store whitespace in between tags 
            $this->data .= $data; 
    } 
    function close(&$parser, $tag){ 
        if($this->last_opened_tag == $tag){ 
            $this->parent = $this->data; 
            $this->last_opened_tag = NULL; 
        } 
        array_pop($this->stack); 
        if($this->stack) $this->parent = &$this->stack[count($this->stack)-1]; 
    } 
} 
function count_numeric_items(&$array){ 
    return is_array($array) ? count(array_filter(array_keys($array), 'is_numeric')) : 0; 
} 
?>

以下是一个应用实例，XML来源地址是：http://data.cnaz.com/spread/?tid=7&sid=42845&order=date&flags=desc&num=50&page=1&hosts=pic.ttiankan.com&code=xml

<?php   
include('xml.php');    //引用PHP XML操作类   


$page=$_GET['page'];

if(empty($page) || !is_numeric($page)) $page=1;

//偶像明星
$xml = file_get_contents('http://data.cnaz.com/spread/?tid=7&sid=42845&order=date&flags=desc&num=50&page='.$page.'&hosts=pic.ttiankan.com&code=xml');



//$xml = file_get_contents("php://input");    //读取POST过来的输入流   
$data=XML_unserialize($xml);   

$item=$data['rss']['channel'];

$link    =  $item['link'];
$description=  $item['description'];
$keywords  =  $item['keywords'];
$totalnum  =  $item['totalnum'];
$usetime  =  $item['usetime'];

$totalpage=ceil($totalnum/50);

echo('<div style="width:600px;margin:5px auto;background:#eee;border:1px #ccc solid;padding:5px;">关键字:'.$keywords.'  ');
echo('总记录数:'.$totalnum.', 每页显示50条,一共有'.$totalpage.'页, 当前是第'.$page.'页</div>');

$item=$item['item'];

echo('
  <style>
  *{font-size:12px;color:#000;font-family:arial;}
  a{text-decoration:none;}
  a:hover{text-decoration:underline;}
  .tbl{border-top:1px #ccc solid;border-left:1px #ccc solid;}
  .tbl td{padding:4px 5px;border-bottom:1px #ccc solid;border-right:1px #ccc solid;}
  </style>
  ');

echo('
  <table cellspacing="0" cellpadding="0" border="0" class="tbl" width="600">
    <tr>
      <td>分类</td>
      <td>标题</td>
      <td>链接</td>
    </tr>
  ');

  foreach($item as $list)
  {
    echo('<tr>');
    echo('<td>'.$list['sort'].'</td>');
    echo('<td><a title="'.$list['description'].'" href="'.$list['photo'].'" target="_blank">'.$list['title'].'</a></td>');
    echo('<td><a href="'.$list['link'].'" target="_blank">'.$list['link'].'</a></td>');
    echo('</tr>');
  }

  echo('<tr>
      <td colspan="3">
    ');
  if($page>1) echo('<a href="b.php?page='.($page-1).'">上一页</a>   ');
  if($page<$totalpage) echo('<a href="b.php?page='.($page+1).'">下一页</a>');
  echo('</td></tr>');

echo('</table>');


?>

Fckeditor2.6的修改

a@b.com (Slleo) — Wed, 23 Apr 2008 18:08:52 +0800

一直用的fckedtior2.4版，用了一段时间了，最近发现fckeditor2.6出来了，这回fck将弹出的对话框做成了一个可以拖动的层，效果还是不错的说。

于是，我升级S版fck(开玩笑了)，增加附件上传与媒体插入功能，删除原fckeditor下filemanager下所有文件，自己写了两个文件来应付上传，其中一个是文件管理器（可删可传功能），再将所有颜色统一一下，发现还不错。

目前在FF下还有一点点问题，接着改。

先发个图。

Warning: Smarty::include() 错误的解决办法

a@b.com (Slleo) — Mon, 03 Mar 2008 01:32:07 +0800

最近调试php，在本地测试，却报错：

Warning:   Smarty::include()   [function.include]:   Failed   opening   'xxx/templates_c/\%%43^43B^43B32F4B%%index.htm.php'   for   inclusion   (include_path='.;C:\php5\pear')   in   'xxx\class\smarty\Smarty.class.php   on   line   1258

同时在compiled下生成一堆*.tmp的文件...

baidu了一下，但几乎找不到结果，于是google了一下，看了半天的E文，也没找到对策，十分的无奈！后来只得从错误信息的字面上理解：“打开文件出错....”，我猜是权限不足，于是将smarty设置的相关的目录cache和compiled文件夹权限放到“完全控制”，还是不行，于是再将模板文件夹template的权限放开，于是OK了。

特此记录一下。

删除重复的记录的方法

a@b.com (Slleo) — Thu, 10 Jan 2008 23:30:54 +0800

查出重复的行:

select * 
from 表 
where id in(select min(id) from 表 group by name )

删除重复的行:

delete from 表 
where id not in(select min(id) from 表 group by name )

SMV V2.0103带6000数据(带图)

a@b.com (Slleo) — Fri, 04 Jan 2008 16:10:57 +0800

打了一个包，本想发到slleo.com上，无奈这空间只有100mb，装不下。

现下载地址为：http://www.ttiankan.com/

数据分类中有一点点问题,涉及到一个分类不正确.

需要一段代码搞定,具体如下:

<!--#include file="include/conn.asp"-->
<%
openconn
conn.execute("update [movie] set [cateid]=2 where cateid>100")
closeconn
%>

说明：2008-01-10以后下载的朋友不必上步操作。

转载一些javascript/asp的函数

a@b.com (Slleo) — Wed, 26 Dec 2007 12:28:54 +0800

//stream写文件
function writeToTextFile(file,str,charset){
/\\/.test(file) ? '' : file = Server.MapPath(file);
createFolder(file.replace(/\\[^\\]+$/,""));
var stm = Server.CreateObject("adodb.stream");
stm.Type = 2;
stm.Mode = 3;
stm.Charset = charset;
stm.open;
stm.WriteText(str);
stm.SaveToFile(file,2);
stm.flush;
stm.close;
}
//stream读文件
function readFromTextFile(file,charset){
/\\/.test(file) ? '' : file = Server.MapPath(file);
var stm = Server.CreateObject("adodb.stream");
stm.Type = 2;
stm.Mode = 3;
stm.Charset = charset;
stm.open;
stm.LoadFromFile(file);
var str = stm.ReadText;
stm.close;
return str;
}
//fso新建文件夹
function createFolder(folder){
var fso = Server.CreateObject("scripting.filesystemobject");
var parentFolder = folder.replace(/\\[^\\]+$/,"");
if(fso.FolderExists(folder))
return true;
if(fso.FolderExists(parentFolder)){
fso.CreateFolder(folder);
}else{
createFolder(parentFolder);
createFolder(folder);
}
}
//fso判断文件是否存在
function fileExists(file){
var fso = Server.CreateObject("scripting.filesystemobject");
if(fso.FileExists(file))
return true;
return false;
}
//获取页面源码
function getHTTPPage(url,charset){
var http= Server.CreateObject("Microsoft.XMLHTTP");
http.open("GET",url,false);
http.send();
if (http.readystate!==4){return false;}
return(bytesToBstr(http.responseBody,charset));
}
//二进制转普通字符串
function bytesToBstr(body,charset){
var stm = Server.CreateObject("adodb.stream");
stm.Type = 1;
stm.Mode =3;
stm.Open();
stm.Write = body;
stm.Position = 0;
stm.Type = 2;
stm.Charset = charset;
return(stm.ReadText);
stm.Close();
}

ttiankan的程序24日更新

a@b.com (Slleo) — Mon, 24 Dec 2007 22:36:30 +0800

更新的主要文件：
1、修正了/admin/home/index.asp中一处bug；
2、修正了/admin/home/snatch_ttiankan.asp一处bug；
3、修正了/play.asp里一处bug；

22日后增加的功能有：
1、增加版本号的支持，settings表中增加了version字段（nvarchar(100)，即文本，100长度）；
2、有些朋友要www.ttiankan.com的数据，我完全打包下来比较麻烦，关键是图片太大；现在这个版本支持你采天天看的记录了（记录/图片）；
3、有热心朋友提供自己辛苦更新而来的马克斯数据，现正计划将这一部做到后台里，可随时采集（此功能未完成）。

整包下载地址：http://www.ttiankan.com/ttiankan.rar，http://www.slleo.com/ttiankan.rar。

声明：如果你在使用过程中发现了bug或代码错误，请与我联系，QQ：9559122。

ttiankan1221更新包

a@b.com (Slleo) — Fri, 21 Dec 2007 19:58:44 +0800

ttiankan.com的程序，更新了一个文件，增加了几个小功能。

界面如下：

更新的文件为：admin/home/index.asp

如果你是在12月20日下载的整个文件包，那么只需要下载此文件覆盖就可以了。

[down=attachments/month_0712/320071221195913.zip]点击下载index.asp[/down]

另外:发现home/movie/snatch_xunlei.asp里面的bug,现已修正,请下载并覆盖.

[down=attachments/month_0712/o2007122294041.zip]点击下载此文件[/down]

电影程序SMV提供下载[12-29日更新，可下载了]

a@b.com (Slleo) — Fri, 14 Dec 2007 20:45:16 +0800

前端演示：http://www.ttiankan.cn

脚本语言：asp+access

说明与帮助：

一、目前的功能有；
1、兼容马克斯4.1电影数据和Kingcms迅雷专版，可播放56、youku、tudou、6rooms、iask、ouou、xunlei等电影；
2、支持56、tudou、youku、6rooms电影记录单条采集；
3、支持对迅雷联盟资源的批量采集，远程下载图片等；
4、良好的操作界面。
5、静态化生成,模板标签化；
6....

二、目录与文件说明：
1、[admin]，后台管理文件所在，程序核心；
2、[search]，搜索代码，里面就一个search.asp，模板自己修改；
3、[template]，模板文件夹，修改里面的模板即可，文件名不要变；
4、[uploadfiles]，图片上传文件夹，上传的图片会自动放在当前月份的文件夹下；
5、[include]，包含前端调用的一些动态文件，如友情链接申请、数据库连接文件等；
6、play.asp，前端播放的主要文件，模板需要自己改.
7、说明与帮助.txt，即本文件。
8、除以上说明的文件外，其它的均可删除；

三、安装说明
1、将所有文件解压到网站根目录；
2、更改管理目录admin，然后更改/include里面的conn.asp里面的数据库地址即可；
3、管理员初始用户和密码均为admin，注：这里我采用了sha256的加密方式，不再是那个md5；
4、使用者最好会一点asp，这样如果要添加自己的功能是非常方便的。

四、重要说明
1、程序在不断的更新中，且后期更新会考虑到与以前的程序兼容，如果发现bug，请及时与我联系（QQ9559122,Email:slleo@yeah.net）；
2、更新时请备好份数据库。

五、最新更新 2007-12-25 13:13
2007-12-23更新：
/admin/home/，增加几个功能。
/admin/movie/snatchfun.asp，修正一处bug.
/admin/database/db.asp，数据库表settings中增加了一个字段version,文本型，长度100

2007-12-24更新:
修正了/admin/home/index.asp中一处bug.
修正了/admin/home/snatch_ttiankan.asp一处bug.
修正了/play.asp里一处bug.

2007-12-25更新:
完善几处功能:
1、版本号用户可改；
2、电影记录被彻底删除时，相应的html及图片文件也被删除(原先只删除了图片文件，没有删除html文件)。
3、修正56电影不能播放的问题。
4、修正了/admin/home/snatch_ttiankan.asp一处bug.

2007-12-26 22:00更新
1、/admin/movie/sataicfun.asp 修正了采集天天看的记录时生成文件没有播放地址的问题；
2、/admin/home/snatch_ttiankan.asp 完善代码一处
3、/admin/home/snatch_maxz.asp 感谢一朋友提供数据马克斯商业版数据（至12-22号）。这下好了，你可以采到6220条记录了（大部分带图，95%的正确性）

2007-12-29 22:40 此次更新比较多
1、/admin/home/index.asp 针对新模板改动了几处标签；
2、/admin/home/settings.asp 增加了模板路径自定义和几处广告js修改功能；
3、/play.asp，/report.asp
4、/include/中的部分文件;
5、/admin/database/db.asp，修改了settings字段，增加template列；
6、模板改动比较大，这个希望会改模板的同学自己努一下力。ttiankan目前模板不提供下载（不然很多同学直接拿过去，原封不动...）
7、/search/index.asp，增加了对演员、导演搜索的支持。
8、增加三个js广告的支持。

另外:v2.0测试中...

计划中的功能：导入马克斯提供者的数据，无用图片的清除以入电影评分与评论功能。

后台部分界面参见：http://www.slleo.com/article.asp?id=172
凡下载的同学，请留个言,以支持一下，谢谢。

击下载地址:
1、http://www.slleo.com/smv.rar (右键另存为)
2、http://www.ttiankan.cn/smv.rar (建议用迅雷下载)