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_preview") <> 1 or session("id_lecturer1") = id_lecturer then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ

<td width="892" align="left" valign="top" ><div align="center"><font size=2><strong>
	<%if session("tb_edit") = 2 then%>[<a href=detail_course_lec.asp>�ʴ������Ǵ����</a>][<a href=detail_cnorepeat.asp>�ʴ������ǧ�ա���֡��</a>]<%end if%><br>�ʴ�����Ԫҷ���Դ�͹����лա���֡�� <br><br>
	<table border=0>
	<%	
	response.write "<FORM METHOD=POST ACTION=detail_cnorepeat.asp >"
	%>
	<tr> 
              <td colspan=2>�ա���֡��
			  <select name="year1" style="font-size=16px">
<% 
sqlyear="select distinct id_academic_year from course_schedule order by id_academic_year desc"
set orsyear=server.createobject("adodb.recordset")
orsyear.open sqlyear,conn,1,3
if not orsyear.eof then
	orsyear.movefirst
	do while not orsyear.eof
			response.write "<option value="&orsyear("id_academic_year")&">"&orsyear("id_academic_year")
			response.write "</option>"
	orsyear.movenext
	loop
end if

</select>�֧ �� 
<select name="year2" style="font-size=16px">
<% 
sqlyear1="select distinct id_academic_year from course_schedule order by id_academic_year desc"
set orsyear1=server.createobject("adodb.recordset")
orsyear1.open sqlyear1,conn,1,3
if not orsyear1.eof then
	orsyear1.movefirst
	do while not orsyear1.eof
			response.write "<option value="&orsyear1("id_academic_year")&">"&orsyear1("id_academic_year")
			response.write "</option>"
	orsyear1.movenext
	loop
end if

%>
			  </select>
	  <input type="submit" name="Submit" value="Submit" style="font-size=16px">
            </td>
			<%response.write "</tr>"
	response.write "</FORM>"
year1=request.form("year1")
year2=request.form("year2")
response.write "<tr bgcolor=#FFFFCC><td colspan=3><strong>���Ҩҡ "&year1&" �֧�� "&year2&"</td></tr>"
response.write "<tr bgcolor=#CFCFCF><td>�ӴѺ���<td>����Ԫ�<td>�ա���֡�ҷ���Դ"

sqlall="select * from course"
		set orsall=server.createobject("adodb.recordset")
		orsall.open sqlall,conn,1,3
	a=1

if not orsall.eof then
		do while not orsall.eof

'��ǵ��ҧ����繢ͧ���Ե����˹
	sql_cs1="select * from course_schedule1 where id_course='"&orsall("id_course")&"'"
	set ors_cs1=server.createobject("adodb.recordset")
	ors_cs1.open sql_cs1,conn,1,3
	
		if not ors_cs1.eof then
			ors_cs1.movefirst
				If a Mod 2 =1 Then
	bgc="#e4e4e4"
	Else
	bgc="#ffffff"
	End if
			response.write "<tr bgcolor="&bgc&"><td>"&a&"<td>"&ors_cs1("id_course")&"<td>"
			a=a+1
			do while not ors_cs1.eof
					
			set ors_cs=server.createobject("adodb.recordset")
			sqlmark_cs="select * from course_schedule where id_schedule='"&ors_cs1("id_schedule")&"' and  id_academic_year between '"&year1&"' and '"&year2&"'order by id_academic_year"
			ors_cs.open sqlmark_cs,Conn,1,3
If Not ors_cs.eof Then
					
			response.write " "&ors_cs("id_academic_year")
					
End if				
						
			ors_cs1.movenext
			loop
			Response.write "</td></tr>"
		end If
	
		orsall.movenext
		Loop
		End if
'
	%>

</div></td>
	</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: detail_cnorepeat.asp