The following code works fine until I check the .CanDeserialize flag
The exact same code in C# works, but in VB .NET? AUGH! HELP!
----------------------------------
Public Function Create(ByVal theOwner As Object, ByVal theContext As
Object, ByVal theNode As System.Xml.XmlN ode) As Object Implements
System.Configur ation.IConfigur ationSectionHan dler.Create
Dim theNavigator As XPathNavigator, _
theDescriptor As String, _
theType As Type, _
theSerializer As XmlSerializer, _
theReader As XmlNodeReader
'
theNavigator = theNode.CreateN avigator
theDescriptor = CType(theNaviga tor.Evaluate("s tring(@type)"),
String)
theType = theDescriptor.G etType
theSerializer = New XmlSerializer(t heType)
theReader = New XmlNodeReader(t heNode)
If (theSerializer. CanDeserialize( theReader)) Then
Create = theSerializer.D eserialize(theR eader)
End If
Return (Create)
End Function
----------------------------------
Here is the XML Doc...
<?xml version="1.0" encoding="utf-8" ?>
<configuratio n>
<configSections >
<section name="ProgramIn fo"
type="ConfigSec tionHandler.Con figSectionHandl er, ConfigSectionHa ndler"
/>
</configSections>
<ProgramInfo type="ConfigSec tionObjects.Pro gramInfo,
ConfigSectionOb jects">
<Name>ConfigSec tionDemo</Name>
<Language>C#</Language>
<Level>Intermed iate</Level>
</ProgramInfo>
</configuration>
----------------------------------
C# Code...
public object Create(object parent, object configContext,
System.Xml.XmlN ode section)
{
XPathNavigator xNav=section.Cr eateNavigator() ;
string typeOfObject=(s tring) xNav.Evaluate(" string(@type)") ;
Type t=Type.GetType( typeOfObject);
XmlSerializer ser=new XmlSerializer(t );
XmlNodeReader xNodeReader=new XmlNodeReader(s ection);
return ser.Deserialize (xNodeReader);
}
