Still Problems Serializing Arrays

[Wayne Wengert]

I am still stuck trying to create a Class to use for exporting and importing
array data to/from XML. The format of the XML that I want to import/export
is shown below as is the Class and the code I am using to create a sample
XML file. I am trying to dimension the ArrayOfJudgeEnt ity to have two sets
of the JudgeTableEntit y values. When I run the code I get an error that the
XML is not correct.

I jsut can't get my head around the array serialization.

Any help is much appreciated

Wayne

=============== ==== Desired XML ==============
<?xml version="1.0" encoding="utf-8"?>
<ArrayOfJudgeTa bleEntity xmlns:xsd="http ://www.w3.org/2001/XMLSchema"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance">
<JudgeTableEnti ty>
<JudgeId>633719 91-cdf9-4cc5-99c1-a42c599498f8</JudgeId>
<JudgeFirstName >Kristen</JudgeFirstName>
<JudgeLastName> O'Melia</JudgeLastName>
<JudgeType>Equi pment</JudgeType>
</JudgeTableEntit y>
<JudgeTableEnti ty>
<JudgeId>ce2c0c 6e-4094-43da-9d8c-9726d81b017e</JudgeId>
<JudgeFirstName >Smith</JudgeFirstName>
<JudgeLastName> Dan</JudgeLastName>
<JudgeType>Move ment</JudgeType>
</JudgeTableEntit y>
</ArrayOfJudgeTab leEntity>

============= Class Definition =============
Public Class ArrayOfJudgeTab leEntity
'<XmlArray("Jud geTableEntity") , XmlArrayItem("J udgeTableEntity ",
IsNullable:=Tru e)> Public JudgeTableEntit yX() As JudgeTableEntit y
<XmlElement("Ju dgeTableEntity" , IsNullable:=Tru e)> Public
JudgeTableEntit y()
Public Sub New()
End Sub
Public Sub New(ByVal j As Integer)
ReDim Preserve JudgeTableEntit y(j)
End Sub 'New
End Class
Public Class JudgeTableEntit y
<XmlElement("Ju dgeID")> Public JudgeID As String
<XmlElement("Ju dgeFirstName")> Public JudgeFirstName As String
<XmlElement("Ju dgeLastName")> Public JudgeLastName As String
<XmlElement("Ju dgeType")> Public JudgeType As String
Public Sub New()
End Sub 'New
Public Sub New(ByVal id As String, ByVal fn As String, ByVal ln As
String, ByVal type As String)
JudgeID = id
JudgeType = type
JudgeFirstName = fn
JudgeLastName = ln
End Sub
End Class

=============== = Code to Build Sample Output =============== ==
Dim Judge1 As New JudgeTableEntit y("ID1", "Shirlee", "Whitcomb", "GE")
Dim Judge2 As New JudgeTableEntit y("ID2", "Joe", "Courtney", "TaP")
Dim array2 As New ArrayOfJudgeTab leEntity(1)
array2.JudgeTab leEntity(0) = Judge1
array2.JudgeTab leEntity(1) = Judge2
Dim ser As New XmlSerializer(G etType(ArrayOfJ udgeTableEntity ))
AddHandler ser.UnknownNode , AddressOf serializer_Unkn ownNode
AddHandler ser.UnknownElem ent, AddressOf serializer_Unkn ownElement
Dim writer As New XmlTextWriter(" c:\Temp\judgest est.xml",
System.Text.Enc oding.UTF8)
' write a human readable file
writer.Formatti ng = Formatting.Inde nted
Try
ser.Serialize(w riter, array2)
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Cri tical, "Error")
'End
End Try
writer.Close()

[Christoph Schittko [MVP]]

Wayne,

I took your sample XML, inferred a schema with xsd.exe, which ships as part
of the .NET framework, and generated classes that can deserialize XML that
conforms to the schema ... see code below.

There are other tools to infer schemas and create .NET classes for
serialization as well. Take a look at the XML tools page on gotdotnet for the
links.

