各位： 我最近遇到一個問題，我用javascrip語法寫了一個random的網頁，可是我想把他所產生的random值抓下來，但不知如何著手，如果你們會的話，教教我..感激不盡 而我的javascrip的寫法如下：    now = new Date(); number = 90+20*Math.abs(Math.random(now.getTime())); ("HR = ", number,"
") 我是ORIS，大家好 發表人 - orisboy 於 2004/12/29 21:04:52

------
我是ORIS，大家好

寫程式去Parse HTML 原始碼 找 "HR = " 之後的值就是 *視情況修改, ex: Random 值之後有沒有其他字元     

function GetNumberFromHTML(prefix, posfix, htmlfile:String):string;
var
  searchList:TStringList;
  i:integer;
  iPos, ePos:integer;
begin
  searchList:=TStringList.Create(self);
  searchList.LoadFromFile(htmlfile);
  for i=0 to searchList.count-1 do
  begin
     iPos:=Pos(prefix, searchList[i]);
     if iPos>0 then
     begin
       if posfix<>'' then
       begin
          ePos:=PosEx(posfix, searchList[i], iPos);
          if ePos=0 then
             ePos:=Length(searchList[i]);
       end
       else
          ePos:=Length(searchList[i]);
 
       Result:=Copy(searchList[i], iPos Length(prefix), ePos-iPos-Length(prefix));
       break;
     end;
  end;  
end;    呼叫方式
var
  prefix, random:String;
begin
  prefix:='HR = ';
  posfix:=''; //如果random值後面又有字元
  random:=GetNumberFromHTML(prefix, posfix, 'Test.html');
end;

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.