📄 chat_showex.asp

📁 asp 网站开发技术介绍

💻 ASP

字号:

<%response.expires=0%>
<%response.buffer=true%>
<Html>
<Head><Title>处理聊天信息</Title>
<Meta http-equiv = "Content-Type" Content = "text/html; charset = gb2312">
<Meta name = "Keywords" content = "ljy">
</Head>
<Body >
 <script Language="VBScript" runat="server">
 mywords=trim(request.form("mywords"))
saytoname=request.form("saytoname")
expression=request.form("expression")
if expression="说话" then
 expression=""
end if
str="<p>"
str="("&time&")"
str=str &session("chat_name")
str=str &"<i>"&expression&"对"
str=str& "<font color=#2000aa>"&saytoname&"</font> 说</i>:"
str=str&mywords
str=str&"</p>"
application.lock
application("chat_words")=str &application("chat_words")
application.unlock
response.redirect "chat_input.asp"
</script>
</Body>
</Html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -