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

<%
id_stu=request("id_stu")
'response.write session("id_stu1") &"aaa"
'response.write "bbb"&id_stu

'*****************************************************************
  '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("id_stu")
			  if id_stu="" then
			  id_stu=session("id_stu1")
				If id_stu="" Then
				id_stu=request.form("ids")
				End if
			  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
	 Response.write sql_data
	 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>

<tr><td align=left>
  <%If id_type<>"teacher" then%>
<div align=center>

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="id" value=<%=id_thesis%>> 
<div class="form-group">
                      <button type="submit" class="templatemo-blue-button">���ҧἹ������¹/��ԭ�ҹԾ���</button>
                    </div>

</form></div><%
Else
'�к͡ʶҹСѺ�Ҩ������� �Ԩ�������֧����˹����

End if%>  </td></tr>

<%If id_type="teacher" then%>
		   <tr><td align=right>
<form name="form13" class="form-horizontal" style="padding:10px;" method="post" action="thesis_progress_lecturer.asp">

<%'���ʶҹС�����������ǻ������� 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;">��Ѻ˹����§ҹ��������˹��</button></div>

</form>
<%End if%>
</td></tr>

<tr><td>
<div class="templatemo-content-widget white-bg ">

<%
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"
sql_plan="select * from thesis_plan_activity where id_stu='"&id_stu&"' and status_del='"&status_del&"' order by id_table asc"
ors_plan.open sql_plan,conn,1,3
If Not ors_plan.eof then
	ors_plan.movefirst
	noa=0
	Do while Not ors_plan.eof

noa=noa+1
if noa mod 2 = 0 then
bgp="#e9e9e9"
else
bgp="#FFFFFF"
end If
id_table=ors_plan("id_table")
id_activity=ors_plan("id_activity")
		Set ors_table=server.createobject("adodb.recordset")
		sql_table="select * from rp_table where id_table='"&ors_plan("id_table")&"'"
		ors_table.open sql_table,conn,1,3
		If Not ors_table.eof Then
		rp_table_name=ors_table("table_sum")
		Else rp_table_name="�͡�èѴ�����"
		End if
%>
<h2 class="templatemo-inline-block"><%=noa%>.<%=rp_table_name%><%'=ors_plan("id_activity")%></h2><hr>

<div class="table-responsive">
<table class="table table-striped table-bordered">
<tr> <td width="20%">�Ԩ�������(��)��
<%
sqlrpl="select * from rp_activity_relate where id_activity_r='"&ors_plan("id_activity_r")&"'"
Set orsrpl=server.createobject("adodb.recordset")
orsrpl.open sqlrpl,conn,1,3
'Response.write sqlrpl
If Not orsrpl.eof Then
	%>
				<td> <%=orsrpl("activity_name")%><%'=orsrpl("id_activity_r")%>(<%=ors_plan("id_activity")%>)</tr>
	<%
Else
		Response.write "<td>�͡�èѴ�����"
End If
%>

<tr><td>��������´�Ԩ����<td> <%=ors_plan("activity_name")%></tr>
<%
set ors_o=server.createobject("adodb.recordset")
	 sqlmark_o="select * from progress_report_thesis where id_progress_report ='"&ors_plan("id_progress_report")&"' order by datebegin asc, year_edu desc, semeter desc"
	 ors_o.open sqlmark_o,Conn,1,3
	 If Not ors_o.eof Then
	 dateend=ors_o("dateend")
		%>
	
	<tr><td><%Response.write "�ѹ�ش���¢ͧ�����§ҹ<td> "&ors_o("date_end")&"/"&ors_o("month_end")&"/"&ors_o("year_end")
	Response.write " �Ҥ���¹���:: "&ors_o("semeter")&"/"&ors_o("year_edu")
	End If %></td></tr>
		<tr><td>�š�÷ӡԨ����<td> 
		<%sqlrpr="select * from rp_result2 where id_result='"&ors_plan("id_result")&"'"
Set orsrpr=server.createobject("adodb.recordset")
orsrpr.open sqlrpr,conn,1,3
'Response.write sqlrpl
If Not orsrpr.eof Then%>
		
		
		<%=orsrpr("result_name")%>
		
		
		<%End if%>
		</td></tr>
		<tr><td>�ѭ������ػ��ä<td><%=ors_plan("activity_problem")%></td></tr>
		<%
		Response.write "<tr><td>��ѡ�ҹ<td> "
	
			Set ors_file=server.createobject("adodb.recordset")
			sql_file="select * from thesis_report_file2 where id_activity='"&ors_plan("id_activity")&"' and id_status='1'"
			ors_file.open sql_file,conn,1,3
			If Not ors_file.eof Then
				ors_file.movefirst
				n=1
				Do While Not ors_file.eof

Response.write "[<a href=../fileprogress/"&ors_file("file_name")&" target=_blank>File"&n&"</a>]"
				n=n+1
				ors_file.movenext
				loop
			Else
			Response.write "No file"
			End If
			Response.write "</td></tr></table></div>"'�Դ �Կ ���ҧ
If ors_plan("id_status")=1 Then
'dateend=ors_plan("dateend")
If dateend >= dcheck then
	
	%>
	<%If id_type <>"teacher" Then
	'Response.write id_type 
	%>
	<%
