" deleten

[djpommes]

ik ben bezig met een programmatje die de msn contact bestanden leest (.ctt)
en dan wil ik daar een nette lijst van maken. dus alle overige woorden etc in de .ctt verwijderen. dit doe ik met de code:

outcome = Replace(Text1.Text, "<?xml version=", "")

maar nu zitten er ook een paar " tekens in die ook weg moeten.. maar als ik:

outcome = Replace(Text1.Text, """, "")

doe pakt hij hem niet.. hoe krijg ik die " ook weg.. thnx

OPTIE 2! (mischien nog wel makelijker!)
het .ctt bestand ziet er zo uit:

<?xml version="1.0"?>
<messenger>
<service name=".NET Messenger Service">
<contactlist>
<contact type="1">xxxx@hotmail.com</contact>
<contact type="1">xxxx@hotmail.com</contact>
<contact type="1">xxxx@live.nl</contact>
</contactlist>
</service>
</messenger>

mischien is het mogelijk om van pijltje naar pijltje te lezen?

 

[Pizara]

Lijkt me typisch gevalletje van XML zoals al op de eerste lijn staat aangegeven,
Niets aan de hand. Pad en filenaam invoeren en op je immidiate window links onderin klikken.

Have fun.
Pizara


Imports System.Xml

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim doc As New XmlDocument()
Dim nodes As XmlNodeList

doc.Load("mijnxml.ctt")
nodes = doc.SelectNodes("/messenger/service/contactlist/contact")

For Each node As XmlNode In nodes
Debug.Print(node.InnerText)
Next
End Sub

End Class