請教天使大大 : 這個Function 的lev參數 TraceURL(WebBrowser1,edit1.text,3); 1:為何要給3 ?? 2:為什麼可以抓到所有的股票編號資料 到底是在哪裡抓的 嗯~~~我的意思是當程式找到url的路徑後(也就是某個網頁) 是怎樣把在網頁上的文字抓回來 應該不是找到url就可以抓回資料那麼簡單吧 thinks 天行健 君子當自強不息~~@.@ 發表人 - T.J.B 於 2003/04/18 13:54:12

------
天行健
君子當自強不息~~@.@

引言: 請教天使大大 : 這個Function 的lev參數 TraceURL(WebBrowser1,edit1.text,3); 1:為何要給3 ?? 2:為什麼可以抓到所有的股票編號資料 到底是在哪裡抓的 嗯~~~我的意思是當程式找到url的路徑後(也就是某個網頁) 是怎樣把在網頁上的文字抓回來 應該不是找到url就可以抓回資料那麼簡單吧 thinks 天行健 君子當自強不息~~@.@ 發表人 - T.J.B 於 2003/04/18 13:54:12

1.因為有的股票代碼要到第三層才會出現 2.您的問題程式碼中就可以看出為何? webbrowser1.Navigate(url); //讀入url的網頁內容到webbrowser1 doc:=webbrowser1.Document as IHTMLDocument2; //取出網頁內容 all:=doc.Get_links; // 取出網頁的連結網址 len:=all.length; for i:=0 to len-1 do ... if uppercase(copy(item.href,1,11))='' then // 找出有JAVASCRIPT的KeyWord處可以得到股票代號與代碼 ～～～Delphi K.Top討論區站長～～～