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">
<%

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

<%
'*****************************************************************
  if session("tb_edit") <> 1  then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ
id_stugroup=request("id_stugroup")

<table width="100%" border="0" cellspacing="0">
  <tr> 
    <td> </td>
  </tr>
  <tr> 
    <td width="892" align="left" valign="top"><div align="center"><font size=2><strong>
	
        �Ѵ���Ѻ<br>
        <br>
        <table border=0>
          <%	
		  '��������
		  sql_group="select * from student_group where id_stugroup='"&id_stugroup&"'"
	set ors_group=server.createobject("adodb.recordset")
	ors_group.open sql_group,conn,1,3
	if not ors_group.eof then

%>
        <tr>
          <td><strong>��ѡ�ٵ� 
          <%
	id_curriculum=ors_group("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
		if not ors_curri.eof then
		response.write  ors_curri("curriculum_full")&"</td>"
		end if
	%>
          <td><strong>Ẻ 
            <%
	id_type_curriculum=ors_group("id_type_curri")
	set ors_tc=server.createobject("adodb.recordset")
	 sqlmark_tc="select * from type_curriculum where id_type_curri='"&id_type_curriculum&"'"
	 ors_tc.open sqlmark_tc,Conn,1,3
	 if not ors_tc.eof then
		response.write ors_tc("type_curri_th")
		end if
	%> </td>
          <td><strong>��蹷�� 
            <%
	response.write ors_group("no_stugroup")
	%> </td></div>
          <td ><strong>�Ң� 
            <%
	id_major=ors_group("id_major")
	set ors5=server.createobject("adodb.recordset")
	 sql5="select * from major where id_major='"&id_major&"'"
	 ors5.open sql5,Conn,1,3
	ors5.movefirst
	if not ors5.eof then
		response.write ors5("major_th")
		end if
	%> </td>
          <td ><strong></td>
        </tr>
	
        <%
		response.write "<tr><td colspan=3>�������[<a href=detail_stugroup.asp?id_stugroup="&ors_group("id_stugroup")&">"&ors_group("id_stugroup")&"</a>]"
		  '/��������
end if
response.write "</table>"
response.write "<table>"

response.write "<tr bgcolor=#FFCCCC><td colspan=4 align=center>����ԪҶ١�Ѵ���Ѻ"
response.write "<tr bgcolor=#FFCCCC><td colspan=4 align=center>��Ǵ�ԪҺѧ�Ѻ"
response.write "<tr bgcolor=#FFCCCC><td colspan=4 align=center>��Ǵ�Ԫһ�ԭ�ҹԾ���"
response.write "<tr bgcolor=#FFCCCC><td colspan=4 align=center>˹��¡Ե��Ǵ�Ԫ����͡"
			sql2="select * from plan_edu where id_stugroup='"&id_stugroup&"'"
				set ors2=server.createobject("adodb.recordset")
				ors2.open sql2,conn,1,3
				c=0
				if not ors2.eof then
				ors2.movefirst
				do while not ors2.eof
			c=c+1
b1=c mod 2
if b1=0 then
bg1="#E6E6E6"
else bg1="#FCFCFC"
end if

sql_a2="select * from course where id_course='"&ors2("id_course")&"'"
			set ors_a2=server.createobject("adodb.recordset")
			ors_a2.open sql_a2,conn,1,3
			'response.write sql_a2
					if not ors_a2.eof then
					'response.write "<tr><td>55"
					
												response.write "<tr bgcolor="&bg1&"><td>"&ors_a2("id_course_th")&"   ("&ors_a2("id_course")&")</td>"
												response.write "<td >"&ors_a2("course_th")&"</td>"
												response.write "<td >"&ors_a2("credit")&"</td><td >[<a href=plan_edu_del.asp?id_course="&ors_a2("id_course")&"&id_stugroup="&ors_group("id_stugroup")&">ź</a>]</td></tr>"
				end if
			ors2.movenext
			loop
			else response.write "<tr><td colspan=4 align=center>Dont have Course"
end if
response.write "</table>"
response.write "<table>"
response.write "<tr bgcolor=#CCCCFF><td colspan=4 align=center><strong>��س����͡����Ԫ�<br></td></tr>"

sql1="select * from course where year_edu='"&ors_group("year_edu")&"'"
set ors1=server.createobject("adodb.recordset")
ors1.open sql1,conn,1,3
a=0
if not ors1.eof then
			ors1.movefirst

do while not ors1.eof
			
			'response.write a
b=a mod 2
if b=0 then
bg2="#E6E6E6"
else bg2="#FCFCFC"
end if
id_course=ors1("id_course")
			sql_a1="select * from plan_edu where id_course='"&ors1("id_course")&"' and id_stugroup='"&id_stugroup&"'"
			set ors_a1=server.createobject("adodb.recordset")
			ors_a1.open sql_a1,conn,1,3
		'	response.write sql_a1
					if  ors_a1.eof then
					a=a+1
						response.write "<tr bgcolor="&bg2&"><td>"&ors1("id_course_th")&"   ("&ors1("id_course")&")</td>"
						response.write "<td >"&ors1("course_th")&"</td>"
						response.write "<td >"&ors1("credit")&"</td>"
						'response.write "<td >[<a href=plan_edu_add.asp?id_course="&ors_a1("id_course")&"&id_stugroup="&id_stugroup&">���͡</a>]</td></tr>"
						response.write "<td >[<a href=plan_edu_add.asp?id_course="&id_course&"&id_stugroup="&id_stugroup&">���͡</a>]</td></tr>"
				end if
			ors1.movenext
			loop
end if	%>
       
      </div></td>
  </tr> </table>
  <%	else '���Է�
	response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��"
response.write "<meta http-equiv=refresh content =3;url=javascript:history.back();>" '���Է�
	end if '���Է�
%>
</table>

</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: สำรอง_plan_edu.asp