I have an XSL which has a VB script function embedded. I need to tranform an 
XML using MSXML4.0. I am getting "Invalid class string" error. XML, XSL and 
the code is given below. 

XSL->

<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" 
xmlns:xsl="http://www.w3.org/1999/XSL/Transform" 
xmlns:msxsl="urn:schemas-microsoft-com:xslt" 
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:var="urn:var" 
xmlns:user="urn:user" exclude-result-prefixes="msxsl var user xsi">
	<xsl:template match="/Root/Parent">
		<Result>
			<xsl:value-of select="//Data"/>
		</Result>
	</xsl:template>
	<msxsl:script language="VB" implements-prefix="user"><![CDATA[	
	    Function DateToday() As String
			Return Date.Now.ToShortDateString
	    End Function
    ]]></msxsl:script>
</xsl:stylesheet>

XML->
<Root>
	<Parent>
		<Data>DataToBeRetrieved</Data>
	</Parent>
</Root>

C#.Net method being used

		public static string Ex_Transform(XmlDocument oXML, XmlDocument oXSL)
		{
			String sRet = null; 
			try
			{
				MSXML2.DOMDocument40Class oCOMXml = new MSXML2.DOMDocument40Class();
				MSXML2.DOMDocument40Class oCOMXsl = new MSXML2.DOMDocument40Class();
				oCOMXml.load("<XMLPath>");
				oCOMXsl.load("<XSLPath>");
				sRet = oCOMXml.transformNode(oCOMXsl).ToString();
			}
			catch (Exception exception2)
			{
				throw exception2;
			}
			return sRet;
		}
Please help.