down.asp

来自「吻宇考试管理系统源码 吻宇考试管理系统源码」· ASP 代码 · 共 147 行

ASP
147
字号
<!--#include file="conn.asp"-->
<!--#include file="checkuser.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>吻宇考试管理系统</title>
<style type="text/css">
<!--
body {
	background-color: #EFF8FE;
}
body,td,th {
	font-size: 12px;
}
a:link {
	color: #000000;
	text-decoration: none;
}
a:visited {
	text-decoration: none;
	color: #000000;
}
a:hover {
	text-decoration: none;
}
a:active {
	text-decoration: none;
	color: #000000;
}
-->
</style>
<script language="javascript">
function checkform()
{
if(document.cnwy.name.value=="")
{
alert("课件的名称不能为空~!")
return false;
}
if(document.cnwy.dx.value=="")
{
alert("课件的大小不能为空~!")
return false;
}
if(document.cnwy.pt.value=="")
{
alert("课件的运行平台不能为空~!")
return false;
}

if(document.cnwy.downurl.value=="")
{
alert("课件的下载路径不能为空~!")
return false;
}
if(document.cnwy.xgjs.value=="")
{
alert("课件的介绍不能为空~!")
return false;
}
}

</script>

</head>

<body>
<form name="cnwy" method="post" action="down_add.asp" onsubmit="return checkform()" >
  <table align="center" cellpadding="1" cellspacing="1" bgcolor="#67B0ED">
    <tr>
      <td colspan="2" bgcolor="#EFF8FE"><div align="center">下载增加</div></td>
    </tr>
    <tr>
      <td width="88" height="16" bgcolor="#EFF8FE">课件名称:</td>
      <td width="197" bgcolor="#EFF8FE"><input name="name" type="text" id="name"></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">课件所属科目:</td>
      <td bgcolor="#EFF8FE"><select name="kemu" id="kemu">
<%dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from kemu"
rs.open sql,conn,1,1
if not rs.eof then
rs.movefirst
do while not rs.eof
%>        
		<option value="<%=rs("name")%>"><%=rs("name")%></option>
<%
rs.movenext
loop
else
%> 
<option value="暂时没有数据">暂时没有数据</option>  
<%end if%>   
	  </select></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">课件大小:</td>
      <td bgcolor="#EFF8FE"><input name="dx" type="text" id="dx"></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">推荐程度:</td>
      <td bgcolor="#EFF8FE"><select name="tjcd" id="tjcd">
        <option value="★☆☆☆☆">★☆☆☆☆</option>
        <option value="★★☆☆☆">★★☆☆☆</option>
        <option value="★★★☆☆">★★★☆☆</option>
        <option value="★★★★☆">★★★★☆</option>
        <option value="★★★★★">★★★★★</option>
      </select></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">应用平台:</td>
      <td bgcolor="#EFF8FE"><input name="pt" type="text" id="pt"></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">下载URL:</td>
      <td bgcolor="#EFF8FE"><input name="downurl" type="text" id="downurl"></td>
    </tr>
    <tr>
      <td bgcolor="#EFF8FE">相关介绍:</td>
      <td bgcolor="#EFF8FE"><textarea name="xgjs" cols="30" rows="10" id="xgjs"></textarea></td>
    </tr>
    <tr>
      <td colspan="2" bgcolor="#EFF8FE"><table width="252" align="center" cellpadding="1" cellspacing="1">
        <tr>
          <td width="113"><input type="submit" name="Submit" value="增加"></td>
          <td width="130">
              <div align="right">
                <input type="reset" name="Submit2" value="清除">
              </div></td>
        </tr>
      </table></td>
    </tr>
  </table>
</form>

</body>
</html>
<%
rs.close
set rs=nothing
set wyrs=nothing

%>

⌨️ 快捷键说明

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