deserializearraylist.aspx

来自「asp.net技术内幕的书配源码」· ASPX 代码 · 共 21 行

<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Runtime.Serialization.Formatters.Binary" %>

<%
Dim colArrayList As ArrayList
Dim objFileStream As FileStream
Dim objBinaryFormatter As BinaryFormatter
Dim strItem As String

objFileStream = New FileStream( MapPath( "myArrayList.data" ), FileMode.Open )
objBinaryFormatter = New BinaryFormatter
colArrayList = CType( objBinaryFormatter.Deserialize( objFileStream ), ArrayList )
objFileStream.Close()

For Each strItem In colArrayList
  Response.Write( "<li>" & strItem )
Next

%> 
All Done!