Web| Program | page
<title> Send Information page </title>
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
<%if request ("text") = "" Then%>
<body bgcolor= "#FFFFFF" text= "#000000" >
Sent to: <select size= "1" name= "name" >
<%for I=1 to 30
If Application ("towho" &i) =session ("user") then
A=application ("from" &i)%>
<option checked><%=a%></option>
<%else If Application ("User" &i) <>a then%>
<option><%=application ("user" &i)%></option>
<%end if
End If
Next%>
</select>
<br>
Content: <textarea rows= "2" name= "text" cols= "></textarea>"
</body><%else
For I=1 to 30
If Application ("towho" &i) = "" Then
Application ("towho" &i) =request ("name")
Application ("from" &i) =session ("user")
Application ("text" &i) =request ("text")
End If
If Application ("towho" &i) =session ("user") then
Application ("towho" &i) = ""
Application ("text" &i) = ""
Application ("from" &i) = ""
End If
Next
End If%>