找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 1751|回复: 0
打印 上一主题 下一主题

同时提取多条新闻中的文本一例

[复制链接]

2647

主题

2647

帖子

7881

积分

论坛元老

Rank: 8Rank: 8

积分
7881
跳转到指定楼层
楼主
发表于 2018-2-14 09:41:48 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

            本文为一个提取一批新闻网页中的文本的小程序,它可以将各篇新闻的内容存为以该新闻标题为文件名的文本文件。如有更好的处理方法,请和我联系:
lwx3069@sina.com
   这里以人民网中的“今日要闻”下的新闻为例.
',$str);            //去掉文件没用的上半部分
            $str2 = explode('  ',$str1[1]);
            //取出文件的下半部分,并去掉没用的下半部分,这时得到的都是有用的
            $str3=explode('',$str2[0]);   //从整个有用部分取出文件标题和正文
            $str4=explode('',$str2[0]);   //取出日期和时间
            $str5=explode('
',$str3[1]);     //从标题和正文部分取出标题
            $title=str_replace("
","",$str5[0]);
            $str3=explode('',$str2[0]);          //从整个有用部分取出文件正文
            $str3[1]=str_replace('
    ',"\n"."  ",$str3[1]);
            $str3[1]=str_replace(' ',"",$str3[1]);
            $str3=strip_tags($str3[1]);
            $pf=trim($title).".txt";
            $ppf=fopen(CONTENTS_DIR."$pf",'w');
            fputs($ppf,$title);
            fputs($ppf,"$str4[0]");
            fputs($ppf,$str3);
        }
     }
  }
}
?>
            
            
        
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

用户反馈
客户端