LosFormatter (VB) : LosFormatter « Development « ASP.NET Tutorial






<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>

File: Default.aspx.vb

Imports System.IO

Partial Class _Default
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        ViewState("example") = 5

        Dim serializedExample As String = LosSerializeObject(5)
        Response.Write(serializedExample)
        Response.Write("<br />")

        Dim example As Integer = CType(RetrieveObjectFromViewState(serializedExample), Integer)
        Response.Write(example)
    End Sub

    Function LosSerializeObject(ByVal obj As Object) As String
        Dim los As System.Web.UI.LosFormatter = New System.Web.UI.LosFormatter
        Dim writer As StringWriter = New StringWriter
        los.Serialize(writer, obj)
        Return writer.ToString
    End Function

    Function RetrieveObjectFromViewState(ByVal serializedObject As String) As Object
        Dim los As System.Web.UI.LosFormatter = New System.Web.UI.LosFormatter
        Return los.Deserialize(serializedObject)
    End Function

End Class








9.33.LosFormatter
9.33.1.LosFormatter (C#)
9.33.2.LosFormatter (VB)