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

📄 addclass.asp

📁 asp图书馆管理系统的一个源代码
💻 ASP
字号:

<html>
<head>
<title>AddClass</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK REL="stylesheet" TYPE="text/css" HREF="globe/style.css">


<script language="vbScript">
'防止填空
function submit1_onclick()
dim  name
name=trim(form.ClassName.value)
if name="" then
            alert("同学,你填空的,算什么呀?")
			form.ClassName.focus()
			submit1_onclick=false
			elseif len(name)>6 then
			alert("同学,分类名不能超过6个中文或6个英文!你自己想办法吧。")
			form.ClassName.focus()
			submit1_onclick=false
			else
			submit1_onclick=true
			end if
end function
</script>


</head>
<body bgcolor="#ccddff">


<%'错误处理
Dim error
error=request.querystring("error")
if error<>"" then
response.write error&"<br>"
end if
%>


<!--表单-->
<form name="form" method="post" action="DoAddClass.asp">
  <div id="Layer1" style="HEIGHT: 145px; LEFT: 205px; POSITION: absolute; TOP: 101px; WIDTH: 276px; Z-INDEX: 1"> 
    <table width="100%" border="1" height="143" bordercolorlight="#ffffff" bordercolordark="#000000" bgcolor="#d0e0ff" cellpadding="4" cellspacing="0">
      <tr bgcolor="#c8dcff"> 
        <td colspan="2"> 
          <div align="center"><font color="#0000ff">增 加 新 总 类</font></div>
      </td>
    </tr>
    <tr> 
        <td width="43%" height="50"><div align="center"><font color="#ff0033">新总类名:</font></div></td>
        <td width="57%" height="50"> 
          <input name="ClassName" size=11>
      </td>
    </tr>
    <tr> 
        <td colspan="2" height="53">   
<input type="submit" name="Submit1" value="增加">
            
          <input type="reset" name="Submit2" value="重写">
      </td>
    </tr>
  </table><br>
<P align=right>
  <font color="#339999"><A href="manager.htm">  &lt;返回&gt; 
 </A></font></P>
</div>
</form>


</body>
</html>

⌨️ 快捷键说明

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