XML Deserialization in VB/VBA

[oharab]

I have a set of VBA classes in an MS Access database. I have an xml string with data I want to create new classes with.

Other than setting each property individually, is there an easy way to deserialize the XML into my object?

I've seen the code using the TypeLib library

Public Sub ISerializable_Deserialize(xml As IXMLDOMNode) 
 
  Dim tTLI As TLIApplication 
  Dim tInvoke As InvokeKinds 
  Dim tName As String 
  Dim tMem As MemberInfo 
 
  tInvoke = VbLet 
 
  For Each tMem In TLI.ClassInfoFromObject(Me).Members 
 
     tName = LCase(tMem.Name) 
 
     CallByName Me, tMem.Name, VbLet, xml.Attributes.getNamedItem(tName).Text 
 
  Next tMem 
End Sub

but this doesn't seem to work with the standard class modules. I get a 429 error:

ActiveX Component Cannot Be Created
Can anyone else help me out? I'd rather not have to set each propery by hand if I can help it, some of these classes are huge!


----------------------------------------------
Ben O'Hara

http://www.RobotParade.co.uk

We could be confused in exactly the same way, but confusion might be like Nulls, and not comparable.