File Manager

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

<title>�к����ʹ�����͡�ú�����</title>
<style>
#customers {
  font-family: "Trebuchet MS", Arial, Helvetica, sans-serif;
  border-collapse: collapse;
  width: 100%;
}

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

#customers th {
  padding-top: 12px;
  padding-bottom: 12px;
  text-align: left;
  background-color: #4CAF50;
  color: white;
}
</style>
 
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">

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

    <link rel="stylesheet" href="./css/icomoon.css">
	<link rel="stylesheet" href="./css/style.css">
<link href="./css/font-awesome.min.css" rel="stylesheet">
    <link href="./css/bootstrap.min.css" rel="stylesheet">
    <link href="./css/templatemo-style.css" rel="stylesheet">
<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">
    <tr>

<td width="892" align="left" valign="top">
<%
date1=datepart("d",date)
			month1=month(now())
			y=year(now())
			y=543+y
y=right(y,2)
			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=y&""&month1&""&date1
'*****************************************************************
'#customers tr:nth-child(even){background-color: #f2f2f2;}

'#customers tr:hover {background-color: #ddd;}
session("tb_name")="student"
id_type=request.form("id_type")
%>

'*****************************************************************
  'if session("tb_preview") =2 or session("id_stu1") = id_stu  then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ
 pern=session("username")
		  per="2"
		  tb="student"
		  sqlnc="select * from tb_permission where id_staff='"&pern&"' and tb_edit='"&per&"' and tb_name='"&tb&"'"
		  set orsnc=server.createobject("adodb.recordset")
		  orsnc.open sqlnc,conn,1,3
		  
%>
	
	<br>

<table  border="0" align="center" cellpadding="0" cellspacing="0" width="100%">
            <tr > <td>
             <table border=0 width="100%">
			  <%
			  id_stu=request.form("id_stu")
			  id_progress_report=request.form("id_progress_report")
			  id_status_check1=request.form("id_sc")
			  'if id_stu="" then
			  'id_stu=session("id_stu1")
			  'end If
'id_thesis=request("id_thesis")
'If id_thesis="" Then
'id_thesis=request.form("id")
'End if
			  sql_data="select * from student where id_stu='"&id_stu&"' "
	 set ors_data=server.createobject("adodb.recordset")
	 ors_data.open sql_data,conn,1,3
	 if not ors_data.eof then
%>
            </tr>
  <tr>   <td colspan=3>    
  <div class="col-1">
<div class="templatemo-content-widget white-bg">
               
                <div class="media">
                  
                  </div>
                  <div class="media-body">
                    <h2 class="media-heading text-uppercase"><%=id_stu%>&#160;&#160;<%=ors_data("name_stu")%>
&#160;&#160;
<%=ors_data("sur_stu")%> 
            (<%=ors_data("name_eng")%>&#160; 
            <%=ors_data("sur_eng")%>)</h2><p>
                    
			  <%
			 ' response.write id_stu&" "
			  %> 
 
<%'=ors_data("email_stu")%>
            
<% 
id_status_edu=ors_data("id_status_edu")
			  set ors3=server.createobject("adodb.recordset")
	 sql3="select * from status_edu where id_status_edu='"&id_status_edu&"'"
	 ors3.open sql3,Conn,1,3
			if not ors3.eof then
		'response.write ors3("status_edu")
			end if

%>
<%

