寒窗轩,寒川的个人网络博客,记录互联网事,学习网络编程、分享工作经验、人生感悟,包括但不限于程序代码、数据库、Office办公、随笔等内容。

利用飞信api免费发送天气预报

<?
/**
* 飞信通知天气预报
* 2009-4-23
*/

//禁止执行时间限制
set_time_limit (0);
$ad=" [广告招商]";//定义广告
function getWF($city)
{

if(empty($city)) return "";
$wf=@file_get_contents('http://php.weather.sina.com.cn/search.php?city='.urlencode($city).'&f=1&dpc=1');
if (empty($wf))
{
return "";
}

//截取相关信息
$return = "";
$star=strpos($wf,"<div class=\"info-area\">");
$return = substr($wf,$star,1000);
$end2=strpos($return,"<!-- box end-->");
$return = strip_tags(substr($return,0,$end2));

//过滤
$return=mb_convert_encoding($return, "UTF-8", "GBK");//将GBK转换UTF-8编码,否则出现乱码
$return = str_replace(" ","",$return); //过滤换空格符
$return = str_replace("\t"," ",$return);//过滤制表符
$return = str_replace("\n"," ",$return); //过滤换行符
$return = trim(str_replace("\r"," ",$return),",");//过滤回车符
$return = str_replace("℃","度",$return); //防止某些手机无此符号
$return = str_replace("~","-",$return);//同上
$return = str_replace("≤","小于",$return);//同上
$return = str_replace(":",":",$return); //同上
$return = str_replace("风力:"," 风力",$return);//同上
$return = preg_replace("/(\s+)/",' ',$return);//多个空格替换为一个空格
return $return;
}

$user='135****509';//手机号码
$pass='***';//飞信密码

//设置天气预报城市
$citys[]=array('id'=>'cd','name'=>'成都');//可类似设置多个

//手机号
$tel['cd'][]='135****509';//可类似设置多个


if (is_array($citys)&&count($citys)>0)

{
//遍历城市
foreach($citys as $city)
{
//获取采集信息
$info=getWF($city['name']);
$info="天气预报:".$city['name']." ".$info.$ad;
if (!empty($info)){
if (is_array($tel[$city['id']])&&count($tel[$city['id']])>0){
//发送
foreach($tel[$city['id']] as $val)//循环发送
{
$url="http://weather.huikon.cn/api.php?mobile_no=".$user."&pwd=".$pass."&to=".$val."&msg=".urlencode($info);//飞信API地址
@file_get_contents($url);
  //echo $info.$val;
}
}
}
}
}

//自动关闭脚本
echo <<<EOT
<script language=javascript>
window.opener=null
window.open("","_self")
window.close();
</script>
EOT;

?>

说明:可以做个vbs脚本访问此文件,结合自动计划任务,并取消自动关闭脚本注释就可以利用飞信api自动发送免费天气预报。

程序 2010-04-15 10:13:27 46 0 8775 phpfetionapi
文章写得不错?我是土豪我要在线打赏!
在线打赏

昵称:

验证码:验证码

评论:

文章分类
系统
程序
数据
Office
随笔
热门文章
nginx+php如何EventStream流式数据传输
python读取文件夹下图片并生成pdf文件
VB.net开发的word转pdf的小工具
使用python把word转成pdf
文章推荐
免责声明
关于博主
开篇第一章
随机推荐
你决定你自己的一切!
动易系统的数据库连接出错,请检查Conn.asp文件中的数据库参数设置解决方案。
博客升级
简单而全面的sql查询教程(一)
Excel文件内容很少,但文件很大,打开很慢、很卡怎么办?
QQ.exe - 无法找到组件:没有找到ComRes.dll,因此这个应用程序未能启动。重新安装应用程序可能会修复此问题。
硫酸法钛白自生晶种水解工艺
分享一个支持中文字符及英文字符混合的php字符串分割函数
基于ThinkPHP6的API注释文档自动生成扩展
感冒了
友情连接
春燕网络
谢润的博客