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">
<style>
#customers {
  font-family: "Trebuchet MS", Arial, Helvetica, sans-serif;
  border-collapse: collapse;
  width: 100%;
}

#customers td, #customers th {
  border: 1px solid #ddd;
  padding: 8px;
}

#customers tr:nth-child(even){background-color: #f2f2f2;}

#customers tr:hover {background-color: #ddd;}

#customers th {
  padding-top: 12px;
  padding-bottom: 12px;
  text-align: left;
  background-color: #4CAF50;
  color: white;
}
</style>
<style> 
input[type=submit], input[type=reset] {
  background-color: #ff9999;
  border: black;
  color: white;
  padding: 2px 2px;
  text-decoration: none;
  margin: 2px 2px;
  cursor: pointer;
}
</style>
    <link rel="stylesheet" href="./css/icomoon.css">
	<link rel="stylesheet" href="./css/style.css">

</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">
  <tr> 
<%
'*****************************************************************

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

</tr>
  <tr> 
  <%
  			date1=datepart("d",date)
			month1=month(now())
			y=year(now())
			y=543+y

if date1=1 then
							date1="01" 
							elseif date1=2 then
							date1="02"
							elseif date1=3 then
							date1="03"
							elseif date1=4 then
							date1="04"
							elseif date1=5 then
							date1="05"
							elseif date1=6 then
							date1="06"
							elseif date1=7 then
							date1="07"
							elseif date1=8 then
							date1="08"
							elseif date1=9 then
							date1="09"
			end if
		if month1=1 then
							month1="01" 
							elseif month1=2 then
							month1="02"
							elseif month1=3 then
							month1="03"
							elseif month1=4 then
							month1="04"
							elseif month1=5 then
							month1="05"
							elseif month1=6 then
							month1="06"
							elseif month1=7 then
							month1="07"
							elseif month1=8 then
							month1="08"
							elseif month1=9 then
							month1="09"
			end if
			dcheck=Right(y,2)&""&month1&""&date1

%>
       <td width="100%" align="left" valign="top"><div align="center"><strong>Ἱ������¹�ͧ���Ե<br>
	   
	   [���Ե㹤�������] 
	   [���Ե�Ѩ�غѹ</a>]

<table align=center width=100% border=0>

<tr bgcolor="#CCCCCC"> 
  </tr>
<tr bgcolor=#99ff00><td align=center>����Ԩ�¾ĵԡ�����ʵ�� <td  align=center>�Ե�Է�һ���ء��
<tr bgcolor=#ffffcc><td align=center>
[<a href=thesis_progress_lecturer.asp?c1=1&t1=7&m=1>�-�͡�����Ҫ���</a>]
[<a href=thesis_progress_lecturer.asp?c1=2&t1=4&m=1>�͡-���Ԩ��</a>]
[<a href=thesis_progress_lecturer.asp?c1=2&t1=5&m=1>�͡-������Ԫ�</a>] 
[<a href=thesis_progress_lecturer.asp?c1=2&t1=3&m=1>�͡-������ͧ</a>]
</td><td align=center>
[<a href=thesis_progress_lecturer.asp?c1=2&t1=7&m=4>�͡-�͡�����Ҫ���</a>]
	  </td>
        </tr>  </table><br>
		 
<table id="customers" width="100%"><tr bgcolor=#99cc00>
	    <td ><div align="center" width="10">���</div></td>
    <td><div align="center" width="20%">���ʹ��Ե</div></td>
	<td><div align="center" width="40%">����-ʡ��</div></td>
	<td ><div align="center">�ӹǹἹ�Ҥ���¹�Ѩ�غѹ(S/A)</div>
	 <td ><div align="center">�ӹǹἹ������(S/A)</div>
	
	<%
 curriculum=request("c1")
  type_curri=request("t1")
  major=request("m")
  If curriculum="" Then
  curriculum=request.form("c1")
  type_curri=request.form("t1")
  major=request.form("m")

End if

sql_group="select * from student_group where id_curriculum='"&curriculum&"' and id_type_curri='"&type_curri&"' and id_major='"&major&"' order by id_begin_year asc"
set ors_group=server.createobject("adodb.recordset")
ors_group.open sql_group,conn,1,3
'Response.write sql_group

if not ors_group.eof Then '� �����ش

ors_group.movefirst
do while not ors_group.eof

stug=ors_group("id_stugroup")

sql="select * from student where id_status_edu=1 and id_stugroup='"&stug&"'  order by id_stu"

set ors=server.createobject("adodb.recordset")
	ors.open sql,conn,1,3
		if not ors.eof then
							if curriculum=1 then 
							c="�" 
							else c="�͡" 
							end if
			if type_curri=7 then 
					t="�͡�����Ҫ���"
				elseif type_curri=4 then 
				t="���Ԩ��"  
				elseif type_curri=5 then 
				t="������Ԫ�" 
				elseif type_curri=9 then 
				t="(ⷤǺ�͡)" 
				elseif type_curri=3 then 
				t="������ͧ" 
				elseif type_curri=2 then 
				t="�����" 		
				elseif type_curri=1 then 
				t="����" 
			end If
			if major=1 then 
					m="�Ң��Ԫҡ���Ԩ�¾ĵԡ�����ʵ�����ء��"
				ElseIf major=4 then 
				m="�Ң��ԪҨԵ�Է�һ���ء��"  
				
			end if
