我自己写的聊天室源代码(二)

80酷酷网    80kuku.com

  聊天室|源代码<%'初始登录页,default.asp%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>登录聊天室</title>
<script language="JavaScript"><!--
function windowload()
{
document.forms[0].T1.focus();
}
function testvalue(tt1)
{
var val;
val = "";
if (tt1 == 1)
    {val = document.forms[0].T1.value;}
if (tt1 == 2)
    {val = document.forms[0].T3.value;}
return val
}
function msg(tt)
{
alert(tt);
}
function formsubmit()
{
document.forms[0].submit();
}
// --></script>
<script language="VBScript"><!--
function allpass()
    dim sc_message,sc_ss,sc_flag
    sc_ss = testvalue(1)
    sc_flag = 0
    if trim(sc_ss) = "" then
        sc_flag = 1
        sc_message = "必须输入用户名!"
    else
        sc_ss = testvalue(2)
        if trim(sc_ss) = "" then
            sc_flag = 1
            sc_message = "必须输入口令!"
        end if
    end if
    if sc_flag = 0 then
        formsubmit()
    else
        msg(sc_message)
        windowload()
    end if
end function
--></script>

<meta name="Microsoft Border" content="none">
</head>

<body background="images/bg03.gif" language="javascript" onload="windowload();">

<form method="POST" action="chatadmin.asp">
  <table border="0" width="100%" cellspacing="0">
    <tr>
      <td width="100%" colspan="4"><div align="center"><center><p><!--webbot bot="ImageMap"
      rectangle="(347,104) (390, 122)  deleteuser.asp##_blank"
      rectangle="(302,105) (344, 122)  updateuser.asp##_blank"
      rectangle="(254,105) (296, 122)  insertuser.asp##_blank" src=http://www.163design.net/a/y/"images/title.gif" border="0"
      width="432" height="159" --></td>
    </tr>
    <tr align="center">
      <td width="50%" colspan="2"><div align="right"><p>您的昵称:</td>
      <td width="50%" colspan="2"><div align="left"><p><input type="text" name="T1" size="15"></td>
    </tr>
    <tr align="center">
      <td width="50%" colspan="2"><div align="right"><p>您的口令:</td>
      <td width="50%" colspan="2"><div align="left"><p><input type="password" name="T3"
      size="15"></td>
    </tr>
    <tr align="center">
      <td width="25%" align="center"><input type="radio" value=http://www.163design.net/a/y/"images/mood12.gif" checked
      name="R1"><img src=http://www.163design.net/a/y/"images/mood12.gif" WIDTH="20" HEIGHT="20"></td>
     &nb

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: