File Manager

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>

<title>�к����ʹ�����͡�ú�����</title>
 
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">

<link href="bsri2006.css" rel="stylesheet" type="text/css">
<link href="image/favicon.ico" rel="shortcut icon" type="image/x-icon">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0">
  <tr> 
    <td colspan="2"><div align="right"><img src="Image/head1.gif" width="800" height="61"></div></td>
  </tr>
  <tr> 
    <td colspan="2" background="Image/bghead1.gif"><div align="right"><font size="2" face="MS Sans Serif, Tahoma, sans-serif"><strong>| 
        <a href="http://www.swu.ac.th" target=_blank>SWU</a> | <a href="http://bsri.swu.ac.th" target=_blank>BSRI</a> 
        |<a href="chaPW.asp"><strong>Change 
        Password</strong></a>|<a href="log_out.asp">Log Out </a></strong></font>|</div></td>
  </tr>
  <tr> 
    <td width="20%" align="left" valign="top" bgcolor="#FFCCCC">
	</td>
    <td width="77%" align="left" valign="top">
<table width="100%" border="0" cellspacing="0">
<%
'*****************************************************************

session("tb_name")="course"
%>

<%
'*****************************************************************
  if session("tb_preview") <> 1  then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ
id_course=request("id_course")
id_schedule=request("id_schedule")
%>
<tr> 
   
    <td width="892" align="left" valign="top"><div align="center">
	<%if session("tb_edit")=2 then%>
	
	[ <a href="add_schedule1.asp?id_schedule=<%=id_schedule%>">���ҧ���¹</a>]
	<%end if%><br><strong>�ѹ�֡�š�����¹<br><br>
	<table align=center border=0>
	<tr>
<%

sql_check="select * from course_schedule where id_schedule='"&id_schedule&"'"
set ors_check=server.createobject("adodb.recordset")
ors_check.open sql_check,conn,1,3
';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
if not ors_check.eof then
'response.write "�����ū������"
'�ʴ���ǵ��ҧ���¹
'��������Ե
	sql_stu="select * from student_group where id_stugroup='"&ors_check("id_stugroup")&"'"
	set ors_stu=server.createobject("adodb.recordset")
	ors_stu.open sql_stu,conn,1,3
		if not ors_stu.eof then
					ors_stu.movefirst
					do while not ors_stu.eof

response.write "<tr><td>���ҧ���¹ - �ͺ  �дѺ  "
		
					id_curriculum=ors_stu("id_curriculum")
					sql_curri="select * from curriculum where id_curriculum='"&id_curriculum&"'"
						set ors_curri=server.createobject("adodb.recordset")
						ors_curri.open sql_curri,conn,1,3
						response.write  ors_curri("curriculum_full")&"</td><td>"

id_major=ors_stu("id_major")
					sql_major="select * from major  where id_major='"&id_major&"'"
					set ors_major=server.createobject("adodb.recordset")
					ors_major.open sql_major,conn,1,3
					response.write ors_major("major_th")&"</td>"

response.write "<td>Ẻ</td><td>"
					id_type_curr=ors_stu("id_type_curri")
					
					set ors_tc=server.createobject("adodb.recordset")
					sqlmark_tc="select * from type_curriculum where id_type_curri='"&id_type_curr&"'"
					ors_tc.open sqlmark_tc,Conn,1,3

response.write ors_tc("type_curri_th")&"  ���  "&ors_stu("no_stugroup")&"</td><td>�Ҥ���¹���  "&ors_check("id_academic_semeter")&"  (�Ҥ"
					sql_end="select * from academic_semeter where id_academic_semeter ='"&ors_check("id_academic_semeter")&"'"
					set ors_end=server.createobject("adodb.recordset")
					ors_end.open sql_end,conn,1,3
					response.write ors_end("academic_semeter")&")</td><td>�ա���֡��  "
					response.write ors_check("id_academic_year")&"</td></tr>"
					ors_stu.movenext
			loop

end if
		response.write "</table></table>"

'����ش�ʴ���ǵ��ҧ���¹

response.write "<table border=0>"	
						'response.write "<tr><td colspan=5><div align=center><strong>����Ԫҷ�����͡�������</td></tr>"

sql_check_2="select * from course_schedule2 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'"
		set ors_check_2=server.createobject("adodb.recordset")
		ors_check_2.open sql_check_2,conn,1,3
		'response.write sql_check_2
				if not ors_check_2.eof then
					ors_check_2.movefirst
					sqlcs1="select * from course_schedule1 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'"
					set orscs1=server.createobject("adodb.recordset")
					orscs1.open sqlcs1,conn,1,3
					if not orscs1.eof then
					id_status=orscs1("id_status")
					end if
					'do while not ors_check_2.eof
									sql_course="select * from course where id_course='"&ors_check_2("id_course")&"'"
					   set ors_course=server.createobject("adodb.recordset")
					   ors_course.open sql_course,conn,1,3
									if not ors_course.eof then		
									'ors_course.movefirst
									'do while not ors_course.eof
									response.write "<tr bgcolor=#FFFFCC>"
									response.write  "<td><strong>"&ors_course("id_course_th")&"</td>"
									response.write "<td><strong>"&ors_course("course_th")&"</td>"
									response.write "<td><strong>"&ors_course("credit")&"</td>"
									end if
									response.write "<td>[<a href=register_sche.asp?id_schedule="&id_schedule&"&id_course="&ors_course("id_course")&">��ª��͹��Ե</a>]"
									response.write "</td></tr>"
									sql_de="select * from course_schedule3 where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'"
									
									set ors_de =server.createobject("adodb.recordset")
									ors_de.open sql_de,conn,1,3
									if not ors_de.eof then
									response.write "<tr><td colspan=3>��ͧ�ͺ "&ors_de("room_test")&" ��ͧ���¹ "&ors_de("room_learn")&" �ѹ "&ors_de("id_date")&" �������¹ "&ors_de("time_learn")&" �͹ "&ors_de("sec_tion")&"�ӡѴ �����������¹ "&ors_de("stu_learn")
									end if
									response.write "</td>"
									
					do while not ors_check_2.eof
					
									sql_lec="select * from lecturer where id_lecturer='"&ors_check_2("id_lecturer")&"' "
									set ors_lec=server.createobject("adodb.recordset")
									ors_lec.open sql_lec,conn,1,3
									'response.write sql_lec
													if not ors_lec.eof then
													ors_lec.movefirst
														do while not ors_lec.eof
														response.write "<tr><td></td><td>����͹   "&ors_lec("name_lec")&"   "&ors_lec("sur_lec")&"</td>"
														response.write "</tr>"
													
														ors_lec.movenext
														loop
													else 	
								
									response.write "<tr><td colspan=2> Lecturer Not Match or Delete</td></tr>"
									end if									
								
									ors_check_2.movenext
									loop
									end if
 
					response.write "</table>"
					end if 'ors_check
				'	if session("tb_edit")=2 then'�����������͡����Ԫ�

