VB.net Извлечь результат из поиска Google

Я хочу извлечь результаты поиска Google,
я использую Google.API.Search,

Я попытался извлечь результат по этому коду:

Dim client As New GwebSearchClient("http://www.google.co.il")
Dim results As IList(Of IWebResult) = client.Search("test", 64)
For Each result As IWebResult In results
            ListBox1.Items.Add(result.Url)
Next
Me.Text = ListBox1.Items.Count

Этот код работает частично
, результат ограничен 64 результатами.
я хочу получить 400 результатов,
есть ли другой способ получить результат от Google?
(я предпочитаю не использовать Google.API.Search , возможно, получить результат с помощью "регулярного выражения")
Я бы предпочел любой другой способ.


person Nmmmm    schedule 30.10.2012    source источник
comment
Вы знаете, что вторым параметром (в вашем случае 64) является размер результата... Если вы хотите 400 результатов, вы должны указать 400 (потому что теперь вы говорите API, что вам нужно только 64)!   -  person Styxxy    schedule 31.10.2012
comment
О, кстати, API, который вы используете, похоже, тоже устарел. См. также: developers.google.com/web-search.   -  person Styxxy    schedule 31.10.2012


Ответы (2)


Я не уверен, как это работает. Но рядом со строкой «тест» есть целое число, равное 64. Вы получаете 64 результата, так что я думаю, что это может быть оно.

Dim client As New GwebSearchClient("http://www.google.co.il")
Dim results As IList(Of IWebResult) = client.Search("test", 400)
For Each result As IWebResult In results
            ListBox1.Items.Add(result.Url)
Next
Me.Text = ListBox1.Items.Count

Измените код на указанный выше, все должно быть в порядке!

person user1951335    schedule 05.01.2013
comment
Как я мог искать дважды? потому что он говорит мне, что ссылка на объект не установлена ​​​​на экземпляр объекта. - person eawedat; 23.02.2014

К сожалению, API поиска Google ограничивает поиск до 64, независимо от того, превышаете ли вы это ограничение. По крайней мере, это то, что я читал в их документации.

person Erich    schedule 27.05.2014