Looping

[visualAd]

Im doing this

Private Sub Command7_Click()
popo = 0
Do Until popo = (Text1.Text)
Inet1.Execute "http://google.com"
Loop
End Sub

I want inet1 to execute that untill popo = what ever text1.text is , but i get a error on the Do Until part. What did i do wrong?

Could you explain why you want to do, as this code will cause your program to repeatedly request the Google web site at a high freency in a very small amount of time and could be seen by them as a (DOS) denial of service attack!!!