Hallo,
wie kann ich mittels VB die DOCTYPE in einen XML-File löschen? Ich habs mit „getElementsByTagName“ versucht, geht aber leider nicht.
Dim doct As IXMLDOMNodeList
Dim xmlFile As MSXML2.DOMDocument30
Set xmlFile = New DOMDocument30
xmlFile.Load („C:\test.xml“)
Set doct = xmlFile.getElementsByTagName("???")
XML-File:
<?xml version="1.0" encoding="ISO-8859-1"?>HOMEFULLGrüße
wie kann ich mittels VB die DOCTYPE in einen XML-File löschen?
Ich habs mit „getElementsByTagName“ versucht, geht aber leider
nicht.
Hi Albert,
ungetestet als Ansatz. Seltsamerweise finde ich in Excel2000-Vba kein „Rename“ deshalb das „Move“.
Option Explicit
'
Sub tt()
Dim Satz As String
Close
Open "C:\test.xml" For Input As #1
Open "C:\test2.xml" For Output As #2
While Not EOF(1)
Line Input #1, Satz
If InStr(Satz, ") 1 Then Print #2, Satz
Wend
Close
Kill "C:\test.xml"
Move "C:\test2.xml", "C:\test.xml"
End Sub
Gruß
Reinhard
Hallo Reinhard,
es hat funktioniert. Danke!
Grüße Albert
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]