Http timeout on desktop

The followingcode runs properly on the device but gets a timeout on the desktop.

If I run it under debug (on the desktop) it gets a timeout (without sending out any http request) but if I set debug run going a second time, it works fine.

Nick

Sub Globals
'Declare the global variables here.

End Sub

Sub App_Start
Form1.Show
URL="http://www.google.com"
webresp1.New1
webreq1.New1(URL)
webresp1.Value = webreq1.GetResponse
string1 = webresp1.GetString
webresp1.Close
Textbox1.Text = string1

End Sub

It's not your code. Your little app works immediately on my desktop under v6.90 both in the IDE and when optimised compiled.

EDIT:- My desktop runs Vista Home Premium and Basic4ppc and your app run fine without Administrator privileges.

Thanks for testing that.

I have now run the exe on two different XP machines and it works ok.
Therefore I must have a seriously messedup operating system.

Time to do windows re-install.

Therefore I must have a seriously messedup operating system.

Click to expand...

Suspect your desktop firewall.These often do more harm then they avoid.
Try to deactiviate the firewall, if still not solved, deinstall the firewall.I've seen that a lot of times with products like Norton etc...


regards,

TWELVE

Thanks for the tip twelve,

However, I tried turning off both the MS firewall and the anti-virus firewall as well but this didn't solve the problem.

However it doesn't really matter too much since the app I'm writing is only meant to be used mobile.