id_stugroup=ors_data("id_stugroup")
			  sql_all="select * from student_group where id_stugroup='"&ors_data("id_stugroup")&"' "
		set ors_all=server.createobject("adodb.recordset")
		ors_all.open  sql_all,Conn,1,3
		if not ors_all.eof Then
			ys_semeter=ors_all("id_begin_semeter")
			ys_year_edu=ors_all("id_begin_year")
		'response.write ""
			sql_curri="select * from curriculum where id_curriculum='"&ors_all("id_curriculum")&"'"
			set ors_curri=server.createobject("adodb.recordset")
			ors_curri.open sql_curri,conn,1,3
				if not ors_curri.eof then
					id_curriculum=ors_all("id_curriculum")
				response.write  ors_curri("curriculum_full")&" "
				end If
				id_type_curri=ors_all("id_type_curri")
			sqlt="select * from type_curriculum where id_type_curri='"&ors_all("id_type_curri")&"'"
		   set orst=server.createobject("adodb.recordset")
		   orst.open sqlt,conn,1,3
				if not orst.eof then
				response.write orst("type_curri_th")
				end if
					response.write  "  ���  "&ors_all("no_stugroup")&"&#160;"
					id_major=ors_all("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
					if not ors_major.eof then
						response.write ors_major("major_th")
					end if
		end if
		%></p>  
                  </div>
                </div>                
              </div>
	             
            </td></tr>
<%
response.write "<tr >"
'���ͻ�ԭ�ҹԾ��� 
sqlt="select * from thesis where id_thesis='"&id_thesis&"'"
	set orst=server.createobject("adodb.recordset")
	orst.open sqlt,conn,1,3
	if not orst.eof then

'response.write "<td>"&orst("id_thesis")
		'response.write "<td>���ͻ�ԭ�ҹԾ���::"&orst("thesis_th")&"<br>Thesis name::"&orst("thesis_eng")
	Else
'response.write "<td>����բ�����"		
	End if

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

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="c1" value=<%'=id_curriculum%>> 
<input type="hidden" name="t1" value=<%'=id_type_curri%>>
<input type="hidden" name="m" value=<%'=id_major%>> 
<div class="col-xs-12">
<button class="btn-oth" type="submit" role="button" style="margin-left:10px;">&lt;&lt;Previous Page</button></div>

</form>

</td></tr>
<tr><td align=left>��ǹ��� 1 ����������ǡѺ�ͺ�����§ҹ
<div class="templatemo-content-widget white-bg ">
<table class="table table-striped table-bordered">
<tr><td>

<%
	sqlcheck="select * from rp_check where id_stu='"&id_stu&"' and id_progress_report='"&id_progress_report&"'"
	Set orscheck=server.createobject("adodb.recordset")
	orscheck.open sqlcheck,conn,1,3
If Not orscheck.eof Then
	id_check=orscheck("id_check")
	id_status_check=orscheck("id_status_check")
	'Response.write id_check&":1"
Else
	'Response.write "2"
	sqlc1="select * from rp_check order by id_check"
	Set orsc1=server.createobject("adodb.recordset")
	orsc1.open sqlc1,conn,1,3
	If Not orsc1.eof Then
		orsc1.movelast
		id_check=orsc1("id_check")+1
	Else
		id_check=1
	End If
		sqldata="insert into rp_check(id_check,id_stu,id_progress_report,id_status_check)  values('"&id_check&"','"&id_stu&"','"&id_progress_report&"','0')"

set orsdata=Server.CreateObject("adodb.recordset")
					orsdata.open sqldata,conn,1,3
					Response.write sqldata
End If
sqlprt="select * from rp_check where id_check='"&id_check&"'"
Set orsprt=server.createobject("adodb.recordset")
orsprt.open sqlprt,conn,1,3
	If Not orsprt.eof Then
		id_pr=orsprt("id_progress_report")
		sqlprt1="select * from progress_report_thesis where id_progress_report='"&id_pr&"'"
		Set orsprt1=server.createobject("adodb.recordset")
		orsprt1.open sqlprt1,conn,1,3
			If Not orsprt1.eof then
		Response.write "�����§ҹ��������˹�� ��Ш��Ҥ���¹��� "&orsprt1("semeter")&"/"&orsprt1("year_edu")
		'Response.write " ʶҹ� "
		id_status_check=orsprt("id_status_check")
'<td>
		%>
		
		<%
		If id_status_check=0 Then
			%><td>
	<form name="form13" method="post" action="thesis_progress_to_adv.asp">
	<input type="hidden" name="id_progress_report" value=<%=id_progress_report%>>
	<input type="hidden" name="id_c" value=<%=id_check%>>
	<input type="hidden" name="id_stu" value=<%=id_stu%>>
	<input type="hidden" name="id_sc" value="1">
	<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-right:20px;"> �觵���Ҩ�������֡��</button></div>
				</form>
			
			<%
		End if
			End if
	End if

%>
</table>


<tr><td align=left>��ǹ��� 2 �Ҩ��������ԭ�ҹԾ���/����֡���Ԫҡ��
<div class="templatemo-content-widget white-bg ">
<table class="table table-striped table-bordered">
<tr><td width=200>
	<%
	sqlat="select * from advisor_thesis where id_stu='"&id_stu&"' and id_position_thesis=1"
	Set orsat=server.createobject("adodb.recordset")
	orsat.open sqlat,conn,1,3
	If Not orsat.eof Then
	id_lecturer=orsat("id_lecturer")
	%>
		
		�Ҩ��������ԭ�ҹԾ���</td><td>
			<%
			sqlal="select * from lecturer where id_lecturer='"&orsat("id_lecturer")&"'"
			Set orsal=server.createobject("adodb.recordset")
			orsal.open sqlal,conn,1,3
			If Not orsal.eof Then
				Response.write orsal("name_lec")&" "&orsal("sur_lec")
				
			End if
			
			%>
		
		
	
	<%
	Else

����֡���Ԫҡ��</td><td>
			<%
			sqlas="select * from advisor_student where id_stugroup='"&id_stugroup&"'"
			Set orsas=server.createobject("adodb.recordset")
			orsas.open sqlas,conn,1,3
			If Not orsas.eof Then
				id_lecturer=orsas("id_lecturer")
				sqlal="select * from lecturer where id_lecturer='"&orsas("id_lecturer")&"'"
				Set orsal=server.createobject("adodb.recordset")
				orsal.open sqlal,conn,1,3
				If Not orsal.eof Then
					Response.write orsal("name_lec")&" "&orsal("sur_lec")
				End if
			End if
	End If
	sqle = "update rp_check set id_lecturer_adv='"&id_lecturer&"' where  id_check = '" & id_check&"' "
'response.write" ʶҹ� "
  set orse=server.createobject("adodb.recordset")
		orse.open sqle,Conn,1,3
		'id_status_check=orsprt("id_status_check")
'<td>
%>
		
		<%
	If id_status_check=1 Then
		%><td>
	<form name="form13" method="post" action="#">
	<input type="hidden" name="id_progress_report" value=<%=id_progress_report%>>
	<input type="hidden" name="id_c" value=<%=id_check%>>
	<input type="hidden" name="id_stu" value=<%=id_stu%>>
	<input type="hidden" name="id_sc" value="1">
	<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-right:20px;"> �Ҩ�������֡�ҡ��ѧ�Ԩ�ó�</button></div>
				</form>
			
			<%
	End if
	%>
</td></tr>
</table>

</td></tr>

<tr><td align=left>��ǹ��� 3 �Ҩ�����иҹ����Ţ���ѡ�ٵ�
<div class="templatemo-content-widget white-bg ">
<table class="table table-striped table-bordered">
<tr><td width=200>�Ţ���ѡ�ٵ�<td>
 
<% 
sql_sg="select * from student_group where id_stugroup='"&id_stugroup&"'"
	Set ors_sg=server.createobject("adodb.recordset")
	ors_sg.open sql_sg,conn,1,3
	If Not ors_sg.eof Then
	'Response.write sql_sg
	sqlcu="select * from curriculum_manage where id_curriculum='"&ors_sg("id_curriculum")&"' and id_type_curri='"&ors_sg("id_type_curri")&"' and id_edu_bg='"&ors_sg("id_edu_bg")&"' and id_major='"&ors_sg("id_major")&"'"
	Set orscu=server.createobject("adodb.recordset")
	orscu.open sqlcu,conn,1,3
	'Response.write sqlcu
		If Not orscu.eof then
			sqlh="select * from position_h_curri where id_curriculum_manage='"&orscu("id_curriculum_manage")&"' and date_end>='"&dcheck&"' and id_position=2"
			Set orsh=server.createobject("adodb.recordset")
			orsh.open sqlh,conn,1,3
			'Response.write sqlh
			If Not orsh.eof Then
				sqll="select * from lecturer where id_lecturer='"&orsh("id_lecturer")&"'"
				Set orsl=server.createobject("adodb.recordset")
				orsl.open sqll,conn,1,3
				If Not orsl.eof then
				Response.write orsl("name_lec")&" "&orsl("sur_lec")
				End if
			End if
		End if
End if
%>
 </td></tr></table>
 
 </td></tr>
<tr><td>
<% '����Ѻ���˹�ҷ���Ǩ�ͺ�����������觵�����Ѻ ͨ.����֡�һ�ԭ�ҹԾ��� ���� ͨ.����֡���Ԫҡ�� ���ǡ�ѹ�֡������㹵��ҧ rp_check ���ͺ͡ʶҹ�㹢�鹶Ѵ� id_status_check 0=������鹹��Ե 1=��� OK 2= ͨ.����֡�� ��� 3=�Ţ���ѡ�ٵ� ��� 4=��иҹ��ѡ�ٵ���� 5=���Ե �Ѻ��Һ
If not orsnc.eof then

%>
			<tr><td>
<div class="templatemo-content-widget white-bg">
	<form name="form13" method="post" action="thesis_progress_staff_check.asp">

<input type="hidden" name="id_activity" value=<%=id_progress_report%>>
	<input type="hidden" name="id_stu" value=<%=id_stu%>>
	<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-right:20px;">Check Data</button></div>
				</form>
	

			<%
			End If
			'����Ѻ���˹�ҷ��
			%>

<%'#include file="thesis_progress_student_list_ext.asp"%>

</table>

<%
end if
%>
    
      </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 '���Է�
%>

</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_staff_check.asp.bak