Schemerige xmlDoc als Nieuwe XmlDocument
xmlDoc.Load (Application.StartupPath & „\ DespatchPrintingConfiguration.xml“)
'klassen veranderlijke montages
_cleanupFiles = xmlDoc.SelectSingleNode („Config/Misc/CleanUpHTML“) .InnerText
'krijg oude HTML- dossiers
Voor Elke hNode als XmlNode in xmlDoc.SelectNodes („Config/Misc/ArchivedHTMLFiles/FileName“)
Schemerig dossier als Nieuwe FileInfo (Application.StartupPath & „/“ & hNode.InnerXml)
Als dossier. Bestaat dan
'dossier. Schrap ()
Beëindig als
Daarna
Voor Elke hNode als XmlNode in xmlDoc.SelectNodes („Config/Misc/ArchivedHTMLFiles“)
hNode.RemoveAll ()
Daarna
xmlDoc.Save („c:\temp\1.xml“)
|