[vb] xml bestand opslaan

[eXistenz]

Ik wil deze site opslaan in een text bestand
gathering.tweakers.net/~acm/xml/activetopics.php

maar lukt niet echt

Private Sub cmdExtract_Click()
Dim aString As String
aString = intMain.OpenURL(txtURL.Text)
RichTxtBox.Text = aString
Open "F:blah.txt" For Append As #1
Write #1, aString
Close #1

end sub

de inhoud komt ook niet geheel in de textbox, hij laat maar ongeveer de helft van die site zien.
nou zal ik heus wel iets verkeerds doen hoor ,maar kweet nie wat.

iemand weten ?

[edit]
Bij nader inzien wil ik het niet wegschrijven naar text file, maar gewoon in de string bewerken, alleen dan blijf ik hetzelfde probleem houden.
De string heeft alleen maar de 1e helft van de site opgeslagen.

Iemand die weet hoe dat kan of die andere manier weet om dat te doen ?

[eXistenz]

*kuch*
nobody ?

[brokenp]

Tot waar werkt hij wel goed? Het zou wel ns kunnen dat VB het niet pikt dat er in de string "-tekens voorkomen

[Verwijderd]

Er is trouwens ook een mooi MSXML componentje. Kijk daar eens naar. Want dit is niet echt netjes...
Het kan veel mooier .

[eXistenz]

Op dinsdag 19 maart 2002 19:38 schreef brokenp het volgende:
Tot waar werkt hij wel goed? Het zou wel ns kunnen dat VB het niet pikt dat er in de string "-tekens voorkomen

de 1e helft van de inhoud van die site komt in de string te staan het laatste deel dus niet.

Heb net gekeken naar MSXML componentje en dat werkt perfect
Ty KoenM