我有一个函数可以遍历 vb.net 中的一组链接:
For Each category As HtmlElement In fs.cats
fs.run_fetch(category)
outToCSV(fs.results, "C:\Data\test.csv")
outToCSV(fs.errors, "C:\Data\errors.csv")
Next
它适用于第一个循环,但是一旦进入第二个循环, fs.run_fetch(category) 就会给我*访问被拒绝。(来自 HRESULT 的异常:0x80070005 (E_ACCESSDENIED))*尝试运行以下命令时
Public Sub run_fetch(ByVal category As HtmlElement)
Dim itemsonpage As HtmlElementCollection
Dim title, id, salePrice, regPrice As String
Dim numberOnSale, currentPage As Integer
'navigate to category page
loadPage(category.GetAttribute("href")) **<- error here**