ASPวิธี Contents.Remove

Application.Contents.Remove(name|index)

Session.Contents.Remove(name|index)

<%
Application("test1")=("First test")
Application("test2")=("Second test")
Application("test3")=("Third test")

Application.Contents.Remove("test2")

for each x in Application.Contents
  Response.Write(x & "=" & Application.Contents(x) & "<br>")
next
%>

Output:

test1=First test
test3=Third test

<%
Application("test1")=("First test")
Application("test2")=("Second test")
Application("test3")=("Third test")

Application.Contents.Remove(2)

for each x in Application.Contents
  Response.Write(x & "=" & Application.Contents(x) & "<br>")
next
%>

Output:

test1=First test
test3=Third test

<%
Session("test1")=("First test")
Session("test2")=("Second test")
Session("test3")=("Third test")

Session.Contents.Remove("test2")

for each x in Session.Contents
  Response.Write(x & "=" & Session.Contents(x) & "<br>")
next
%>

Output:

test1=First test
test3=Third test

<%
Session("test1")=("First test")
Session("test2")=("Second test")
Session("test3")=("Third test")

Session.Contents.Remove(2)

for each x in Session.Contents
  Response.Write(x & "=" & Session.Contents(x) & "<br>")
next
%>

Output:

test1=First test
test3=Third test