帝国cms7.0微博群发插件教程支持28个微博平台支持定时发布

帝国cms7.0微博群发插件教程支持28个微博平台支持定时发布

来源:帝国CMS模板网 作者:帝国CMS教程 时间:2014-02-02
浏览:6.2千+ 收藏 点赞(16)
简介: 一、说明:1、这个函数由微博通wordpres插件修改过来。可以实现群发微博,前提条件是你在各大微博都有注册。可以实现定时发布。定时发的时候发布微博选空。2、升级以后批量更新

一、说明:

1、这个函数由微博通wordpress插件修改过来。可以实现群发微博,前提条件是你在各大微博都有注册。可以实现定时发布。

定时发的时候"发布微博"选空。

2、升级以后批量更新不会群发微博,修改文章的时候选1为发布微博,0为不发布,定时发布的时候选空。

3、插件如果是在UTF-8的编码下使用需要改代码,如果单纯复制使用只适合GBK版本。

二、操作方法:

1、先新建一个字段,注:初始值是3个值:0为不发布;1为发布;空未审核。

字段名:"weibo"

字段标识:"发布微博"

初始值:

0:default

1

(空也就是回车)

2、以下函数放入userfun.php中 。

<?php
//---------------------------微博发布函数
function send_to_wbto($id) {
global $empire,$dbtbpre,$public_r,$navinfor ;
$rr = $empire->fetch1("select * from {$dbtbpre}ecms_news_data_1,{$dbtbpre}ecms_news where {$dbtbpre}ecms_news_data_1.id = '".$id."' and {$dbtbpre}ecms_news_data_1.id = {$dbtbpre}ecms_news.id limit 1");
$title = $rr[title] ;
$content =esub(strip_tags($rr[smalltext]),200);   
$url = $rr[titleurl] ;

$title1 = $title.'//'.$content.$rr[titleurl];
preg_match_all('/<img[^>]+src=['"](http[^'"]+)['"].*>/isU',$rr[newstext], $image);//匹配图像格式
$p_sum = count($image[1]);
if ($p_sum > 0) {
$p = $image[1][0];
}
if (!$p) {
$p = $rr[titlepic];
}
$username = 'xxxxx';
$password = 'xxxxx';
$image_url = $p;
$title1 =  iconv('GB2312', 'UTF-8',$title1);      //将字符串的编码从GB2312转到UTF-8,如果是UTF-8段代码可以注释掉
$fields = array();
$fields['source'] = 'wordpress';
$fields['content'] = urlencode($title1); //
$ch = curl_init();
if ($image_url) { 
$fields['imgurl'] =$image_url;
curl_setopt($ch, CURLOPT_URL, "http://wbto.cn/api/upload.json");  
} else {
curl_setopt($ch, CURLOPT_URL, "http://wbto.cn/api/update.json");  
}
curl_setopt($ch, CURLOPT_USERPWD, "$username:$password");
curl_setopt($ch, CURLOPT_FAILONERROR, TRUE);
curl_setopt($ch, CURLOPT_RETURNTRANSFER,TRUE);
curl_setopt($ch, CURLOPT_TIMEOUT, 10);
curl_setopt($ch, CURLOPT_POST, TRUE);
curl_setopt($ch, CURLOPT_POSTFIELDS, $fields);
$result = curl_exec($ch);
curl_close($ch);
}
?>

3、建一个公共变量"weibo_se"

<?php 
$rrr2 = $empire->fetch1(" select * from {$dbtbpre}ecms_news where id='".$navinfor['id']."' limit 1 ");  
$sql = $empire->query1(" UPDATE {$dbtbpre}ecms_news set weibo='0' where id='".$navinfor['id']."' "); 
if(function_exists('send_to_wbto') ) {
if($rrr2['weibo']=='1'||$rrr2['weibo']=='' ){
send_to_wbto($navinfor['id']) ;
} 
} 
?>

4、[!--temp.weibo_se--]放入内容模板中

注:此方法已失效。

帝国CMS模板网 帝国CMS模板网(www.daixiao360.cn)长期承接帝国CMS模板定制,帝国CMS仿站,帝国CMS采集规则,帝国CMS插件,帝国CMS二次开发。