chat.asp

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

ASP
32 行
字号 
<%
session("username")=request("username")
session("usercolor")=request("usercolor")
session("userrimg")=request("userrimg")
if session("username")="" then
  response.write "<p>&nbsp;</p><p align=center><font color=red>"
  response.write "Sorry!"&"<font size=5>无名氏</font>"&",不能登录聊天室！"
  response.write "</font></p>"
  response.write "<p align=center><a href='index.htm'>返回登录界面</a></p> "
else
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("userrimg")&"'width=30 height=30>"&":<font color='"& session("usercolor")&"'>"&"各位好!我是"&session("username")&",请多关照！"&chattime&"</font>"
application("msg1")=chat
application.unlock
end if
%>
<html>
<head><title>聊天室</title></head>
<frameset rows="95,*,68" cols="*" framespacing="2" frameborder="yes" border="2" bordercolor="#ff0000">
<frame    src="userxx.asp?logout=no" name="top" frameborder="yes" scrolling="no" noresize bordercolor="#ff0000">
<frameset cols="150,*" framespacing="2" frameborder="yes"  bordercolor="#ff0000">
<frame src="users.asp?username=<%=session("username")%>" name="lmiddle" frameborder="yes" noresize bordercolor="#ff0000">
<frame src="chatmsg.asp" name="rmiddle" frameborder="yes" noresize ordercolor="#ff0000">
</frameset>
<frame src="usermsg.asp" name="bottom" frameborder="yes" scrolling="no" noresize bordercolor="#ff0000">
</frameset>
</html>

chat.asp - 源码说明

本页面展示了「是一相当简单的聊天窒 ,可以简单的聊天,聊天窒,那就下吧」中的 chat.asp 源码文件，采用 ASP 编程语言编写，共 32 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与聊天室相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?