Each tool as their strengths and weaknesses, but they may get you started in
the right direction.
You're issue right now seems to be that you are trying to deserialize an
array of ArrayOfJudgeTab leEntities. Does the XML you are trying to
deserialize contain a root element for the ArrayOfJudgeTab leEntities items or
are you reading a continuous stream to ArrayOfJudgeTab leEntities elements,
which would be an XML document fragment, not a well formed document.

HTH,
Christoph Schittko
MVP XML
http://weblogs.asp.net/cschittko
//------------------------------------------------------------------------------
// <autogenerate d>
// This code was generated by a tool.
// Runtime Version: 1.1.4322.573
//
// Changes to this file may cause incorrect behavior and will be lost if
// the code is regenerated.
// </autogenerated>
//------------------------------------------------------------------------------

//
// This source code was auto-generated by xsd, Version=1.1.432 2.573.
//
using System.Xml.Seri alization;
/// <remarks/>
[System.Xml.Seri alization.XmlRo otAttribute(Nam espace="", IsNullable=fals e)]
public class ArrayOfJudgeTab leEntity {

/// <remarks/>
[System.Xml.Seri alization.XmlEl ementAttribute( "JudgeTableEnti ty",
Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public ArrayOfJudgeTab leEntityJudgeTa bleEntity[] Items;
}

/// <remarks/>
public class ArrayOfJudgeTab leEntityJudgeTa bleEntity {

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public string JudgeId;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public string JudgeFirstName;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public string JudgeLastName;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public string JudgeType;
}

"Wayne Wengert" wrote:

I am still stuck trying to create a Class to use for exporting and importing
array data to/from XML. The format of the XML that I want to import/export
is shown below as is the Class and the code I am using to create a sample
XML file. I am trying to dimension the ArrayOfJudgeEnt ity to have two sets
of the JudgeTableEntit y values. When I run the code I get an error that the
XML is not correct.

I jsut can't get my head around the array serialization.

Any help is much appreciated

Wayne

=============== ==== Desired XML ==============
<?xml version="1.0" encoding="utf-8"?>
<ArrayOfJudgeTa bleEntity xmlns:xsd="http ://www.w3.org/2001/XMLSchema"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance">
<JudgeTableEnti ty>
<JudgeId>633719 91-cdf9-4cc5-99c1-a42c599498f8</JudgeId>
<JudgeFirstName >Kristen</JudgeFirstName>
<JudgeLastName> O'Melia</JudgeLastName>
<JudgeType>Equi pment</JudgeType>
</JudgeTableEntit y>
<JudgeTableEnti ty>
<JudgeId>ce2c0c 6e-4094-43da-9d8c-9726d81b017e</JudgeId>
<JudgeFirstName >Smith</JudgeFirstName>
<JudgeLastName> Dan</JudgeLastName>
<JudgeType>Move ment</JudgeType>
</JudgeTableEntit y>
</ArrayOfJudgeTab leEntity>

============= Class Definition =============
Public Class ArrayOfJudgeTab leEntity
'<XmlArray("Jud geTableEntity") , XmlArrayItem("J udgeTableEntity ",
IsNullable:=Tru e)> Public JudgeTableEntit yX() As JudgeTableEntit y
<XmlElement("Ju dgeTableEntity" , IsNullable:=Tru e)> Public
JudgeTableEntit y()
Public Sub New()
End Sub
Public Sub New(ByVal j As Integer)
ReDim Preserve JudgeTableEntit y(j)
End Sub 'New
End Class
Public Class JudgeTableEntit y
<XmlElement("Ju dgeID")> Public JudgeID As String
<XmlElement("Ju dgeFirstName")> Public JudgeFirstName As String
<XmlElement("Ju dgeLastName")> Public JudgeLastName As String
<XmlElement("Ju dgeType")> Public JudgeType As String
Public Sub New()
End Sub 'New
Public Sub New(ByVal id As String, ByVal fn As String, ByVal ln As
String, ByVal type As String)
JudgeID = id
JudgeType = type
JudgeFirstName = fn
JudgeLastName = ln
End Sub
End Class

=============== = Code to Build Sample Output =============== ==
Dim Judge1 As New JudgeTableEntit y("ID1", "Shirlee", "Whitcomb", "GE")
Dim Judge2 As New JudgeTableEntit y("ID2", "Joe", "Courtney", "TaP")
Dim array2 As New ArrayOfJudgeTab leEntity(1)
array2.JudgeTab leEntity(0) = Judge1
array2.JudgeTab leEntity(1) = Judge2
Dim ser As New XmlSerializer(G etType(ArrayOfJ udgeTableEntity ))
AddHandler ser.UnknownNode , AddressOf serializer_Unkn ownNode
AddHandler ser.UnknownElem ent, AddressOf serializer_Unkn ownElement
Dim writer As New XmlTextWriter(" c:\Temp\judgest est.xml",
System.Text.Enc oding.UTF8)
' write a human readable file
writer.Formatti ng = Formatting.Inde nted
Try
ser.Serialize(w riter, array2)
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Cri tical, "Error")
'End
End Try
writer.Close()

