VBScript查找URL中的第一个链接

我想使用VBScript执行以下操作：

打开URL

strURL=“www.abc.com”
设置objShell=CreateObject（“Wscript.Shell”）
objShell.Run（strURL）

二,。在URL中找到第一个下载链接，该链接包含一个字符串，如“abcd”

打开那个下载链接

我有打开URL的脚本，所以第一个和第三个都完成了。 如果有人能帮我完成第二步，那就太好了

---

谢谢

您的代码将隐式启动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

---

请继续发布您的#1和#3代码，以便我们可以查看我们正在使用的内容。然后我们可以根据您的编码风格和结构定制我们的答案。我在问题中添加了代码。我添加了strURL=“www.abc.com”，然后编写了您的代码。它显示类型不匹配的“Createobject”集合ie=Createobject（“InternetExplorer.Application”）ie.Visible=True ie.Navigate www.abc.com显示错误您已经在代码中定义了

strURL

，所以我只是使用了您现有的变量。此代码适用于正常链接。但不适用于下载链接。Kinldy Help我刚刚试穿了

http://www.rarlab.com/rar/wrar501.exe

（WinRAR测试下载）它对我很有效。你说它不起作用是什么意思？你有错误吗？