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

📄 webicqshow.asp

📁 此程序为网上下载
💻 ASP
字号:
<%@ codepage ="936" %>
<%Response.Expires=0
useronlinename=Application("wsaxhxf_c_useronlinename")
nickname=Session("hxf_u_nickname")
if nickname="" or Session("hxf_u_inthechat")<>"1" or Instr(useronlinename," "&nickname&" ")=0 then Response.Redirect "chaterr.asp?id=001"
who=Trim(Request.QueryString("who"))
if who="" then who=nickname
id = Trim(Request.QueryString("id"))
show=Split(Trim(useronlinename)," ",-1)
x=UBound(show)%>
<html>
<head>
<title>Web ICQ <%=Application("wsaxhxf_c_chatroomname")%></title>
<style type=text/css>
body{font-family:宋体;font-size:9pt;background-color:buttonface;border-bottom:medium none;border-left:medium none;border-right:medium none;border-top:medium none;padding-bottom:0px;padding-left:0px;padding-right:0px;padding-top:0px}input{font-family:'宋体';font-size:9pt}
<script language=javascript>
var automanname = "<%=Application("wsaxhxf_c_automanname")%>";
var myn = "<%=nickname%>";
var tow = "<%=id%>";
var cahb = <%=Application("wsaxhxf_c_call")%>;
function sip(){return cahb}
function amn(){return automanname}
function rn(){return myn}
function tw(){return tow}
</script>
</style>
</head>
<body leftMargin=5 topMargin=5 marginheight=0 marginwidth=0>
<table align=center>
<tr>
<td align=center>
<iframe name=rmsg src=webicqread.asp frameborder=1 scrolling=auto height=168 width=380></iframe>
</td>
</tr>
<tr>
<form name=rmsg>
<td align=center>
<input type=button name=bbz value='帮助(H)' accesskey='h' onclick=rmsg.location.href='webicqhelp.asp' style='font-size:9pt;background-color;color:000000;border: 1 double'>
 <input type=button name=bfs value='发送(S)' accesskey='s' disabled onclick=if(rmsg.check()){rmsg.document.send.submit()} style='font-size:9pt;background-color;color:000000;border: 1 double'>
 <input type=button name=bsx value='查看(V)' accesskey='v' onclick=rmsg.location.href='webicqlistok.asp' style='font-size:9pt;background-color;color:000000;border: 1 double'>
 <input type=button name=submit value='回复(R)' accesskey='r' onclick=location.href='webicq.asp' style='font-size:9pt;background-color;color:000000;border: 1 double'>
 <input type=button name=btc value='关闭(Q)' accesskey='q' onClick="top.window.close();" style='font-size:9pt;background-color;color:000000;border: 1 double'> 
</td>
</form>
</tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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