To decrypt an XML file encrypted using XML-ENC standard (http://www.w3.org/TR/xmlenc-core), follow these steps:
' Create CreaSignClientIE Set cs=CreateObject("CreaSignClientIE.CreaSign") ' Load a sample xml from file Set doc=CreateObject("CreaSignClientIE.Data") doc.load "files\encrypted.xml" Set resultData = cs.Decrypt(doc) ' Save the result to a file saveTo="files\decrypted.xml" resultData.save saveTo WScript.Echo "Encrypted file saved to: " & saveTo
(c) CREA 2002-2007 www.creasign.si