📄 sqxg.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="dqe_Conn.asp" -->
<!--#include file="check.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">
<!--
.unnamed1 { border: 1px dashed #CCCCCC;
}
.unnamed2 {
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
border-top-style: none;
border-right-style: dashed;
border-bottom-style: dashed;
border-left-style: none;
border-top-color: #E1DFE0;
border-bottom-color: #E1DFE0;
border-right-color: #E1DFE0;
}
.unnamed3 {border: 1px solid #E1E1E1;
}
body,td,th {
font-family: 宋体;
font-size: 10pt;
color: #000000;
}
a:link {
color: #60389A;
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #60389A;
}
a:hover {
text-decoration: underline;
color: #FF0000;
}
a:active {
text-decoration: none;
color: #9874CC;
}
.style1 {color: #9A76CD}
.style2 {color: #9773CB}
.style4 {border-top-width: 1px; border-right-width: 1px; border-bottom-width: 1px; border-left-width: 1px; border-top-style: none; border-right-style: dashed; border-bottom-style: dashed; border-left-style: none; border-top-color: #E1DFE0; border-bottom-color: #E1DFE0; border-right-color: #E1DFE0; color: #FFFFFF; }
body {
background-image: url(images/204.gif);
}
-->
</style>
</head>
<body>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="2" bordercolor="#8F6DC4">
<tr>
<td height="31" bgcolor="#E9E2F3"><div align="center"><a href="readme.asp" class="style2">使用说明</a> ------ <a href="sqxg.asp" target="_blank" class="style2">填加教室申请项目</a> ------ <a href="xsycjp.asp" class="style1">查看教室申请记录</a> ------ <a href="andjs.asp" target="_blank">增加多媒体教室</a> ------<a href="ckdmt.asp" class="style1"> 查看已有多媒体教室 </a>------<a href="tuichu.asp" class="style1"> 安全退出</a></div></td>
</tr>
</table>
<br>
<br>
<% dim Rs1,sql1,a,tlph
tlph=request.QueryString("id")
a=cint(tlph)
sql1="Select * From sq where id="&a
'sql1="Select * From mytj where id=2 "
Set Rs1=Server.CreateObject("Adodb.RecordSet")
rs1.open sql1,conn,1,3
%>
<% If tlph<>"" Then %>
<form name="form1" method="post" action="hyupshuju.asp?id=<%= rs1("id") %>">
<% Else %>
<form action="hyupshuju.asp" method="post" name="form1">
<% End If %>
<table width="94%" border="1" align="center" cellpadding="1" cellspacing="0" bordercolor="#9F78D1" bgcolor="#FFFFFF" class="style2">
<tr align="center" valign="middle" bgcolor="#A88CD2" background="images/3.jpg">
<td height="20" colspan="7" class="style4">填加教室申请项目</td>
</tr>
<tr align="center" valign="middle" bgcolor="#FFFFFF">
<td height="15" colspan="7" class="unnamed2"> </td>
</tr>
<tr bgcolor="#F5F3FA">
<td width="11%" height="20" class="unnamed2"><div align="center">星期</div></td>
<td height="20" class="unnamed2"><div align="center">第几节课</div></td>
<td height="20" class="unnamed2"><div align="center">使用日期</div></td>
<td class="unnamed2"><div align="center">教室</div></td>
<td height="20" class="unnamed2"><div align="center">备注</div></td>
<td width="12%" rowspan="2" bgcolor="#FFFFFF" class="unnamed2"><div align="center">
<input name="Submit" type="image" value="提交" src="images/r7_c8_r2_c2.jpg" align="middle" width="45" height="53">
</div></td>
</tr>
<tr>
<td height="10" class="unnamed2"><div align="center">
<select name="xingqi" id="xingqi">
<option value="星期一" <% If rs1("xingqi")="星期一" Then %>selected<% End If %>>星期一</option>
<option value="星期二"<% If rs1("xingqi")="星期二" Then %>selected<% End If %>>星期二</option>
<option value="星期三"<% If rs1("xingqi")="星期三" Then %>selected<% End If %>>星期三</option>
<option value="星期四"<% If rs1("xingqi")="星期四" Then %>selected<% End If %>>星期四</option>
<option value="星期五"<% If rs1("xingqi")="星期五" Then %>selected<% End If %>>星期五</option>
<option value="星期六"<% If rs1("xingqi")="星期六" Then %>selected<% End If %>>星期六</option>
<option value="星期日"<% If rs1("xingqi")="星期日" Then %>selected<% End If %>>星期日</option>
</select>
</div></td>
<td width="13%" height="10" class="unnamed2"><div align="center">
<select name="kebie" id="kebie">
<option value="一二节" <% If rs1("kebie")="一二节" Then %>selected<% End If %>>一二节</option>
<option value="三四节"<% If rs1("kebie")="三四节" Then %>selected<% End If %>>三四节</option>
<option value="五六节"<% If rs1("kebie")="五六节" Then %>selected<% End If %>>五六节</option>
<option value="七八节"<% If rs1("kebie")="七八节" Then %>selected<% End If %>>七八节</option>
<option value="晚自习"<% If rs1("kebie")="晚自习" Then %>selected<% End If %>>晚自习</option>
</select>
</div></td>
<td width="16%" height="10" class="unnamed2"><div align="center">
<input name="riqi" type="text" id="riqi" value="<%= rs1("riqi") %>" size="12">
</div></td>
<td width="16%" height="10" class="unnamed2"><div align="center">
<select name="jiaoshi" id="jiaoshi">
<%
Set Rs=Server.CreateObject("Adodb.RecordSet")
sql="Select * From js order by id desc"
rs.open sql,conn,1,1 %>
<%do while not rs.eof%>
<option value="<%= rs("jiaoshi") %>" <% If rs1("jiaoshi")=rs("jiaoshi") Then %>selected <% End If %>><%= rs("jiaoshi") %></option>
<%rs.movenext %>
<% loop %>
<% rs.Close %>
</select>
</div></td>
<td width="32%" height="80" class="unnamed2"><div align="center">
<textarea name="beizhu" cols="25" rows="4" id="beizhu"><%= rs1("beizhu") %></textarea>
</div></td>
</tr>
<tr>
<td height="10" class="unnamed2"><div align="center">选择星期几</div></td>
<td width="13%" height="10" class="unnamed2"><div align="center">选择第几节课</div></td>
<td width="16%" height="10" class="unnamed2"><div align="center">格式如:2007-9-7</div></td>
<td width="16%" height="10" class="unnamed2"><div align="center">选择教室</div></td>
<td width="32%" height="10" class="unnamed2"><div align="center">100字以内</div></td>
<td width="12%" bgcolor="#FFFFFF" class="unnamed2"><div align="center">点击提交</div></td>
</tr>
<tr>
<td height="20" colspan="7" class="unnamed2"><div align="center"> </div></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -