Ergebnis einer PHP Seite auslesen

[Karsten Heddenhausen]

Moin, moin!

Ich habe ein, wahrscheinlich, ganz kleines Problem. Ich habe eine Seite, die
mir mittels PHP eine XML Ausgabe generiert
(http://status.ircddb.net/dstar-xml.php). Diesen XML String benötige ich in
meinem Programm. Bloss wie komme ich dran? Wenn ich meine
Standard-Download-Routine drauf ansetze, die ich sonst für den Download von
Dateien nutze, erhalte ich immer eine leere Datei :-( Kann mir hier jemand
auf die Spürünge helfen, wie ich an die Daten rankomme, der IE9 speichert die
Informationen ja schliesslich auch richtig ab. Also sollte es ja irgendwie
möglich sein.

Gruß, Karsten

[Peter Fleischer]

Hi Karsten,
probiere mal folgendes:

Public Sub Main()

Dim URL As String = "http://status.ircddb.net/dstar-xml.php"
Try
Dim objRequest As System.Net.WebRequest
objRequest = System.Net.HttpWebRequest.Create(URL)
With objRequest
.Method = "GET"
.Timeout = 120000 ' 20 sekunden
Using str As System.IO.Stream = .GetResponse.GetResponseStream()
Dim buf(1000000) As Byte
Using sw As New System.IO.StreamWriter("c:\temp\x.txt")
Dim l As Integer = 0
Do
l = str.Read(buf, 0, 1000000)
If l > 0 Then sw.Write(Text.Encoding.Default.GetString(buf, 0,
l))
Loop While l > 0
End Using
End Using
End With
Catch e As Exception
Console.WriteLine(e.Message)
End Try

Console.ReadLine()
End Sub

--
Viele Gruesse
Peter

[Karsten Heddenhausen]

Hi Peter!

Tnx, ich habe da jetzt auch noch eine recht kurze, aber funktionierende
Variante gefunden...

Public Sub Download(sURL as String, sDatei as String)
Try
Dim myWebClient as New System.Net.WebClient
myWebClient.DownloadFile(sURL, sDatei)
Catch
End Try
End Sub

Tut einwandfrei.

Gruß, Karsten