[Wayne Wengert]

Christoph;

Thanks for the response. You are right that I need to learn more about the
available tools. I'll check out that link and review your suggestions.

The ArrayOfJudgeTab leEntities is the root element (occurs only once). There
are many JudgeTableEntit y sets within that root.

Wayne
"Christoph Schittko [MVP]" <Christoph Schittko
[MVP]@discussions.mi crosoft.com> wrote in message
news:03******** *************** ***********@mic rosoft.com...

Wayne,

I took your sample XML, inferred a schema with xsd.exe, which ships as part of the .NET framework, and generated classes that can deserialize XML that
conforms to the schema ... see code below.

There are other tools to infer schemas and create .NET classes for
serialization as well. Take a look at the XML tools page on gotdotnet for the links.

Each tool as their strengths and weaknesses, but they may get you started in the right direction.
You're issue right now seems to be that you are trying to deserialize an
array of ArrayOfJudgeTab leEntities. Does the XML you are trying to
deserialize contain a root element for the ArrayOfJudgeTab leEntities items or are you reading a continuous stream to ArrayOfJudgeTab leEntities elements,
which would be an XML document fragment, not a well formed document.

HTH,
Christoph Schittko
MVP XML
http://weblogs.asp.net/cschittko
//--------------------------------------------------------------------------
---- // <autogenerate d>
// This code was generated by a tool.
// Runtime Version: 1.1.4322.573
//
// Changes to this file may cause incorrect behavior and will be lost if // the code is regenerated.
// </autogenerated>
//--------------------------------------------------------------------------
----
//
// This source code was auto-generated by xsd, Version=1.1.432 2.573.
//
using System.Xml.Seri alization;
/// <remarks/>
[System.Xml.Seri alization.XmlRo otAttribute(Nam espace="", IsNullable=fals e)] public class ArrayOfJudgeTab leEntity {

/// <remarks/>
[System.Xml.Seri alization.XmlEl ementAttribute( "JudgeTableEnti ty",
Form=System.Xml .Schema.XmlSche maForm.Unqualif ied)]
public ArrayOfJudgeTab leEntityJudgeTa bleEntity[] Items;
}

/// <remarks/>
public class ArrayOfJudgeTab leEntityJudgeTa bleEntity {

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche
maForm.Unqualif ied)] public string JudgeId;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche
maForm.Unqualif ied)] public string JudgeFirstName;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche
maForm.Unqualif ied)] public string JudgeLastName;

/// <remarks/>

[System.Xml.Seri alization.XmlEl ementAttribute( Form=System.Xml .Schema.XmlSche
maForm.Unqualif ied)] public string JudgeType;
}

"Wayne Wengert" wrote:

I am still stuck trying to create a Class to use for exporting and importing array data to/from XML. The format of the XML that I want to import/export is shown below as is the Class and the code I am using to create a sample XML file. I am trying to dimension the ArrayOfJudgeEnt ity to have two sets of the JudgeTableEntit y values. When I run the code I get an error that the XML is not correct.

