<meta http-equiv="refresh" content="3"><!--设置聊天的自动刷新-->
<%
dim ch,sch,chh,a
chh=application("ch")
sch=int(request.cookies("leilong")("fyamisch"))
if sch<chh then
for a=int(sch+1) to int(chh)
       response.write "<script>parent.chatlist.document.writeln('"&application("message"&a)&"<br>');</script>"
next
elseif sch>chh then
for a=int(sch+1) to 9 
       response.write "<script>parent.chatlist.document.writeln('"&application("message"&a)&"<br>');</script>"
next
for a=1 to int(chh)
       response.write "<script>parent.chatlist.document.writeln('"&application("message"&a)&"<br>');</script>"
next
end if
response.cookies("leilong")("fyamisch")=application("ch")
%>