response.write "<table border=0 width = 550>"
response.write "<tr bgcolor=#FFCCCC><td colspan=5><div align=center><strong>��ª��͹��Ե���ŧ����¹</strong></div></td></tr>"
response.write "<tr bgcolor=#FFCCFF align=center><td>�ӴѺ���</td><td>���ʻ�Шӵ��</td><td>����-ʡ��</td><td colspan=2>�š�����¹</td></tr>"
		sql_regis="select * from course_regis where id_schedule='"&id_schedule&"' and id_course='"&id_course&"'"
		set ors_regis=server.createobject("adodb.recordset")
		ors_regis.open sql_regis,conn,1,3
			if not ors_regis.eof then
				ors_regis.movefirst
				a=0
					do while not ors_regis.eof
					a=a+1
					li=a mod 2
						if li=0 then
						bgc="#EBEBEB"
						else
						bgc="#FDFDFD"
						end if
						
								
			response.write "<tr bgcolor="&bgc&"><td>"&a
				id_student= ors_regis("id_student")
								sql_stu1="select * from student where id_stu='"&id_student&"'"
								set ors_stu1=server.createobject("adodb.recordset")
								ors_stu1.open sql_stu1,conn,1,3
			if not ors_stu1.eof then
				response.write "<td>"&ors_stu1("id_stu")&"<td>[<a href=detail_stu.asp?id_stu="&ors_stu1("id_stu")&">"&ors_stu1("name_stu")&" "&ors_stu1("sur_stu")&"</a>]"
				end if
			if id_status="1" then
			response.write  "<td>"
			response.write "<form name=frm3 method=post action=add_grade.asp>"

response.write "<SELECT NAME=regis_grade style=font-size=16px>"
								
			grade=ors_regis("grade")
			
			sqlmark_="select * from grade"
			set ors_=server.createobject("adodb.recordset")
				ors_.open sqlmark_,Conn,1,3
				if not ors_.eof then
				ors_.movefirst
					do while not ors_.eof
					grade2=ors_("id_grade")
					'Response.write grade2&"aaaaaa"
					' response.write "<option value="&ors_("id_grade")&">"&ors_("id_grade")&"</option>"
						%>	
						<option <% if abs(grade)=abs(grade2) then%>
						value=<%=grade%><%=ors_regis("id_student")%> selected <%else%>
						value=<%=grade2%><%=ors_regis("id_student")%><%end if%>>
        <%=ors_("ngrade")%>
        </option>
										<%

ors_.movenext
											loop
											end if
								response.write "</SELECT>"
								'response.write "<input type=hidden name=id_student value="&ors_regis("id_student")&"></td></tr>"

'response.write "<input type=submit name=Submit value=�ѹ�֡�ô ></td></tr>"

else
								sqlgrade="select * from grade where id_grade='"&ors_regis("grade")&"'"
								set orsgrade=server.createobject("adodb.recordset")
								orsgrade.open sqlgrade,conn,1,3
											if not orsgrade.eof then
											response.write "<td align=center>"&orsgrade("ngrade")
											end if
								end if

response.write "</tr>"
				ors_regis.movenext
				loop
				if id_status="1" then
						response.write "<input type=hidden name=id_course value="&id_course&">"
						response.write "<input type=hidden name=id_schedule value="&id_schedule&">"	
						response.write "<tr bgcolor=#FFCCFF><td colspan=4 align=right><input type=submit name=Submit value=�ѹ�֡�ô style=font-size=16px></td></tr>"
response.write "</form>"	
					end if
			else 
				response.write "<tr ><td colspan=4><div align=center>No Register</div></td></tr>"
				response.write "<tr bgcolor=#FFCCFF><td colspan=5>-</td></tr>"
			end if

response.write "</table>"

%>
</td>
	
	  <%
	  else '���Է�
	response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��"
		response.write "</table>"

response.write "<meta http-equiv=refresh content =4;url=javascript:history.back();>" '���Է�
	end if '���Է�
	%>

</td>
  </tr>
  <tr> 
    <td colspan="2" background="Image/bghead1.gif">Contact Admin:: wassanaw@swu.ac.th 
      tel.02-649-5000 ext 17600</td>
  </tr>
</table>
</body>
</html>

File Manager

Editing: add_grade_form.asp.bak