I jsut can't get my head around the array serialization.

Any help is much appreciated

Wayne

=============== ==== Desired XML ==============
<?xml version="1.0" encoding="utf-8"?>
<ArrayOfJudgeTa bleEntity xmlns:xsd="http ://www.w3.org/2001/XMLSchema"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance">
<JudgeTableEnti ty>
<JudgeId>633719 91-cdf9-4cc5-99c1-a42c599498f8</JudgeId>
<JudgeFirstName >Kristen</JudgeFirstName>
<JudgeLastName> O'Melia</JudgeLastName>
<JudgeType>Equi pment</JudgeType>
</JudgeTableEntit y>
<JudgeTableEnti ty>
<JudgeId>ce2c0c 6e-4094-43da-9d8c-9726d81b017e</JudgeId>
<JudgeFirstName >Smith</JudgeFirstName>
<JudgeLastName> Dan</JudgeLastName>
<JudgeType>Move ment</JudgeType>
</JudgeTableEntit y>
</ArrayOfJudgeTab leEntity>

============= Class Definition =============
Public Class ArrayOfJudgeTab leEntity
'<XmlArray("Jud geTableEntity") , XmlArrayItem("J udgeTableEntity ",
IsNullable:=Tru e)> Public JudgeTableEntit yX() As JudgeTableEntit y
<XmlElement("Ju dgeTableEntity" , IsNullable:=Tru e)> Public
JudgeTableEntit y()
Public Sub New()
End Sub
Public Sub New(ByVal j As Integer)
ReDim Preserve JudgeTableEntit y(j)
End Sub 'New
End Class
Public Class JudgeTableEntit y
<XmlElement("Ju dgeID")> Public JudgeID As String
<XmlElement("Ju dgeFirstName")> Public JudgeFirstName As String
<XmlElement("Ju dgeLastName")> Public JudgeLastName As String
<XmlElement("Ju dgeType")> Public JudgeType As String
Public Sub New()
End Sub 'New
Public Sub New(ByVal id As String, ByVal fn As String, ByVal ln As
String, ByVal type As String)
JudgeID = id
JudgeType = type
JudgeFirstName = fn
JudgeLastName = ln
End Sub
End Class

=============== = Code to Build Sample Output =============== ==
Dim Judge1 As New JudgeTableEntit y("ID1", "Shirlee", "Whitcomb", "GE")
Dim Judge2 As New JudgeTableEntit y("ID2", "Joe", "Courtney", "TaP") Dim array2 As New ArrayOfJudgeTab leEntity(1)
array2.JudgeTab leEntity(0) = Judge1
array2.JudgeTab leEntity(1) = Judge2
Dim ser As New XmlSerializer(G etType(ArrayOfJ udgeTableEntity ))
AddHandler ser.UnknownNode , AddressOf serializer_Unkn ownNode
AddHandler ser.UnknownElem ent, AddressOf serializer_Unkn ownElement Dim writer As New XmlTextWriter(" c:\Temp\judgest est.xml",
System.Text.Enc oding.UTF8)
' write a human readable file
writer.Formatti ng = Formatting.Inde nted
Try
ser.Serialize(w riter, array2)
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Cri tical, "Error")
'End
End Try
writer.Close()

[Christoph Schittko [MVP]]

Wayne,

In general, you should always be able to deserialize XML written with
the XmlSerializer into instances of the same classes you used to
serialize.
Did you get it to work or do you still have problems? On a side note,
I'm not a VB expert, but does your code compile with Option Strict on?

HTH,
Christoph Schittko
MVP XML
http://weblogs.asp.net/cschittko

-----Original Message-----
From: Wayne Wengert [mailto:wa****** *********@wenge rt.com]
Posted At: Friday, January 28, 2005 8:41 AM
Posted To: microsoft.publi c.dotnet.xml
Conversation: Still Problems Serializing Arrays
Subject: Still Problems Serializing Arrays

