2017-03-19 55 views
0

我正在嘗試使用VBS從網站收集文件的名稱。我可以獲取HTML代碼,但我不知道如何提取名稱。我還沒有找到任何可以做我需要的事情。我需要從表中提取文件的名稱。圍繞我需要的HTML看起來像這樣tsc_details.php?show_id=需要的信息">有許多不同的名稱格式同樣的方式和名稱的數量會不時變化。VBScript在HTML中查找文本

注意:在HTML代碼的不同位置會有多個這樣的字符。

這裏是我的代碼

On Error Resume Next 
Set ie = CreateObject("InternetExplorer.Application") 
ie.Navigate "WWW.Webpage.com" 
ie.Visible = True 
While IE.ReadyState <> 4 : WScript.Sleep 100 : Wend 
ie.document.getElementById("f_user").Value = "user" 
ie.document.getElementById("f_pass").Value = "pass" 
ie.document.All.Item("submitb").Click 
While IE.ReadyState <> 4 : WScript.Sleep 100 : Wend 

這是我的所有的代碼。它非常適合登錄到頁面我只是不知道如何獲取我需要的信息。

+1

問題是什麼?你試過什麼了?你的代碼在哪裏?請閱讀[mcve]是什麼。 – LotPings

回答

0

想通了,並希望分享我的調查結果,以防止他人幫忙。

For Each a In IE.Document.GetElementsByTagName("A") 
    If InStr(a.GetAttribute("href"),"tsc_details.php?show_id=") > 0 Then 
var = a.GetAttribute("href") 
var = Replace(var,"tsc_details.php?show_id=","")  
exit for 
end if 
next 

使用此代碼

+0

你應該在一天之後回來,並將答案標記爲答案。 – ACatInLove