<%@ 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( "

" & strItem ) Next %> All Done!