Http timeout on desktop

[nm7s9]

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

 

[agraham]

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.

 

[nm7s9]

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.

 

[TWELVE]

Therefore I must have a seriously messedup operating system.

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

 

[nm7s9]

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.