how to make it work automatically ?

**polas6** · 07-28-2011

I got the same error and with dotnet.dll and with dotnet20.dll too.
I first using google api search dll components.
I do not understand with my simple google api search engine working great but not with this code.

**Blubb1337** · 07-28-2011

You exceeded some quota google has on their API services to prevent abuse of the services. Perhaps during your app testing you submitted too many queries to their API, and you will have to wait until it is reset (probably a 24 hour thing) until you can run queries again.

**polas6** · 07-28-2011

Ok anyway it won't work.
I found solution it gives me only limited time a day so i thought i wont use api anymore.

Can i ask something about how to extract using regular expresions links from google using this code ?
If you don't i will not ask anymore

i need to extract all links something like php,asp,aspx,html,html,js,css and so on.
But not gif,or png.
i'm new for regular expression.

here is the code.

Code:

Dim wc As New WebClient
        Dim source As String = wc.DownloadString("https://" + TextBox1.Text)
        Dim m1 As MatchCollection = Regex.Matches(source, "<a.*?href=""(.*?)"".*?>(.*?)</a>", RegexOptions.Singleline + RegexOptions.IgnoreCase)
        For Each m As Match In m1
            Dim value As String = m.Groups(0).Value
            ListBox1.Items.Add(value)

        Next

This is code extract only in <a href="">show me something cool</a>
And i need like this https://www.mysitealllinks.com
or just a text.

it will be better like

Google & textbox1.text
do you need a help from us

YouTube - Broadcast Yourself. & textbox1.text
vb.net programming

YouTube - Broadcast Yourself. & textbox1.text
vb.net programming for begginers

And so on.

Can you help me ?
I think it will be how knows that simple right ?

**Blubb1337** · 07-28-2011

Why don't you simply edit this part:

ListBox1.Items.Add(value)

and check whether it is a gif or so...

If Not value.EndsWith(".gif") Then
ListBox1.Items.Add(value)
End If