<?
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개
신문사 소스글 잘 보았습니다
그런데 어떻게 적용해야 하는지 궁금하네요
소스를 드림위버에 넣어보아도 반응이 전혀 없어서요 ......
그누보드소스에 넣어야 하는지 ...
아니면 어떻게 적용하는건지좀 알으켜 주세요 ....
그럼수고하세요 ~~~
게시판 목록
프로그램
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 |
|---|---|---|---|---|
| 7230 | 11년 전 | 3636 | ||
| 7229 | 11년 전 | 3759 | ||
| 7228 | 11년 전 | 3799 | ||
| 7227 | 11년 전 | 3922 | ||
| 7226 | 11년 전 | 2373 | ||
| 7225 | 11년 전 | 17461 | ||
| 7224 |
AngryDev
|
11년 전 | 1367 | |
| 7223 |
돌아온깡통
|
11년 전 | 1120 | |
| 7222 |
돌아온깡통
|
11년 전 | 1063 | |
| 7221 |
돌아온깡통
|
11년 전 | 893 | |
| 7220 |
돌아온깡통
|
11년 전 | 1011 | |
| 7219 |
돌아온깡통
|
11년 전 | 843 | |
| 7218 |
돌아온깡통
|
11년 전 | 673 | |
| 7217 |
돌아온깡통
|
11년 전 | 1059 | |
| 7216 |
돌아온깡통
|
11년 전 | 799 | |
| 7215 |
돌아온깡통
|
11년 전 | 721 | |
| 7214 |
돌아온깡통
|
11년 전 | 1069 | |
| 7213 |
돌아온깡통
|
11년 전 | 939 | |
| 7212 |
돌아온깡통
|
11년 전 | 723 | |
| 7211 |
돌아온깡통
|
11년 전 | 881 | |
| 7210 |
돌아온깡통
|
11년 전 | 905 | |
| 7209 |
돌아온깡통
|
11년 전 | 898 | |
| 7208 |
돌아온깡통
|
11년 전 | 1017 | |
| 7207 |
돌아온깡통
|
11년 전 | 631 | |
| 7206 |
돌아온깡통
|
11년 전 | 692 | |
| 7205 |
돌아온깡통
|
11년 전 | 876 | |
| 7204 |
돌아온깡통
|
11년 전 | 738 | |
| 7203 |
돌아온깡통
|
11년 전 | 750 | |
| 7202 |
돌아온깡통
|
11년 전 | 731 | |
| 7201 |
돌아온깡통
|
11년 전 | 680 | |
| 7200 |
돌아온깡통
|
11년 전 | 710 | |
| 7199 |
돌아온깡통
|
11년 전 | 1333 | |
| 7198 |
돌아온깡통
|
11년 전 | 662 | |
| 7197 |
돌아온깡통
|
11년 전 | 979 | |
| 7196 |
돌아온깡통
|
11년 전 | 888 | |
| 7195 |
돌아온깡통
|
11년 전 | 625 | |
| 7194 |
돌아온깡통
|
11년 전 | 654 | |
| 7193 |
돌아온깡통
|
11년 전 | 719 | |
| 7192 |
돌아온깡통
|
11년 전 | 748 | |
| 7191 |
joe031
|
11년 전 | 1276 | |
| 7190 | 11년 전 | 4163 | ||
| 7189 | 11년 전 | 1256 | ||
| 7188 |
잘살아보자
|
11년 전 | 974 | |
| 7187 | 11년 전 | 1452 | ||
| 7186 |
kiplayer
|
11년 전 | 7557 | |
| 7185 | 11년 전 | 1147 | ||
| 7184 |
잘살아보자
|
11년 전 | 2345 | |
| 7183 |
잘살아보자
|
11년 전 | 1161 | |
| 7182 |
잘살아보자
|
11년 전 | 1230 | |
| 7181 | 11년 전 | 1498 | ||
| 7180 |
하얀비요일
|
11년 전 | 994 | |
| 7179 |
잘살아보자
|
11년 전 | 1000 | |
| 7178 | 11년 전 | 991 | ||
| 7177 | 11년 전 | 1014 | ||
| 7176 | 11년 전 | 1667 | ||
| 7175 |
|
11년 전 | 1050 | |
| 7174 |
kiplayer
|
11년 전 | 1182 | |
| 7173 | 11년 전 | 963 | ||
| 7172 |
잘살아보자
|
11년 전 | 4649 | |
| 7171 |
잘살아보자
|
11년 전 | 716 | |
| 7170 | 11년 전 | 1083 | ||
| 7169 |
초심의설렘
|
11년 전 | 1480 | |
| 7168 | 11년 전 | 1017 | ||
| 7167 |
잘살아보자
|
11년 전 | 5296 | |
| 7166 |
잘살아보자
|
11년 전 | 3449 | |
| 7165 | 11년 전 | 4963 | ||
| 7164 | 11년 전 | 839 | ||
| 7163 | 11년 전 | 1214 | ||
| 7162 |
울라라라우
|
11년 전 | 1400 | |
| 7161 | 11년 전 | 1275 | ||
| 7160 |
skyler
|
11년 전 | 1194 | |
| 7159 |
|
11년 전 | 715 | |
| 7158 |
|
11년 전 | 3366 | |
| 7157 |
잘살아보자
|
11년 전 | 2901 | |
| 7156 |
잘살아보자
|
11년 전 | 2236 | |
| 7155 |
잘살아보자
|
11년 전 | 1465 | |
| 7154 |
잘살아보자
|
11년 전 | 1452 | |
| 7153 | 11년 전 | 2904 | ||
| 7152 |
울라라라우
|
11년 전 | 835 | |
| 7151 | 11년 전 | 1071 | ||
| 7150 |
잘살아보자
|
11년 전 | 2389 | |
| 7149 |
잘살아보자
|
11년 전 | 3304 | |
| 7148 |
잘살아보자
|
11년 전 | 1202 | |
| 7147 |
잘살아보자
|
11년 전 | 775 | |
| 7146 |
잘살아보자
|
11년 전 | 1415 | |
| 7145 |
잘살아보자
|
11년 전 | 731 | |
| 7144 |
잘살아보자
|
11년 전 | 1326 | |
| 7143 |
잘살아보자
|
11년 전 | 768 | |
| 7142 |
잘살아보자
|
11년 전 | 1460 | |
| 7141 |
잘살아보자
|
11년 전 | 1204 | |
| 7140 |
잘살아보자
|
11년 전 | 2023 | |
| 7139 |
잘살아보자
|
11년 전 | 3687 | |
| 7138 |
잘살아보자
|
11년 전 | 3182 | |
| 7137 |
잘살아보자
|
11년 전 | 3637 | |
| 7136 |
잘살아보자
|
11년 전 | 1394 | |
| 7135 |
gooroo
|
11년 전 | 1623 | |
| 7134 |
열라뽕똬이
|
11년 전 | 2326 | |
| 7133 |
|
11년 전 | 1027 | |
| 7132 | 11년 전 | 1440 | ||
| 7131 | 11년 전 | 3581 |
댓글 작성
댓글을 작성하시려면 로그인이 필요합니다.
로그인하기