⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 chat_input.asp

📁 asp 网站开发技术介绍
💻 ASP
字号:
<%response.expires=0%>
<Html>
<Head><Title>输入聊天话语</Title>
<Meta http-equiv = "Content-Type" Content = "text/html; charset = gb2312">
<Meta name = "Keywords" content = "ljy">
</Head>
<Body bgcolor=#9999ff>
 <%chater=session("chat_name")%>
<form action=chat_showex.asp method=post onsubmit="online()">
  <table border=0 cellapacing=0 align=center>
  <tr>
<td>聊友<%=chater%>
<select name=expression>
<option selected value="说话">说话 </option>
<option  value="悄悄的">悄悄的 </option>
<option  value="微笑着">微笑着 </option>
<option  value="伤感的">伤感的 </option>
</select>对<select name=saytoname>
<option selected value="所有人">所有人</option>
<%=application("chat_list")%>
</select> 说
<tr><td>内容
<input name=mywords size=30>
<input type=submit value=发送  >
</table>
</form>
<form action=chat_quit.asp method=post onsubmit="offline()">
<p align=center>
<input type=submit value="离开" >
<input type=button value="刷新" onclick=refresh()>
</form>
<script Language="VBScript">
sub refresh()
 document.url="chat_input.asp"
end sub
sub online()
   parent.document.url="chat_main.asp"
end sub
sub offline()
   parent.document.url="chat_main.asp"
end sub
</script>
</Body>
</Html>

⌨️ 快捷键说明

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