关于一个聊天框架的实现问题?
< %
name=request.form("name")
same_flag=false
if not isarray(application("userlist")) then
dim u()
redim u(0)
u(0)="大家"
application.lock
application("userlist")=u
application.unlock
else
user=applicatiopn("userlist")
for i=0 to ubound(user)
if user(i)=name then
same_flag=true
end if
next
end if
if trim(name)="" or same_flag then
response.redirect"log.asp"
else
user1=application("userlist")
n=ubound(user1)
redim preserve user(n+1)
user(n+1)=name
application.lock
application("userlist")=user1
application.unlock
end if
%>
<html>
<frameset row="*, 100">
<frameset cols="*,150">
<frame src="message.asp" name="message">
<frame src="userlist.asp" name="user">
</frameset>
<frame src="say.asp? name=< % =name %>" name="say">
</frameset>
</html>
各位高手,这是我做的一个聊天的框架,不能实现,请问是什么问题啊?