garrox
Gebruiker
- Lid geworden
- 27 nov 2010
- Berichten
- 44
hallo,
ik voer mijn visual studio 2008 uit vanuit vmware.
nu heb ik een aaplicatie geschreven dat op een bepaald ogenblik een httpwebrequest uitvoerd, samen met de response en streamreader. geen probleem
code is succesvol.
maar als ik nu de voltooide applicatie over zet naar mn host os (de os die mn vmware host). dan krijg ik de foutmelding --> kan geen verbinding met de externe server maken.
dit is mijn code (die dus wel binnen vs2008 werkt, en ook als los bestand op die os).
Deze code heb later nog toegevoegd in de hioop het te solven (zou volgens msdn moeten helpen)
iemand een idee?
ik voer mijn visual studio 2008 uit vanuit vmware.
nu heb ik een aaplicatie geschreven dat op een bepaald ogenblik een httpwebrequest uitvoerd, samen met de response en streamreader. geen probleem
code is succesvol.
maar als ik nu de voltooide applicatie over zet naar mn host os (de os die mn vmware host). dan krijg ik de foutmelding --> kan geen verbinding met de externe server maken.
dit is mijn code (die dus wel binnen vs2008 werkt, en ook als los bestand op die os).
Code:
Dim s As String = String.Empty
Try
Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(DownLocation)
request.AllowAutoRedirect = True
request.KeepAlive = False
request.Timeout = 1000 * 30
request.UserAgent = "Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)"
request.PreAuthenticate = True
request.Credentials = CredentialCache.DefaultCredentials
request.Method = "GET"
request.ProtocolVersion = HttpVersion.Version10
Dim response As System.Net.HttpWebResponse = request.GetResponse()
Using reader As StreamReader = New StreamReader(response.GetResponseStream())
s = reader.ReadToEnd()
End Using
response.Close()
Catch ex As Exception
MsgBox("FAIL: " & ex.Message, MsgBoxStyle.Critical, "GRX NamePain - Error")
End Try
Deze code heb later nog toegevoegd in de hioop het te solven (zou volgens msdn moeten helpen)
Code:
ServicePointManager.UseNagleAlgorithm = True
ServicePointManager.Expect100Continue = True
ServicePointManager.CheckCertificateRevocationList = True
ServicePointManager.DefaultConnectionLimit = _
ServicePointManager.DefaultPersistentConnectionLimit
Dim IsAvalible As String = My.Computer.Network.IsAvailable
MsgBox("network availability = " & IsAvalible)
iemand een idee?