userchat.asp

来自「是一相当简单的聊天窒 ,可以简单的聊天,聊天窒,那就下吧」· ASP 代码 · 共 12 行

<%
application.lock
for i=20 to 2 step-1
  j=i-1
   application("msg"&i)=application("msg"&j)
next
chattime="["&time&"]&nbsp;"
chat="<img src='"&session("userimg")&"' width=30 height=30>:<font color='"& session("usercolor")&"'>"&session("username")&"˵:"&request("chatmsg")&chattime&"</font>"
application("msgl")=chat
application.unlock
response.redirect "chatmsg.asp"
%>