2014-04-16 57 views
-1

我想使用VBScript做以下事情:VBScript來查找一個URL鏈接1

  1. 打開一個URL

    strURL = 「www.abc.com」
    設置objShell =的CreateObject ( 「Wscript.Shell」)
    objShell.Run(strURL)

2.找到在T 1日下載鏈接他URL包含字符串說「ABCD」

  1. 打開該下載鏈接

我有腳本打開URL,所以第一和第三完成。 如果有人可以幫助我第二步,那會很棒!

謝謝!

+1

繼續併發布代碼#1和#3,以便我們可以看到我們正在處理的內容。然後我們可以根據您的編碼風格和結構定製我們的答案。 – Bond

+0

我在問題本身添加了代碼。 – user2862496

回答

0

您的代碼將隱式啓動IE(或任何默認瀏覽器碰巧)。但是,最好是啓動它,然後,明確地,以便您可以控制它。例如:

' Launch Internet Explorer... 
Set ie = CreateObject("InternetExplorer.Application") 
ie.Visible = True 
ie.Navigate strURL 

' Wait for page to load... 
Do While ie.Busy 
    WScript.Sleep 100 
Loop 

' Get all the links on the page... 
Set Links = ie.document.getElementsByTagName("a") 

' Find the first link whose URL contains the text "abcd"... 
For Each Link In Links 
    If InStr(1, Link.href, "abcd", vbTextCompare) > 0 Then 

     ' Found it. Load it. 
     ie.Navigate Link.href 
     Exit For 

    End If 
Next 
+0

我加了strURL =「www.abc.com」然後寫了你的代碼。它顯示類型不匹配'Createobject' – user2862496

+0

Set ie = CreateObject(「InternetExplorer.Application」) ie.Visible = True ie.Navigate www.abc.com顯示錯誤 – user2862496

+0

您已經在您的代碼中定義了'strURL',所以我是隻是使用你現有的變量。 – Bond