📄 wpg_zy.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/conn.asp" -->
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.QueryString("id") <> "") Then
Recordset1__MMColParam = Request.QueryString("id")
End If
%>
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows
Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_conn_STRING
Recordset1_cmd.CommandText = "SELECT * FROM tijiao WHERE id = ?"
Recordset1_cmd.Prepared = true
Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 5, 1, -1, Recordset1__MMColParam) ' adDouble
Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
<HTML>
<head>
<style type="text/css">
<!--
p{font-size:9pt};
td{font-size:9pt};
li{font-size:9pt};
select{font-size:9pt};
.forms {
BORDER-RIGHT: #254b03 1px solid; BORDER-TOP: #254b03 1px solid; MARGIN-TOP: auto; MARGIN-BOTTOM: auto; BORDER-LEFT: #254b03 1px solid; WIDTH: 80px; BORDER-BOTTOM: #254b03 1px solid; HEIGHT: 14px; BACKGROUND-COLOR: #ffffff
}
a {color:#0000ff;font-size: 9pt ;text-decoration:none; line-height:13.5pt}
a:hover {text-decoration:none; color:#000000;text-decoration: underline}
-->
.a10 { font-size: 10.5pt}
.bg {
background-repeat: no-repeat;
}
.ziti { font-family: "宋体";
font-size: 16px;
font-weight: bold;
color: #000000;
}
</style>
<title>作业系统</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<body leftmargin="0" topmargin="0">
<table width="760" cellpadding="0" cellspacing="0" border="0" align="center">
</table>
<table width="760" border="0" cellpadding="0" cellspacing="0" align="center">
<tr>
<td><img src="images/top.gif" width="760" height="100"></td>
</tr>
</table>
<table width="760" border="0" cellpadding="0" cellspacing="0" bordercolor="003366" align="center">
<tr>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="003366" bgcolor="#EAF2ED">
<tr>
<td valign="top">
<table width="100%" height="438" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="438" align="center" valign="top" ><div align="left" class="bg"> <br>
<table width="90%" cellspacing="1" cellpadding="5" align="center">
<form name="form1" method="post" action="tijiaook2.asp">
<tr>
<td colspan="3" align=right><div align="center" class="ziti">未批改作业查看修改</div></td>
</tr>
<tr >
<td align=right>次数：</td>
<td colspan="2">第 <%=(Recordset1.Fields.Item("zy_cs").Value)%>次</td>
</tr>
<tr >
<td align=right>科目：</td>
<td colspan="2"><%=(Recordset1.Fields.Item("zy_km").Value)%></td>
</tr>
<tr >
<td align=right>教师：</td>
<td colspan="2"><%=(Recordset1.Fields.Item("zy_teacher").Value)%></td>
</tr>
<tr >
<td width=36 align=right>题目：</td>
<td colspan="2"><textarea name="zy_title" cols="80" rows="5" readonly><%=(Recordset1.Fields.Item("zy_title").Value)%></textarea> </td>
</tr>
<tr >
<td align=right>内容：</td>
<td colspan="4" valign="top"><textarea name="content" cols="80" rows="15"><%=(Recordset1.Fields.Item("content").Value)%></textarea> </td>
</tr>
<tr >
<td></td>
<td width="323" ><input type="submit" name="Submit" value="提 交">
<input type="reset" name="Submit2" value="重 填">
<input name="id" type="hidden" value="<%=(Recordset1.Fields.Item("id").Value)%>">
</td>
<td width="289" ><a href="javascript:history.go(-1)"> 返回 </a></td>
</tr>
</form>
</table>
<br>
</div></td>
</tr>
</table> </td>
</tr>
<tr>
<td valign="top"><table width="760" border="0" cellpadding="0" cellspacing="0" height="24" bordercolor="003366" align="center">
<tr>
<td><div align="center">CopyRight @ 2008</div></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -