日本国产亚洲-日本国产一区-日本国产一区二区三区-日本韩国欧美一区-日本韩国欧美在线-日本韩国欧美在线观看

當前位置:雨林木風下載站 > 技術開發教程 > 詳細頁面

改進后的《自動顯示天氣預報》小程序(Linux與Windows環境都可以)

改進后的《自動顯示天氣預報》小程序(Linux與Windows環境都可以)

更新時間:2022-05-03 文章作者:未知 信息來源:網絡 閱讀次數:

這次改進,主要是增加了圖象的獲取,并提供了一個比較完整的獲取遠端文件的函數。具體代碼如下:
<?
$fcont=file("http://www.bjmb.gov.cn/today.asp");
$arr=array();
for($i=0;$i<count($fcont);$i++){
$tmp=$fcont[$i];
$tmp=ereg_replace("<br>"," ",$tmp);
if(!strstr(strtolower($tmp),"img")){
$tmp=trim(strip_tags($tmp));
} else {
$st=ereg_replace("><",">⌒<",$tmp);
$stt=split("⌒",$st);
foreach($stt as $key => $value){
if(strstr($value,"img") ){
$tmp=$value;
if(strstr($tmp,"bt9.jpg") || strstr($tmp,"colline.gif")){
$tmp="";
}else{
$tmp=ereg_replace("\"","",$tmp);
$st=split("src=",$tmp);
$st1=split(" ",$st[1]);getpic("http://www.bjmb.gov.cn/$st1[0]","image");
if(count($st)>2){
$st2=split(" ",$st[2]);getpic("http://www.bjmb.gov.cn/$st1[0]","image");
}
$tmp=ereg_replace("src=","width=30 height=30 align=absmiddle src=",$tmp);
}
}
}
}
if(trim($tmp)!="" && trim($tmp)!=" ") $arr[]=$tmp;
}
$yb=array();
for($i=2;$i<count($arr)-6;$i++){
$yb[]=$arr[$i];
}
?>
<br>
<SCRIPT LANGUAGE="JavaScript">
<!--
syb="";
<?
$exp="-3-7-9-14-18-20-25-";
for ($i=1;$i<count($yb);$i++){
if (!strstr($exp,"-".(string)($i+1)."-")){
?>
syb=syb+'<?=$yb[$i];?> ';
<?}}?>
document.write("<?=$yb[0]?>"+":");
document.write("<marquee width=400 align=middle scrollamount=5 scrolldelay=200>"+syb+"預報</marquee>");
//-->
</SCRIPT>
<?
function getpic($url,$dir){
$tmp=split("/",$url);
$fname=$tmp[count($tmp)-1];
if(strstr($dir,"\\")){
if(substr($dir,-2)=="\\") $file=$dir.$fname;else $file=$dir."\\".$fname;
}else{
if(substr($dir,"/")){
if(substr($dir,-1)=="/") $file=$dir.$fname;else $file=$dir."/".$fname;
}
else{
return ;
}
}
if(!(file_exists("$dir") && is_dir("$dir"))) mkdir($dir,0777);
if(file_exists($file)) return ;
$fpo=fopen($file,"wb");
if(!$fpo) return ;
$num=0;
do{
$num++;
$fpi=fopen($url,"r");
}while(!$fpi && $num<3);
if(!fpi)return ;
while(!feof($fpi)){
$cont=fread($fpi,128);
fwrite($fpo,$cont,128);
}
fclose($fpi);
fclose($fpo);
}
?>

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

主站蜘蛛池模板: 久久精品免视看国产盗摄 | 亚洲人免费视频 | 国产精品久久新婚兰兰 | 成人福利在线 | 国产成人啪精品午夜在线观看 | 天天看片天天爽_免费播放 天天看天天摸色天天综合网 | 欧美日韩不卡视频一区二区三区 | 日本不卡一区二区三区视频 | 三级aa视频在线观看 | 中文字幕福利视频 | 青青草91在线 | 波多野结衣视频免费在线观看 | www.日韩在线 | 波多野结衣在线观看3人 | 久久国产片| 色综合久久一本首久久 | 亚洲午夜久久久久国产 | 24小时日本在线视频观看.www | 26uuu亚洲影视新地址 | 特黄特级a级黄毛片免费观看多人 | 欧美成人看片一区二区三区 | 精品久久久久久久 | 一区二区三区日韩 | 久青草视频 | 2021最新久久久视精品爱 | 久久美女福利视频 | 欧美成人久久 | 国产69成人免费视频观看 | 2018天天干天天射 | 国产国产在线播放你懂的 | 偷拍spa成人按摩福利 | 久久天天躁狠狠躁夜夜爽蜜月 | 天堂热| 亚洲七次郎针对华人在线观看 | 成人免费观看的视频黄页 | 久久综合九色综合亚洲 | 欧美男男videos欧美同性 | 九九热最新视频 | 国产欧美另类久久精品91 | 欧美另类videos粗暴黑人 | 一级毛片免费在线播放 |