Deserializing from string

[Chris]

I need to serialise a business object into a session as a string. The reason
for this is that we have to run session state with classic ASP and the code
we use in effect mean ASP.net sessions can only handle strings. My initial
thought is to serialize the object into a string and put it into the session
but I am having problem deserializing it.

Code to serialise
login = New login.clsLogin
Dim objStream As New MemoryStream
Dim objFormatter As New BinaryFormatter

objFormatter.Se rialize(objStre am, login)
Session("login" ) = login

Code to deserialise

Dim objFormatter As New BinaryFormatter
Dim enc As New UTF8Encoding
Dim arrBytData() As Byte = enc.GetBytes(Se ssion("login"). ToString)
Dim ms As MemoryStream = New MemoryStream()
ms.Write(arrByt Data, 0, arrBytData.Leng th)
ms.Seek(0, 0)
login = objFormatter.De serialize(ms)

The error I get is:

End of Stream encountered before parsing was completed.

Can anyone point me in the right direction. Regards, Chris.

[Chris]

Figured it out

Dim MyFormatter As New BinaryFormatter ()
Dim ms As New MemoryStream
MyFormatter.Ser ialize(ms, login)

Dim bytearray As Byte() = ms.ToArray()
Dim str As String = Convert.ToBase6 4String(bytearr ay)
Session("login" ) = str
Dim objFormatter As New BinaryFormatter
Dim GenericObject As Object
Dim arrBytData() As Byte =
Convert.FromBas e64String(Sessi on("login").ToS tring)
Dim ms As MemoryStream = New MemoryStream(ar rBytData)

ms.Write(arrByt Data, 0, arrBytData.Leng th)
ms.Seek(0, SeekOrigin.Begi n)
GenericObject = objFormatter.De serialize(ms)
login = CType(GenericOb ject, login.clsLogin)

"Chris" <no****@nospam. comwrote in message
news:uI******** *****@TK2MSFTNG P06.phx.gbl...

>I need to serialise a business object into a session as a string. The
reason for this is that we have to run session state with classic ASP and
the code we use in effect mean ASP.net sessions can only handle strings. My
initial thought is to serialize the object into a string and put it into
the session but I am having problem deserializing it.

Code to serialise
login = New login.clsLogin
Dim objStream As New MemoryStream
Dim objFormatter As New BinaryFormatter

objFormatter.Se rialize(objStre am, login)
Session("login" ) = login

Code to deserialise

Dim objFormatter As New BinaryFormatter
Dim enc As New UTF8Encoding
Dim arrBytData() As Byte = enc.GetBytes(Se ssion("login"). ToString)
Dim ms As MemoryStream = New MemoryStream()
ms.Write(arrByt Data, 0, arrBytData.Leng th)
ms.Seek(0, 0)
login = objFormatter.De serialize(ms)

The error I get is:

End of Stream encountered before parsing was completed.

Can anyone point me in the right direction. Regards, Chris.

[=?Utf-8?B?UGV0ZXIgQnJvbWJlcmcgW0MjIE1WUF0=?=]

Good, but the line:
ms.Write(arrByt Data, 0, arrBytData.Leng th)
is unncessary, you have alreader wrapped the MemoryStream around the
arrBytData byte array and the data is already there.
Peter

--
Site: http://www.eggheadcafe.com
UnBlog: http://petesbloggerama.blogspot.com
Short urls & more: http://ittyurl.net


"Chris" wrote:

Figured it out

Dim MyFormatter As New BinaryFormatter ()
Dim ms As New MemoryStream
MyFormatter.Ser ialize(ms, login)

Dim bytearray As Byte() = ms.ToArray()
Dim str As String = Convert.ToBase6 4String(bytearr ay)
Session("login" ) = str
Dim objFormatter As New BinaryFormatter
Dim GenericObject As Object
Dim arrBytData() As Byte =
Convert.FromBas e64String(Sessi on("login").ToS tring)
Dim ms As MemoryStream = New MemoryStream(ar rBytData)

ms.Write(arrByt Data, 0, arrBytData.Leng th)
ms.Seek(0, SeekOrigin.Begi n)
GenericObject = objFormatter.De serialize(ms)
login = CType(GenericOb ject, login.clsLogin)

"Chris" <no****@nospam. comwrote in message
news:uI******** *****@TK2MSFTNG P06.phx.gbl...

I need to serialise a business object into a session as a string. The
reason for this is that we have to run session state with classic ASP and
the code we use in effect mean ASP.net sessions can only handle strings. My
initial thought is to serialize the object into a string and put it into
the session but I am having problem deserializing it.

Code to serialise
login = New login.clsLogin
Dim objStream As New MemoryStream
Dim objFormatter As New BinaryFormatter

objFormatter.Se rialize(objStre am, login)
Session("login" ) = login

Code to deserialise

Dim objFormatter As New BinaryFormatter
Dim enc As New UTF8Encoding
Dim arrBytData() As Byte = enc.GetBytes(Se ssion("login"). ToString)
Dim ms As MemoryStream = New MemoryStream()
ms.Write(arrByt Data, 0, arrBytData.Leng th)
ms.Seek(0, 0)
login = objFormatter.De serialize(ms)

The error I get is:

End of Stream encountered before parsing was completed.

Can anyone point me in the right direction. Regards, Chris.