'ArrayList宣言
Dim ALL As New ArrayList()
Dim ImageMap1 As ImageMap = DirectCast(FormView1.FindControl("ImageMap1"), ImageMap)
ImageMap1.ImageUrl = GetThumbnailPath2(filename2)
'aryFileName.Add(filename2)
Dim testfileName As String = System.IO.Path.GetFileNameWithoutExtension(ImageMap1.ImageUrl)
’存值
ALL.Add(testfileName)
Session.Add("SessionFileName", ALL)
’取值
Dim arySession As New ArrayList
If Session("SessionFileName").GetHashCode <> 0 Then
arySession = Session("SessionFileName")
For i = 0 To arySession.Count
Dim aaa As String = arySession(i).ToString
Next
End If