File Manager

<script language="javascript">	
		function doSubmit()
{

if( document.form1.id_course.value == "" )
	{
		alert("��سҡ�͡�����Ԫ�")
		document.form1.id_course.focus()
			return false;
	}
if( document.form1.course_thai.value == "" )
	{
		alert("��سҡ�͡��������Ԫ�������")
		document.form1.course_thai.focus()
			return false;
	}

if( document.form1.course_eng.value == "" )
	{
		alert("��سҡ�͡��������Ԫ������ѧ���")
		document.form1.course_eng.focus()
			return false;
	}
	if ( document.form1.credit.value == "" ) 
	{

alert("��سҡ�͡˹��¡Ե")
		document.form1.credit.focus()
		return false;
	}

}
		</script>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874" />
<title>����������Ԣ�</title>
<style type="text/css">

</style>
<link href="style.css" rel="stylesheet" type="text/css" />
</head>

<body>
<form id="form1" name="form1" method="post" action="add_course.asp">
  <table width="794" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td colspan="2"><div align="center">��������������Ԫ�</div></td>
    </tr>
    <tr>
      <td width="194">�����Ԫ�</td>
      <td width="600"><input type="text" name="id_course" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' /></td>
    </tr>
    <tr>
      <td>�����Ԫ�</td>
      <td><input name="course_thai" type="text" size="100" maxlength="100" /></td>
    </tr>
    <tr>
      <td>Course Name </td>
      <td><input name="course_eng" type="text" size="100" maxlength="100" /></td>
    </tr>
	<tr><td>��Ǵ</td><td>
	<%
	response.write "<select name=id_typecourse> "
		sql_tcourse="select * from type_course"
					   set ors_tcourse=server.createobject("adodb.recordset")
					   ors_tcourse.open sql_tcourse,conn,1,3
									if not ors_tcourse.eof then		
									ors_tcourse.movefirst
									do while not ors_tcourse.eof
									
response.write "<option value="&ors_tcourse("id_typecourse")&">"&ors_tcourse("typecourse")&"</option>"

ors_tcourse.movenext
						loop
                       response.write "</select>"
		end if
		
	%>
	
	</td></tr>
    <tr>
      <td>˹��¡Ե</td>
      <td><input name="credit" type="text" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="5" maxlength="1" /></td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td><input type="submit" name="Submit" value="Submit" onmousedown="doSubmit();"></td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td>&nbsp;</td>
    </tr>
  </table>
</form>
<form>
</form>
<div align="right">[<a href="index.asp">˹���á</a>]<br />
</div>
<table width="972" align="center">
<tr><td width="91" bgcolor="#3366FF"><div align="center" class="style1">�����Ԫ�</div>
<td bgcolor="#3366FF"><div align="center" class="style1">����Ԫ�</div>
<td width="200" bgcolor="#3366FF"><div align="center" class="style1">Course Name</div>
<td width="87" bgcolor="#3366FF"><div align="center" class="style1">��Ǵ</div>
<td width="86" bgcolor="#3366FF"><div align="center" class="style1">˹��¡Ե</div>
<td width="97" bgcolor="#3366FF"><div align="center" class="style1">Action
  <%
				sqlall="select * from course"
				set orsall=server.createobject("adodb.recordset")
				orsall.open sqlall,conn,1,3
				if not orsall.eof then
				orsall.movefirst
				do while not orsall.eof

response.write "<tr><td>"&orsall("id_course")&"</td>"

response.write "<td>"

response.write orsall("course_thai")&"</td>"
		response.write "<td>"&orsall("course_eng")&"</td>"
		groupc=orsall("id_typecourse")
				sqlg="select * from type_course where id_typecourse="&groupc&""
				'response.write sqlg
				set orsg=server.createobject("adodb.recordset")
				orsg.open sqlg,conn,1,3
				if not orsg.eof then
		response.write "<td>"&orsg("typecourse")&"</td>"
		end if
		response.write "<td align=center>"&orsall("credit")&"</td>"	
		response.write "<td>[<a href=edit_course_form.asp?id_course="&orsall("id_course")&">Edit</a>]"%>
		[<a href=del_course.asp?idc=<%=orsall("id_course")%> onClick="return confirm('�س��ͧ���ź?');">Del</a>]
		  <%
	
					response.write "</tr>"
							
					orsall.movenext
					loop
					conn.close

else
response.write "No Course"
end if

%>
</div>
</table>
</body>
</html>

File Manager

Editing: grade/index_course.asp.bak