Response.write "<tr>"
Response.write "<td colspan=4 bgcolor=#99FF33>��� :: "&ors_group("no_stugroup")&"-"&c&" ("&t&") "&M

sql_ad="select * from advisor_student where id_stugroup='"&stug&"'"
				set ors_ad=server.createobject("adodb.recordset")
				ors_ad.open sql_ad,conn,1,3
				if not ors_ad.eof Then '��
				 ors_ad.movefirst
				 do while not ors_ad.eof
							sql_adn="select * from lecturer where id_lecturer='"&ors_ad("id_lecturer")&"'"
							set ors_adn=server.createobject("adodb.recordset")
							ors_adn.open sql_adn,conn,1,3
							if not ors_adn.eof then
									response.write " [�."&ors_adn("name_lec")&" "&ors_adn("sur_lec")&"]</td>"
							End if
				ors_ad.movenext
				loop
				end	If 'if not ors_ad.eof then
				'Response.write "<tr>"
				Response.write "<td bgcolor=#99FF33 align=right>��§ҹ�Ҿ���[<a href=rp_thesis_progress_stu_sem.asp?id_sg="&stug&" target='_blank'><img src=Image/chrome.png width=20 height=20 border=0 alt=></a>][<a href=rp_thesis_progress_stu_sem1ex.asp?id_sg="&stug&" target='_blank'><img src=Image/excel-logo.png width=20></a>]"
		
				Response.write "��ºؤ��[<a href=rp_thesis_progress_stu_sem2in.asp?id_sg="&stug&" target='_blank'><img src=Image/chrome.png width=20 height=20 border=0 alt=></a>][<a href=rp_thesis_progress_stu_sem2ex.asp?id_sg="&stug&" target='_blank'><img src=Image/excel-logo.png width=20></a>]"

Response.write "</tr>"
		
					ors.movefirst
					a=1
					do while not ors.eof
					bg1=a mod 2
					      if bg1=0 then
							bg="#d4d5d7"
							else bg="#ffffff"
						   end if
					response.write "<tr bgcolor="&bg&"><td align=center>"&a&"."
					response.write "<td><div align=left>"&ors("id_stu")
					response.write "<td><div align=left>"&ors("name_stu")&"  "&ors("sur_stu")
					id_stugroup=ors("id_stugroup")
							
						id_stu=ors("id_stu")
						'�繡�ô֧��ҡԨ���������Ե���ҧ

sqlall1="select * from progress_report_thesis where dateend_check>='"&dcheck&"'"
Set orsall1=server.createobject("adodb.recordset")
orsall1.open sqlall1,conn,1,3

'Response.write sqlall1
	If Not orsall1.eof Then '��
	'response.write orsall1("id_progress_report")
	Response.write orsall1("dateend_check")&"-------"
	noas=0
	send1s=0
	
'������ʴ�Ἱ������¹

Set ors_plans=server.createobject("adodb.recordset")
sql_plans="select * from thesis_plan_activity where id_stu='"&id_stu&"' and status_del='"&status_del&"' and id_progress_report='"&orsall1("id_progress_report")&"' order by year_end, month_end desc"
ors_plans.open sql_plans,conn,1,3
						If Not ors_plans.eof Then '��
							ys_semeter=orsall1("semeter")
							ys_year_edu=orsall1("year_edu")
							ors_plans.movefirst

Do while Not ors_plans.eof

noas=noas+1
								If ors_plans("id_status")="0" Then
								send1s=send1s+1
						End if

ors_plans.movenext
								Loop

%><td align=center>
				<form name="form13" method="post" action="detail_thesis_progress_ys.asp">

<div class="col-xs-12">
				<button class="btn-oth" type="submit" role="button" style="margin-right:20px;"><%=send1s%>/<%=noas%></button></div>
				</form>
				<%
				Else
				Response.write "<td>"
				End If  'If Not ors_plans.eof Then
			End If  'If Not orsall1.eof Then
				%>

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
			id_type="teacher"
				noa=0
				send1=0
			status_del="1"	
			'������ʴ�Ἱ������¹
							Set ors_plan=server.createobject("adodb.recordset")
							sql_plan="select * from thesis_plan_activity where id_stu='"&id_stu&"' and status_del='"&status_del&"' order by year_end, month_end desc"
							ors_plan.open sql_plan,conn,1,3

If Not ors_plan.eof Then '��
								ors_plan.movefirst

Do while Not ors_plan.eof

noa=noa+1
								If ors_plan("id_status")="0" Then
								send1=send1+1
								End if

ors_plan.movenext
								Loop

%>
		<input type="hidden" name="id_stu" value=<%=id_stu%>> 
		<input type="hidden" name="id_type" value=<%=id_type%>>
		<div class="col-xs-12">
		<button class="btn-oth" type="submit" role="button" style="margin-left:10px;">
		<%
			Response.write send1&"/"&noa
										
		%></button></div>

</form>
									<%
End If  'If Not ors_plan.eof then

'����ô֧��ҡԨ�����ͧ���Ե������ҧ
							
					a=a+1	
				ors.movenext
				loop
				'else response.write "<td>-sdfasdsdfs</td>"
		
		End if		'ors
ors_group.movenext
loop
'else response.write "<tr ><td colspan=3>��س��кء�����ͧ���Ե</td>"
end If 'ors_group
'End if

%>
	
	</td></tr></table>
      </div></td>

</td>
    
        
        
  </tr>
</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: thesis_progress_lecturer.asp.bak