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

📄 addhomework.asp

📁 一套完整的学生课程管理系统
💻 ASP
字号:
<!-- #include file="utility/check.asp" -->
<%
	'****************************************
	'目的:			显示答题界面/处理答题结果
	'开始时间:		2005-6-1
	'最后修改时间:	2005-6-1
	'编写人:		某某某
	'****************************************
	
	dim homeworkID
	dim homework		'作业题目
	dim homeworkContent	'作业答案
	dim homeworkTime
	dim action			'是否执行提交动作
	dim studentID
	dim sql
	dim rs
	
	homeworkID = Request.QueryString("homeworkID")
	action = Request.QueryString("action")
	studentID = Session("userID")
	
	'判断homeworkID是否存在
	if(homeworkID = "") then
		Alert("参数丢失,无法执行操作!")
		GoBack()
		Response.end
	end if
	
	sql = "select * from courseHomework where ID = " & homeworkID
	set rs = ExecuteQuery(sql)
	
	'判断对应记录是否存在
	if(rs.EOF) then
		Alert("错误的参数,无法执行操作!")
		rs.close()
		set rs = nothing
		GoBack()
		Response.end
	end if 
	
	homeworkID = rs("ID")
	homework = rs("homework")
	homeworkTime = rs("addTime")
	
	rs.close()
	set rs = nothing	
	
	'如果是需要执行提交动作,则执行提交操作后返回欢迎页面
	if(action <> "") then
		homeworkContent = HtmlEncode2(Request.Form("homeworkAnswer"))
		if(homeworkContent = "") then
			Alert("请认真填写您的答案后再提交!")
			GoBack()
			Response.end
		end if
		sql = "insert into stuHomework(stuID,homeworkID,homeworkContent) values ('"
		sql = sql & studentID & "'," & homeworkID & ",'" & homeworkContent & "')"
		ExecuteNonQuery(sql)
		Alert("您的答案已经提交,请等待老师评点!")
		Go("welcome.htm")
		Response.end
	end if

%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>已发信息列表</title>
<link rel="stylesheet" type="text/css" href="images/link.css">

</head>
<body>

<div align="center"> 
	<form action="addHomework.asp?action=do&homeworkID=<%=homeworkID%>" method=post>
	<table border="1" width="575" id="table1" cellspacing="0" cellpadding="0" style="border-collapse: collapse" height="170" bordercolor="#CCCCCC">
		<tr>
			<td width="70" height="28" align="right">题目:</td>
			<td height="28">[<font color=red><%=homeworkTime%></font>]<%=homework%></td>
		</tr>
		<tr>
			<td width="70" align="right" height="118">解答:</td>
			<td height="118" align="center">
			<textarea name="homeworkAnswer" class="inputTextArea" cols="80" rows="15" style="border: 1px solid #C0C0C0; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px"></textarea></td>
		</tr>
		<tr>
			<td width="70" align="right" height="26"> </td>
			<td height="26">&nbsp;&nbsp;<input type="submit" value="提交作业" class="anniu">&nbsp;&nbsp;
			<input type="reset" value="重新填写" class="anniu"></td>
		</tr>
		</table>
		</form>
</div>

</body>

</html>

⌨️ 快捷键说明

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