I am still stuck trying to create a Class to use for exporting and
importing
array data to/from XML. The format of the XML that I want to import/export is shown below as is the Class and the code I am using to create a sample XML file. I am trying to dimension the ArrayOfJudgeEnt ity to have two sets of the JudgeTableEntit y values. When I run the code I get an error that the
XML is not correct.

I jsut can't get my head around the array serialization.

Any help is much appreciated

Wayne

=============== ==== Desired XML ==============
<?xml version="1.0" encoding="utf-8"?>
<ArrayOfJudgeTa bleEntity xmlns:xsd="http ://www.w3.org/2001/XMLSchema"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance">
<JudgeTableEnti ty>
<JudgeId>633719 91-cdf9-4cc5-99c1-a42c599498f8</JudgeId>
<JudgeFirstName >Kristen</JudgeFirstName>
<JudgeLastName> O'Melia</JudgeLastName>
<JudgeType>Equi pment</JudgeType>
</JudgeTableEntit y>
<JudgeTableEnti ty>
<JudgeId>ce2c0c 6e-4094-43da-9d8c-9726d81b017e</JudgeId>
<JudgeFirstName >Smith</JudgeFirstName>
<JudgeLastName> Dan</JudgeLastName>
<JudgeType>Move ment</JudgeType>
</JudgeTableEntit y>
</ArrayOfJudgeTab leEntity>

============= Class Definition =============
Public Class ArrayOfJudgeTab leEntity
'<XmlArray("Jud geTableEntity") , XmlArrayItem("J udgeTableEntity ",
IsNullable:=Tru e)> Public JudgeTableEntit yX() As JudgeTableEntit y
<XmlElement("Ju dgeTableEntity" , IsNullable:=Tru e)> Public
JudgeTableEntit y()
Public Sub New()
End Sub
Public Sub New(ByVal j As Integer)
ReDim Preserve JudgeTableEntit y(j)
End Sub 'New
End Class
Public Class JudgeTableEntit y
<XmlElement("Ju dgeID")> Public JudgeID As String
<XmlElement("Ju dgeFirstName")> Public JudgeFirstName As String
<XmlElement("Ju dgeLastName")> Public JudgeLastName As String
<XmlElement("Ju dgeType")> Public JudgeType As String
Public Sub New()
End Sub 'New
Public Sub New(ByVal id As String, ByVal fn As String, ByVal ln As
String, ByVal type As String)
JudgeID = id
JudgeType = type
JudgeFirstName = fn
JudgeLastName = ln
End Sub
End Class

=============== = Code to Build Sample Output =============== ==
Dim Judge1 As New JudgeTableEntit y("ID1", "Shirlee", "Whitcomb", "GE")
Dim Judge2 As New JudgeTableEntit y("ID2", "Joe", "Courtney",
"TaP")
Dim array2 As New ArrayOfJudgeTab leEntity(1)
array2.JudgeTab leEntity(0) = Judge1
array2.JudgeTab leEntity(1) = Judge2
Dim ser As New XmlSerializer(G etType(ArrayOfJ udgeTableEntity ))
AddHandler ser.UnknownNode , AddressOf serializer_Unkn ownNode
AddHandler ser.UnknownElem ent, AddressOf serializer_Unkn ownElement Dim writer As New XmlTextWriter(" c:\Temp\judgest est.xml",
System.Text.Enc oding.UTF8)
' write a human readable file
writer.Formatti ng = Formatting.Inde nted
Try
ser.Serialize(w riter, array2)
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Cri tical, "Error")
'End
End Try
writer.Close()

[Wayne Wengert]

Christoph;

Not working yet - I have another crisis that is taking most of my time for
the next day or so. Yes, Option Strict is on.

Thanks for the continued help!

Wayne

"Christoph Schittko [MVP]" <IN**********@a ustin.rr.com> wrote in message
news:u0******** *****@TK2MSFTNG P14.phx.gbl...

Wayne,

In general, you should always be able to deserialize XML written with
the XmlSerializer into instances of the same classes you used to
serialize.
Did you get it to work or do you still have problems? On a side note,
I'm not a VB expert, but does your code compile with Option Strict on?

HTH,
Christoph Schittko
MVP XML
http://weblogs.asp.net/cschittko

-----Original Message-----
From: Wayne Wengert [mailto:wa****** *********@wenge rt.com]
Posted At: Friday, January 28, 2005 8:41 AM
Posted To: microsoft.publi c.dotnet.xml
Conversation: Still Problems Serializing Arrays
Subject: Still Problems Serializing Arrays

I am still stuck trying to create a Class to use for exporting and
importing
array data to/from XML. The format of the XML that I want to

import/export

is shown below as is the Class and the code I am using to create a

sample

XML file. I am trying to dimension the ArrayOfJudgeEnt ity to have two

sets

of the JudgeTableEntit y values. When I run the code I get an error

that

the
XML is not correct.

I jsut can't get my head around the array serialization.

Any help is much appreciated

Wayne

=============== ==== Desired XML ==============
<?xml version="1.0" encoding="utf-8"?>
<ArrayOfJudgeTa bleEntity xmlns:xsd="http ://www.w3.org/2001/XMLSchema"
xmlns:xsi="http ://www.w3.org/2001/XMLSchema-instance">
<JudgeTableEnti ty>
<JudgeId>633719 91-cdf9-4cc5-99c1-a42c599498f8</JudgeId>
<JudgeFirstName >Kristen</JudgeFirstName>
<JudgeLastName> O'Melia</JudgeLastName>
<JudgeType>Equi pment</JudgeType>
</JudgeTableEntit y>
<JudgeTableEnti ty>
<JudgeId>ce2c0c 6e-4094-43da-9d8c-9726d81b017e</JudgeId>
<JudgeFirstName >Smith</JudgeFirstName>
<JudgeLastName> Dan</JudgeLastName>
<JudgeType>Move ment</JudgeType>
</JudgeTableEntit y>
</ArrayOfJudgeTab leEntity>

============= Class Definition =============
Public Class ArrayOfJudgeTab leEntity
'<XmlArray("Jud geTableEntity") , XmlArrayItem("J udgeTableEntity ",
IsNullable:=Tru e)> Public JudgeTableEntit yX() As JudgeTableEntit y
<XmlElement("Ju dgeTableEntity" , IsNullable:=Tru e)> Public
JudgeTableEntit y()
Public Sub New()
End Sub
Public Sub New(ByVal j As Integer)
ReDim Preserve JudgeTableEntit y(j)
End Sub 'New
End Class
Public Class JudgeTableEntit y
<XmlElement("Ju dgeID")> Public JudgeID As String
<XmlElement("Ju dgeFirstName")> Public JudgeFirstName As String
<XmlElement("Ju dgeLastName")> Public JudgeLastName As String
<XmlElement("Ju dgeType")> Public JudgeType As String
Public Sub New()
End Sub 'New
Public Sub New(ByVal id As String, ByVal fn As String, ByVal ln As
String, ByVal type As String)
JudgeID = id
JudgeType = type
JudgeFirstName = fn
JudgeLastName = ln
End Sub
End Class

=============== = Code to Build Sample Output =============== ==
Dim Judge1 As New JudgeTableEntit y("ID1", "Shirlee", "Whitcomb", "GE")
Dim Judge2 As New JudgeTableEntit y("ID2", "Joe", "Courtney",
"TaP")
Dim array2 As New ArrayOfJudgeTab leEntity(1)
array2.JudgeTab leEntity(0) = Judge1
array2.JudgeTab leEntity(1) = Judge2
Dim ser As New XmlSerializer(G etType(ArrayOfJ udgeTableEntity ))
AddHandler ser.UnknownNode , AddressOf serializer_Unkn ownNode
AddHandler ser.UnknownElem ent, AddressOf

serializer_Unkn ownElement

Dim writer As New XmlTextWriter(" c:\Temp\judgest est.xml",
System.Text.Enc oding.UTF8)
' write a human readable file
writer.Formatti ng = Formatting.Inde nted
Try
ser.Serialize(w riter, array2)
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Cri tical, "Error")
'End
End Try
writer.Close()