📄 chat2.txt

📁 用纯ＡＳＰ代码实现图片上传并存入数据库中
💻 TXT
字号:

请支持我们站点以网养网，点击我们的广告，谢谢大家！  


我自己写的聊天室源代码（二）    


--------------------------------------------------------------------------------

 【1_apple】 于 00-4-28 14:38:44 加贴在 Joy ASP ↑：

<%'初始登录页,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="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="images/mood12.gif" checked
      name="R1"><img src="images/mood12.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood13.gif"><img
      src="images/mood13.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood14.gif"><img
      src="images/mood14.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood15.gif"><img
      src="images/mood15.gif" WIDTH="20" HEIGHT="20"></td>
    </tr>
    <tr align="center">
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood16.gif"><img
      src="images/mood16.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood17.gif"><img
      src="images/mood17.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood18.gif"><img
      src="images/mood18.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood19.gif"><img
      src="images/mood19.gif" WIDTH="20" HEIGHT="20"></td>
    </tr>
    <tr align="center">
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood20.gif"><img
      src="images/mood20.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood21.gif"><img
      src="images/mood21.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood22.gif"><img
      src="images/mood22.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood23.gif"><img
      src="images/mood23.gif" WIDTH="20" HEIGHT="20"></td>
    </tr>
    <tr align="center">
      <td width="25%" align="center"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood24.gif"><img
      src="images/mood24.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"><input type="radio" name="R1" value="images/mood25.gif"><img
      src="images/mood25.gif" WIDTH="20" HEIGHT="20"></td>
      <td width="25%" align="center"></td>
    </tr>
    <tr align="center">
      <td width="100%" colspan="4"><div align="center"><center><p><input type="button"
      value="我来也" name="B1" onclick="allpass()"></td>
    </tr>
  </table>
</form>
</body>
</html>





--------------------------------------------------------------------------------

贴子转发：

 
E-mail地址：


--------------------------------------------------------------------------------

相关主题：


 我自己写的聊天室源代码（二）  - 【1_apple】 00-4-28 14:38:44 [ID:231645 点击:8] (4763 Bytes) (0)  


--------------------------------------------------------------------------------

回复：

    
版 面：Joy ASP ↑  *为必填项目 第一次发言请去注册>> 怎样使用UBBCode>> UBB Code Editor>> NEW!
姓 名：* 密码： * 密码遗忘请点这里>>
Email：
主 题：*

表 情：
             
             

内 容（最多16KB） 使用签名 设置签名>>   


链接地址： 
链接标题： 
链接图片：
⌨️ 快捷键说明

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