<?
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개
신문사 소스글 잘 보았습니다
그런데 어떻게 적용해야 하는지 궁금하네요
소스를 드림위버에 넣어보아도 반응이 전혀 없어서요 ......
그누보드소스에 넣어야 하는지 ...
아니면 어떻게 적용하는건지좀 알으켜 주세요 ....
그럼수고하세요 ~~~
게시판 목록
프로그램
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 |
|---|---|---|---|---|
| 8230 | 9년 전 | 92 | ||
| 8229 | 9년 전 | 92 | ||
| 8228 |
커네드커네드
|
9년 전 | 134 | |
| 8227 | 9년 전 | 156 | ||
| 8226 | 9년 전 | 183 | ||
| 8225 | 9년 전 | 172 | ||
| 8224 | 9년 전 | 166 | ||
| 8223 | 9년 전 | 133 | ||
| 8222 |
|
9년 전 | 207 | |
| 8221 | 9년 전 | 116 | ||
| 8220 | 9년 전 | 128 | ||
| 8219 | 9년 전 | 117 | ||
| 8218 | 9년 전 | 164 | ||
| 8217 |
star3840
|
9년 전 | 134 | |
| 8216 | 9년 전 | 182 | ||
| 8215 | 9년 전 | 137 | ||
| 8214 | 9년 전 | 244 | ||
| 8213 | 9년 전 | 187 | ||
| 8212 | 9년 전 | 107 | ||
| 8211 | 9년 전 | 274 | ||
| 8210 | 9년 전 | 271 | ||
| 8209 | 9년 전 | 359 | ||
| 8208 | 9년 전 | 244 | ||
| 8207 | 9년 전 | 244 | ||
| 8206 |
|
9년 전 | 210 | |
| 8205 | 9년 전 | 193 | ||
| 8204 | 9년 전 | 154 | ||
| 8203 | 9년 전 | 249 | ||
| 8202 | 9년 전 | 165 | ||
| 8201 | 9년 전 | 198 | ||
| 8200 | 9년 전 | 190 | ||
| 8199 | 9년 전 | 237 | ||
| 8198 | 9년 전 | 200 | ||
| 8197 | 9년 전 | 185 | ||
| 8196 | 9년 전 | 575 | ||
| 8195 | 9년 전 | 182 | ||
| 8194 | 9년 전 | 306 | ||
| 8193 | 9년 전 | 182 | ||
| 8192 | 9년 전 | 219 | ||
| 8191 | 9년 전 | 163 | ||
| 8190 | 9년 전 | 161 | ||
| 8189 | 9년 전 | 223 | ||
| 8188 | 9년 전 | 152 | ||
| 8187 | 9년 전 | 164 | ||
| 8186 | 9년 전 | 164 | ||
| 8185 | 9년 전 | 340 | ||
| 8184 | 9년 전 | 127 | ||
| 8183 | 9년 전 | 339 | ||
| 8182 | 9년 전 | 194 | ||
| 8181 | 9년 전 | 152 | ||
| 8180 | 9년 전 | 725 | ||
| 8179 | 9년 전 | 508 | ||
| 8178 | 9년 전 | 334 | ||
| 8177 |
kiplayer
|
9년 전 | 349 | |
| 8176 | 9년 전 | 381 | ||
| 8175 | 9년 전 | 249 | ||
| 8174 | 9년 전 | 269 | ||
| 8173 | 9년 전 | 360 | ||
| 8172 | 9년 전 | 228 | ||
| 8171 | 9년 전 | 202 | ||
| 8170 | 9년 전 | 315 | ||
| 8169 |
커네드커네드
|
9년 전 | 280 | |
| 8168 | 9년 전 | 349 | ||
| 8167 | 9년 전 | 339 | ||
| 8166 | 9년 전 | 260 | ||
| 8165 | 9년 전 | 190 | ||
| 8164 | 9년 전 | 323 | ||
| 8163 | 9년 전 | 307 | ||
| 8162 | 9년 전 | 327 | ||
| 8161 | 9년 전 | 318 | ||
| 8160 |
|
9년 전 | 513 | |
| 8159 | 9년 전 | 451 | ||
| 8158 | 9년 전 | 273 | ||
| 8157 | 9년 전 | 401 | ||
| 8156 | 9년 전 | 289 | ||
| 8155 | 9년 전 | 278 | ||
| 8154 |
00년생용띠
|
9년 전 | 620 | |
| 8153 | 9년 전 | 257 | ||
| 8152 |
|
9년 전 | 435 | |
| 8151 | 9년 전 | 440 | ||
| 8150 | 9년 전 | 530 | ||
| 8149 |
Jangfolk
|
9년 전 | 369 | |
| 8148 | 9년 전 | 194 | ||
| 8147 | 9년 전 | 403 | ||
| 8146 | 9년 전 | 469 | ||
| 8145 | 9년 전 | 421 | ||
| 8144 | 9년 전 | 382 | ||
| 8143 | 9년 전 | 220 | ||
| 8142 | 9년 전 | 457 | ||
| 8141 | 9년 전 | 401 | ||
| 8140 | 9년 전 | 950 | ||
| 8139 | 9년 전 | 290 | ||
| 8138 |
전갈자리남자
|
9년 전 | 409 | |
| 8137 | 9년 전 | 426 | ||
| 8136 | 9년 전 | 768 | ||
| 8135 |
|
9년 전 | 815 | |
| 8134 |
PlayPixel
|
9년 전 | 541 | |
| 8133 |
|
9년 전 | 462 | |
| 8132 | 9년 전 | 482 | ||
| 8131 | 9년 전 | 833 |
댓글 작성
댓글을 작성하시려면 로그인이 필요합니다.
로그인하기