'sql_edit_st = "select id_progress_report,id_status from progress_report_thesis where id_progress_report ='"&ors_plan("id_progress_report")&"'"
 ' set ors_edit_st=server.createobject("adodb.recordset")
 ' 	  ors_edit_st.open sql_edit_st,Conn,1,3
'	  If Not ors_edit.eof Then
	  
'	  End if
%>
	<p>
<table><tr><td>
<form name="form7" class="form-horizontal" style="padding:10px;" method="post" action="edit_thesis_progress_student_form.asp">

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="id" value=<%=id_thesis%>> 
<input type="hidden" name="id_activity" value=<%=ors_plan("id_activity")%>>
<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-left:10px;">2.��Ѻ�����š�÷ӡԨ���� (���Ǥ���)</button></div>

</form></td>

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="id" value=<%=id_thesis%>> 
<input type="hidden" name="id_activity" value=<%=ors_plan("id_activity")%>>
<input type="hidden" name="id_qe_type" value=<%=ors_plan("id_activity_r")%>>
<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-left:10px;">3.��§ҹ�š�÷ӡԨ����</button></div>

</form></td>
<!--<td>
<form name="form5" class="form-horizontal" style="padding:10px;" method="post" action="del_thesis_progress_student.asp">

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="id" value=<%=id_thesis%>> 
<input type="hidden" name="id_activity" value=<%=ors_plan("id_activity")%>> 
<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-left:10px;" onclick="return confirm('�س��ͧ���ź?');">Remove</button></div>
<input type="submit" name="Del" value="Del"> 
</form>-->
<td>
<form name="form7" class="form-horizontal" style="padding:10px;" method="post" action="upload_thesis_progress_student_form.asp">

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
				'If ors_r("id_status")="0" then
				'Response.write id_thesis
				%>
<input type="hidden" name="id" value=<%=id_thesis%>> 
<input type="hidden" name="id_stu" value=<%=id_stu%>> 
<input type="hidden" name="id_activity" value=<%=ors_plan("id_activity")%>> 
<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-left:10px;">4.Ṻ��ѡ�ҹ</button></div>

</form>
<td>

<%'���ʶҹС�����������ǻ������� disable ����ѧ������� enable
'Response.write ors_plan("id_table")&"bbbb"
	If Not orscheck1.eof then
				'Response.write id_thesis
	
				%>
				<form name="form6" method="post" action="confirm_thesis_progress_student.asp">

<div class="col-xs-12">
	<button class="btn-oth" type="submit" role="button" style="margin-left:10px;" onclick="return confirm('����ͷ�ҹ�׹�ѹ��������� ��ҹ�������ö��Ѻ������§ҹ��<br> �׹�ѹ�����?');">5.�׹�ѹ������</button></div>
 
</form>
<%

End if%>
</table>
	<%
		'Response.write "<td>[<a href=edit_thesis_progress_student_form.asp?id_activity="&ors_plan("id_activity")&">Edit</a>]"
		'Response.write "[<a href=del_thesis_progress_student_form.asp?id_activity="&ors_plan("id_activity")&">Del</a>]"
		'Response.write "[<a href=confirm_thesis_progress_student_form.asp?id_activity="&ors_plan("id_activity")&">Send</a>]"
		Else
		Response.write "<p><div class=col-xs-12>"%> 
		<button class="btn-oth" type="submit" role="button" style="margin-left:10px;" readonly>���������ҧ�����§ҹ<%'=ors_plan("id_activity")%></button></div>
		
		<%
		End If
		
	Else
		'Response.write "<td>�٤�����finished"
		Response.write "<p><div class=col-xs-12 align=right>"
	Response.write "<button class=btn-oth type=submit role=button style=margin-left:10px;>����ش���ҡ����§ҹ"&ors_plan("id_activity")&"</button></div></p>"
		
		If id_type="teacher" Then
			'Response.write "<p><div class=col-xs-12>"
			
			'Response.write "�׹�ѹ�����§ҹ���� ������ѹ��� "&ors_plan("date_report")&"</p>"
		End if
	End If
	'Response.write dcheck&"-"&dateend
Else
Response.write "<p><div class=col-xs-12 align=right>"
%>
		<form name="form13" method="post" action="report_thesis_progress_student_form.asp">
<%
	Response.write "<button class=btn-oth type=submit role=button style=margin-left:10px;>�׹�ѹ�����§ҹ���� ������ѹ��� "&ors_plan("date_stu_confirm")&"("&ors_plan("id_activity")&")</button></div></p>"
%>	<input type="hidden" name="id" value=<%=id_thesis%>> 
<input type="hidden" name="id_stu" value=<%=id_stu%>> 
<input type="hidden" name="id_activity" value=<%=ors_plan("id_activity")%>>
	</form>
<%
End if
	Response.write "</p>"
	ors_plan.movenext
Loop
Else
Response.write "<p>���Ե�ѧ��������ҧἹ������¹/�ӻ�ԭ�ҹԾ��� ��ԡ������� ""���ҧἹ������¹/��ԭ�ҹԾ���""</p>"%>

<%
End if
%>
</div>

<%If id_type<>"teacher" then%>
<div align=center>
<form name="form3" method="post" action="add_thesis_progress_student_form.asp">

End if%>	</td></tr>

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