腦友記廣場 -> 新手上路 -> 萌報週刊 登錄 -> 註冊 -> 回復主題 -> 發表主題

yuenlong 2006-07-15 16:27
真係唔好意思,又想....請問一下。有句真正的 URL 收藏於一個 html 裡頭。

QUOTE:
<script language="JavaScript">
<!--
self.location="./1963/cstory_index.htm";
//-->
</script>


我想揪呢條 link 出來,首先 read 左個 dummy htm 檔先,再取代 ./ 為正確 domain ,但係最後 $requesturl 裡頭總係 /htm   /1963 中間多左一個空隔,

Warning: fopen(http://www.mingpaoweekly.com/htm /1963/cstory_index.htm ): failed to open stream: HTTP request failed! HTTP/1.1 404 Object Not Found

試來...試去...都要舉白旗了。


<?
$requesturl = "http://www.mingpaoweekly.com/htm/main_cstory.htm";
if ($fp = fopen("$requesturl","r")){
  while(!feof($fp))
  {
    $line = $line.fgets($fp,256);
  }
  fclose($fp);
}
eregi("<script language=\"JavaScript\">(.*)</script>",$line,$matches);
$line=$matches[1];
$line=eregi_replace("self.location=\"\.","",$line);
$line=eregi_replace("<\!--","",$line);
$line=eregi_replace("\"\;","",$line);
$line=eregi_replace("//-->","",$line);
$requesturl = "http://www.mingpaoweekly.com/htm$line";

echo($line);
echo($requesturl);

maninnet 2006-07-15 20:00
invisible character 係一個好麻煩的問題. 最簡單的方法係加多二句:
$line=ltrim($line);
$line=rtrim($line);

r for 右 right , l for 左 left, ltrim 同 rtrim 分別將左面同右面的空隔消去.

yuenlong 2006-07-16 02:58
都係唔得,反而試做一份類似情況的 togo 就無問題,唔知呢個 space 空隔點樣跑入去的哩
http://elife.maninnet.com/read.php?tid=278&fpage=1

maninnet 2006-07-16 06:13
主要原因在於 togo 在一行, 而明報週刊係幾行. 頭頭尾尾都有空隔. 我已試過, 用 trim 是可以的.

<?
$requesturl = "http://www.mingpaoweekly.com/htm/main_cstory.htm";
if ($fp = fopen("$requesturl","r")){
while(!feof($fp))
{
  $line = $line.fgets($fp,256);
}
fclose($fp);
}
eregi("<script language=\"JavaScript\">(.*)</script>",$line,$matches);
$line=$matches[1];
$line=eregi_replace("self.location=\"\.","",$line);
$line=eregi_replace("<\!--","",$line);
$line=eregi_replace("\"\;","",$line);
$line=eregi_replace("//-->","",$line);
$line=ltrim($line);
$line=rtrim($line);
$requesturl = "http://www.mingpaoweekly.com/htm$line";
echo($line."AAA<br>");
echo($requesturl);
?>

我在顯示換行之前放了AAA是想看後面還有沒有不可見之空隔. 用了 trim 之後, 已經沒有了.

yuenlong 2006-07-16 12:35
得啦...Thanks !!!

有什麼好方法可以刪走這些 pull down menu 哩 ?

QUOTE:
<td align="right" valign="middle" width=100><font size="2">
<select name="select" onChange="MM_jumpMenu('self',this,0)">
<option selected>───今日猛料───</option>
<option value=maa1.htm>《洗證先鋒》涉抄襲《CSI》結局</option>
<option value=mab1.htm>周慧敏餵貓狗食藥3秒搞掂</option>
<option value=mac1.htm>容祖兒1日內狂吃32個月餅</option>
<option value=mad1.htm>鄺美雲每周為愛犬做Spa</option>
<option value=mba1.htm>Tommy知衰 離港避風頭</option>
<option value=mba2.htm>肥媽﹕他是否黐線﹖</option>
<option value=mbb1.htm>郭羨妮預告生日有男士相伴</option>
<option value=mbc1.htm>溫兆倫被問郭羨妮緋聞即鬆人</option>
<option value=mbd1.htm>李彩華 蕭定一不嫌避合照</option>
<option value=mbe1.htm>華仔打保齡失準</option>
<option value=mbf1.htm>侯佩岑暗示與周杰倫分手</option>
<option value=mbg1.htm>周汶錡隨時結婚</option>
<option value=mca1.htm>SE7EN港姐大跳辣身舞</option>
<option value=mcb1.htm>關詠荷笑言嚇親張家輝</option>
<option value=mcc1.htm>徐濠縈撐好友不捧老公場</option>
<option value=mcd1.htm>陳錦鴻被吳美珩胸壓背有感覺</option>
<option value=mce1.htm>梁詠琪嗌浪費</option>
<option value=mcf1.htm>KennySteven互爆臭史</option>
<option value=mcz1.htm>麥當娜婚變危機升級</option>
<option value=mcz2.htm>東方神起大馬開騷</option>
<option value=mcz3.htm>Eminem如廁 揮拳傷人</option>
<option value=mcz4.htm>米高錢債案二五折賠償</option>
<option value=mcz5.htm>曉治積曼日本大學演講</option>
<option value=mcz6.htm>內地出現盜版《魔盜王2》</option>
<option value=mcz7.htm>畢彼特評審重建計劃</option>
<option value=mea1.htm>衛星追蹤動物大遷徒</option>
<option value=meb1.htm>《禍水》精華片段率先睇</option>
<option value=mec1.htm>周慧敏今晚電暈你</option>
<option value=med1.htm>查理辛恐怖越戰經歷</option>
<option value=mee1.htm>光之美少女大戰怪物</option>
<option value=mef1.htm>《超人》祖孫延續命脈</option>
<option value=meg1.htm>內地低成本製作的突破</option>


我嘗試用這個你之前教過的 width 方法,不過可能句法問題未成功,請指點一下,謝謝 !!
$line=eregi_replace("<option","<!",$line);
$line=eregi_replace("width(.){2,30}htm>","",$line);
$line=eregi_replace("width(.){2,30}selected>","",$line);
$line=eregi_replace("</option","",$line);

maninnet 2006-07-16 18:22
eregi_replace("<option(.*)\/option>","",$line);

dynmv 2006-07-16 18:32
有無perl版比我地d電腦盲玩下

yuenlong 2006-07-16 19:53
QUOTE:
下面是引用dynmv於2006-07-16 18:32發表的:
有無perl版比我地d電腦盲玩下


我只有 php 無 perl 啊,其實我更加盲,把現成的 codes 推推砌砌,好彩有版主做盲公竹幫我走路。

yuenlong 2006-07-16 20:00
QUOTE:
下面是引用maninnet於2006-07-16 18:22發表的:
eregi_replace("<option(.*)/option>","",$line);



Thanks x 1,000

http://elife.maninnet.com/read.php?tid=281&fpage=1

maninnet 2006-07-16 21:07
perl 版比 php 版麻煩, 因為要將內容及圖片下載. 如何處理檔案名稱, 已經是一個頭痛問題.

maninnet 2006-07-16 21:15
制作 php 版其實好簡單, 不過, 費時間同耐心.

yuenlong 2006-07-16 22:51
QUOTE:
下面是引用maninnet於2006-07-16 21:15發表的:
制作 php 版其實好簡單, 不過, 費時間同耐心.



講真.....講真....你的新手上路非常好,教得很好,我根本唔識 php 的,所以好多謝你的指教,相信對其他版友亦可以跟隨學習一下。 哈哈,依家我個文字版新聞 collection 好豐富啦! thanks.

yuenlong 2006-07-23 20:40
明週真係怪....

http://www.mingpaoweekly.com/htm/main_cstory.htm
裡面的 javascript 會引去最新一期
http://www.mingpaoweekly.com/htm/1963/cstory_index.htm

但係人手更改期數....發現佢 1964, 1965 都己經出左,但係都唔更新個 javascript auto jump 的 link .......依家仲係 1963期 的封面故事。

http://www.mingpaoweekly.com/htm/1964/cstory_index.htm
http://www.mingpaoweekly.com/htm/1965/cstory_index.htm


查看完整版本: [-- 萌報週刊 --] [-- top --]


Powered by PHPWind v4.0.1 Code © 2003-05 PHPWind
Gzip enabled

You can contact us