<?
function get($url){//문서가져옮
$fp = fopen($url, "r");
while(!feof($fp)){
$tmp = fgets($fp, 900);
$temp .= $tmp;
}
fclose($fp);
return $temp;
}//function get
function Strip($all){// 링크랑 제목만 빼오기
$link_pm=strpos($all,">");
$link=substr($all,0,$link_pm);
if(!$link) return;
if(ereg("\"",$link)){
$link_p=strpos($link,"\"");
$link=substr($link,$link_p+1);
$link_p=strpos($link,"\"");
$link=substr($link,0,$link_p);
}
if(ereg("'",$link)){
$link_p=strpos($link,"'");
$link=substr($link,$link_p+1);
$link_p=strpos($link,"'");
$link=substr($link,0,$link_p);
}
$link=trim($link);
$substr=substr($all,$link_pm+1);
$substr_p=strpos($substr,"</a>");
$substr=substr($substr,0,$substr_p);
$strip=strip_tags($substr);
$strip=trim($strip);
return array(link => $link, sub => $strip);
}//function strip($all)
function makeUrl($Url, $Link){
if(!strpos($Link,"http://") && substr_count("$Link","http://")) return $Link;
$eURL = pathinfo("$Url");
$host = parse_url($Url);
$host = $host[scheme]."://".$host[host];
$Link = "/".$Link; //링크가 루트인지 확인위해 임의로 붙인다.
if(substr_count("$Link","../")){ //한칸앞으로
$Link = str_replace("./../", "", $Link);
$Link = str_replace("../", "", $Link);
$pos = strrpos($eURL["dirname"], "/");
$makeUrl = substr($eURL["dirname"],0,$pos);
$makeUrl = "$makeUrl"."$Link";
}else if(substr_count("$Link","//") && !strpos($Link, "//")){ //루트로 가라
$makeUrl = $host."/".str_replace("//", "", $Link);
}else{ //제자리
$Link = str_replace("./", "", $Link);
$makeUrl = $eURL["dirname"]."$Link";
}
return $makeUrl;
}
////////////////////////////////////// 펑션끝
$date_Y = date("Y");
$date_M = date("m");
$date_D = date("d");
$mdate = "$date_Y.$date_M.$date_D"; //확장성 위해
////////////////////////////////////////////////////////////<== 신문사별설정 추가가능
$newspaper[] = "동아일보";
$URL[] = "http://www.donga.com/fbin/output?f=total";
$like[] = "$date_Y$date_M$date_D";
$newspaper[] = "연합신문";
$URL[] = "http://www.yonhapnews.co.kr/services/0400000000.html";
$like[] = "$date_Y$date_M$date_D";
////////////////////////////////////////////////////////////<== 여기까지 신문사별설정
for($x=0; $x < sizeof($newspaper); $x++){
$temp = get($URL[$x]);
$all = split("href =|HREF =|href=|HREF=",$temp);//--> url 추출
for($i=0; $i < sizeof($all); $i++){
$kisa = Strip($all[$i]);
if(ereg($like[$x], $kisa[link]) & 20 < strlen($kisa[sub])){
$LinkURL = makeUrl($URL[$x], $kisa[link]);
echo "<a href='$LinkURL'>[$newspaper[$x]]$kisa[sub]</a><br>";
}//if(ereg($like[$x], $kisa[link]) & 20 < strlen($kisa[sub]))
}//for($i=0; $i < sizeof($all); $i++)
}//for($x=0; $x < sizeof($newspaper); $x++)
?>
댓글 1개
신문사 소스글 잘 보았습니다
그런데 어떻게 적용해야 하는지 궁금하네요
소스를 드림위버에 넣어보아도 반응이 전혀 없어서요 ......
그누보드소스에 넣어야 하는지 ...
아니면 어떻게 적용하는건지좀 알으켜 주세요 ....
그럼수고하세요 ~~~
게시판 목록
프로그램
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 |
|---|---|---|---|---|
| 130 | 20년 전 | 3977 | ||
| 129 | 20년 전 | 2920 | ||
| 128 | 20년 전 | 3655 | ||
| 127 | 20년 전 | 3476 | ||
| 126 | 20년 전 | 3742 | ||
| 125 | 20년 전 | 8574 | ||
| 124 | 20년 전 | 2596 | ||
| 123 | 20년 전 | 3735 | ||
| 122 | 20년 전 | 3197 | ||
| 121 | 20년 전 | 2601 | ||
| 120 | 20년 전 | 2655 | ||
| 119 | 20년 전 | 2572 | ||
| 118 | 20년 전 | 2858 | ||
| 117 |
|
20년 전 | 3045 | |
| 116 | 20년 전 | 5293 | ||
| 115 | 20년 전 | 3905 | ||
| 114 | 20년 전 | 4956 | ||
| 113 | 20년 전 | 6206 | ||
| 112 | 20년 전 | 7317 | ||
| 111 | 20년 전 | 18425 | ||
| 110 | 20년 전 | 6870 | ||
| 109 | 20년 전 | 2869 | ||
| 108 | 20년 전 | 4132 | ||
| 107 |
prosper
|
20년 전 | 2483 | |
| 106 |
prosper
|
20년 전 | 4309 | |
| 105 |
아우겐나이스
|
20년 전 | 2903 | |
| 104 | 20년 전 | 2253 | ||
| 103 | 20년 전 | 2470 | ||
| 102 | 20년 전 | 2234 | ||
| 101 | 20년 전 | 2563 | ||
| 100 | 20년 전 | 1739 | ||
| 99 | 20년 전 | 1560 | ||
| 98 | 20년 전 | 1614 | ||
| 97 | 20년 전 | 2119 | ||
| 96 | 20년 전 | 1865 | ||
| 95 | 20년 전 | 2367 | ||
| 94 | 20년 전 | 3553 | ||
| 93 | 20년 전 | 1552 | ||
| 92 | 20년 전 | 1747 | ||
| 91 | 20년 전 | 3167 | ||
| 90 | 20년 전 | 2336 | ||
| 89 | 20년 전 | 3160 | ||
| 88 | 20년 전 | 2865 | ||
| 87 | 20년 전 | 3290 | ||
| 86 | 20년 전 | 5114 | ||
| 85 | 20년 전 | 2511 | ||
| 84 | 20년 전 | 4819 | ||
| 83 | 20년 전 | 2497 | ||
| 82 | 20년 전 | 3113 | ||
| 81 | 20년 전 | 7616 | ||
| 80 | 20년 전 | 3812 | ||
| 79 | 20년 전 | 3200 | ||
| 78 | 20년 전 | 4686 | ||
| 77 | 20년 전 | 2891 | ||
| 76 | 20년 전 | 6208 | ||
| 75 | 20년 전 | 4466 | ||
| 74 | 20년 전 | 5773 | ||
| 73 | 20년 전 | 3618 | ||
| 72 | 20년 전 | 5961 | ||
| 71 | 20년 전 | 3102 | ||
| 70 | 20년 전 | 2830 | ||
| 69 | 20년 전 | 2628 | ||
| 68 | 20년 전 | 2438 | ||
| 67 | 20년 전 | 2642 | ||
| 66 | 20년 전 | 2661 | ||
| 65 | 20년 전 | 3781 | ||
| 64 | 20년 전 | 2819 | ||
| 63 | 20년 전 | 2450 | ||
| 62 | 20년 전 | 2256 | ||
| 61 | 20년 전 | 3061 | ||
| 60 | 20년 전 | 3128 | ||
| 59 | 20년 전 | 2505 | ||
| 58 | 20년 전 | 2586 | ||
| 57 | 20년 전 | 2957 | ||
| 56 | 20년 전 | 2309 | ||
| 55 | 20년 전 | 2748 | ||
| 54 | 20년 전 | 2116 | ||
| 53 | 20년 전 | 2342 | ||
| 52 | 20년 전 | 2687 | ||
| 51 |
prosper
|
20년 전 | 2339 | |
| 50 |
prosper
|
20년 전 | 2159 | |
| 49 | 21년 전 | 2171 | ||
| 48 | 21년 전 | 2320 | ||
| 47 | 21년 전 | 1922 | ||
| 46 | 21년 전 | 1920 | ||
| 45 | 21년 전 | 2127 | ||
| 44 | 21년 전 | 2351 | ||
| 43 | 21년 전 | 4567 | ||
| 42 |
prosper
|
21년 전 | 2707 | |
| 41 |
prosper
|
21년 전 | 2107 | |
| 40 | 21년 전 | 2174 | ||
| 39 | 21년 전 | 2138 | ||
| 38 | 21년 전 | 2409 | ||
| 37 | 21년 전 | 2555 | ||
| 36 | 21년 전 | 1768 | ||
| 35 | 21년 전 | 4065 | ||
| 34 | 21년 전 | 3842 | ||
| 33 | 21년 전 | 2985 | ||
| 32 |
prosper
|
21년 전 | 2895 | |
| 31 | 21년 전 | 5266 |
댓글 작성
댓글을 작성하시려면 로그인이 필요합니다.
로그인하기