File Manager

<script language="javascript">	
		function doSubmit()
{
	if( document.form1.noofreport.value == "" )
	{
		alert("��س��ͺ�����§ҹ")
		document.form1.noofreport.focus()
			return false;
	}

if( document.form1.year_edu.value == "" )
	{
		alert("��سҡ�͡�ա���֡��")
		document.form1.year_edu.focus()
			return false;
	}
if( document.form1.semeter.value == "" )
	{
		alert("��سҡ�͡�Ҥ���¹")
		document.form1.semeter.focus()
			return false;
	}
	if( document.form1.id_curriculum.value == "" )
	{
		alert("��سҡ�͡��ѡ�ٵ�")
		document.form1.id_curriculum.focus()
			return false;
	}
if( document.form1.id_type_curri.value == "" )
	{
		alert("��سҡ�͡�ٻẺ����֡��")
		document.form1.id_type_curri.focus()
			return false;
	}
if( document.form1.id_major.value == "" )
	{
		alert("��سҡ�͡�Ң��Ԫ�")
		document.form1.id_major.focus()
			return false;
	}
if( document.form1.datebegin.value == "" )
	{
		alert("��سҡ�͡�ѹ���������§ҹ")
		document.form1.datebegin.focus()
			return false;
	}
if( document.form1.dateend.value == "" )
	{
		alert("��سҡ�͡�ѹ�ش���¢ͧ�����§ҹ")
		document.form1.dateend.focus()
			return false;
	}
	}
		</script>
<!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">
<link type="text/css" href="css/ui-lightness/jquery-ui-1.8.10.custom.css" rel="stylesheet" />

// �óյ�ͧ�����軯ԷԹŧ��ҡ���� 1 �ѹ���˹�� ����������� Code ����÷Ѵ��ҹ��ҧ���¤�Ѻ (1 �ش = 1 ��ԷԹ)

$("#datepicker-th").datepicker({ dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay, dayNames: ['�ҷԵ��', '�ѹ���', '�ѧ���', '�ظ', '����ʺ��', '�ء��', '�����'],
              dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
              monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
              monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});

$("#datepicker-th-2").datepicker({ changeMonth: true, changeYear: true,dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay,dayNames: ['�ҷԵ��','�ѹ���','�ѧ���','�ظ','����ʺ��','�ء��','�����'],
              dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
              monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
              monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});

$("#datepicker-th-3").datepicker({ changeMonth: true, changeYear: true,dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay,dayNames: ['�ҷԵ��','�ѹ���','�ѧ���','�ظ','����ʺ��','�ء��','�����'],
              dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
              monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
              monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});

$("#datepicker-en").datepicker({ dateFormat: 'dd/mm/yy'});

$("#inline").datepicker({ dateFormat: 'dd/mm/yy', inline: true });
			});
		</script>
</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="1">

<%
'*****************************************************************

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

<%
'*****************************************************************
  if session("tb_preview") <> 1 or session("id_lecturer1") = id_lecturer then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ

%><tr><td>[<a href=http://bsris.swu.ac.th/indexstudent.asp>��ԭ�ҹԾ���</a>][<a href=thesis_progress_lecturer.asp>�����Ź��Ե��§ҹ��������˹��</a>][<a href=http://bsris.swu.ac.th/thesis_progress.asp>�ͺ��§ҹ��������˹��</a>][<a href=http://bsris.swu.ac.th/list_status_stu.asp?c1=1&t1=2>Thesis�¡����дѺ</a>]
<tr><td>
	  <form name="form1" method="post" action="add_thesis_progress.asp">
<table width="75%" border="0" align="center" cellpadding="3" cellspacing="0">
<tr bgcolor=#FFFFCC><td colspan=2 align=center>�����ͺ�������§ҹ��������˹��</td></tr>
                  <tr> 
                    <td height="20"><div align="right">���駷��</div></td>
                    <td> <input type="text" name="noofreport" onkeypress='if (event.keyCode < 46 || event.keyCode >57) event.returnValue=false;' style="font-size:16px"></td>
                  </tr>

<tr> 
              <td><div align="right">�ա���֡��</div></td><td>
			  <select name="year_edu" style="font-size:16px">
<% 
mydate=date
myyear=year(mydate)

yearbegin=myyear+542
myyear=myyear+543
'response.write "<tr><td>"&yearbegin&"</td></tr>"
i=0

do while i<3
	%>
		<option <%
		if yearbegin=myyear then 
		%>
		value=<%=myyear%>
		selected
		<%else%>
		value=<%=yearbegin%>
		<%end if%>>
		<%=yearbegin%>
		</option>
		<%i=i+1
	yearbegin=yearbegin+1
		loop
		%>
			  </select>�Ҥ
<select name="semeter" style="font-size=16px">
<% 
			  set ors_=server.createobject("adodb.recordset")
	 sqlmark_="select * from academic_semeter"
	 ors_.open sqlmark_,Conn,1,3
	ors_.movefirst
	do while not ors_.eof
		response.write "<option value="&ors_("id_academic_semeter")&">"&ors_("academic_semeter")&"</option>"
		ors_.movenext
		loop
		%>
			  </select>
	  
            </tr>
			<tr> 
              <td><div align="right">��ѡ�ٵ�</div></td><td>
			  <select name="id_curriculum" style="font-size:16px">
<% 
			  set ors_o=server.createobject("adodb.recordset")
	 sqlmark_o="select * from curriculum"
	 ors_o.open sqlmark_o,Conn,1,3
	ors_o.movefirst
	do while not ors_o.eof
			response.write "<option value="&ors_o("id_curriculum")&">"&ors_o("curriculum_full")&" </option>"
		ors_o.movenext
		loop
		%>
			  </select>
			  
            </tr>
	       <tr> 
              <td><div align="right">Ẻ</div></td><td>
			  <select name="id_type_curri" style="font-size:16px">
<% 
			  set ors_tc=server.createobject("adodb.recordset")
	 sqlmark_tc="select * from type_curriculum"
	 ors_tc.open sqlmark_tc,Conn,1,3
	ors_tc.movefirst
	do while not ors_tc.eof
		response.write "<option value="&ors_tc("id_type_curri")&">"&ors_tc("type_curri_th")&" </option>"
		ors_tc.movenext
		loop
		%>
			  </select>
	<tr> 
              <td><div align="right">�Ң�</div></td><td>
			  <select name="id_major" style="font-size:16px">
<% 
			  set ors5=server.createobject("adodb.recordset")
	 sql5="select * from major"
	 ors5.open sql5,Conn,1,3
	ors5.movefirst
	do while not ors5.eof
		response.write "<option value="&ors5("id_major")&">"&ors5("major_th")&"</option>"
		ors5.movenext
		loop
		%>
			  </select>
			  
            </tr>
<tr> <td align=right>�ѹ�������§ҹ<td>
                    <input type="text" size="15" id="datepicker-th" name="datebegin" style="font-size:16px"/>mm/dd/yyyy
                  </tr>
<tr> <td align=right>�ѹ�ش������§ҹ<td>
                    <input type="text" size="15" id="datepicker-th-2" name="dateend" style="font-size:16px"/>mm/dd/yyyy
                  </tr>
<tr> <td align=right>�ѹ�ش���¢ͧ������ҧἹ<td>
                    <input type="text" size="15" id="datepicker-th-3" name="date_plan_end" style="font-size:16px"/>mm/dd/yyyy
                  </tr>
<tr> 
     <td><div align="right">��������´</div></td>
     <td><textarea name="detailprogress" rows="4" cols="50" id="detailprogress" style="font-size:16px"></textarea>
                  </tr>

                  </tr>

</form>

</td>
</tr>
      <tr> 
        <td width="892" align="left" valign="top"><div align="center">
		<br><strong>�ͺ��§ҹ��������˹�ҡ�÷ӻ�ԭ�ҹԾ���</strong>
           
            <table align=center width=100% border=0 cellspacing=0>
			
			
<tr bgcolor=#FFFFCC><td align=center>�ա���֡��<td align=center>��ѡ�ٵ�<td align=center>�ͺ���<td align=center>��ǧ����<td align=center>ʶҹ�<td align=center>Action<td align=center>�����š����
<% 
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
			'response.write int(dcheck)&"<br>"
'��Ǩ�ͺʶҹТͧ�ͺ�������������������������
Set ors_status=server.createobject("adodb.recordset")
sql_status="select * from progress_report_thesis "
ors_status.open sql_status,conn,1,3
If Not ors_status.eof then
	ors_status.movefirst
	Do while Not ors_status.eof
	id=ors_status("id_progress_report")
		'If ors_status("datebegin") > dcheck and ors_status("dateend") > dcheck Then
		'��Ѻ�Ţ�� 0 �ѧ���֧��ǧ���ҡ�˹�
		
'sql_edit_st = "update progress_report_thesis set id_status='0' where id_progress_report ='"&id&"'"
 ' set ors_edit_st=server.createobject("adodb.recordset")
  '	  ors_edit_st.open sql_edit_st,Conn,1,3
  
 'response.write "0No���㹪�ǧ����   "&id&"<br>"
		If ors_status("datebegin")<= dcheck and ors_status("dateend") >= dcheck Then
sql_edit_st="update progress_report_thesis set id_status='1' where id_progress_report='"&id&"'"
  set ors_edit_st=server.createobject("adodb.recordset")
  	  ors_edit_st.open sql_edit_st,Conn,1,3
	' Response.write "1yes㹪�ǧ����   "&id&"<br>"
	 Else
	sql_edit_st = "update progress_report_thesis set id_status='0' where id_progress_report ='"&id&"'"
  set ors_edit_st=server.createobject("adodb.recordset")
  	  ors_edit_st.open sql_edit_st,Conn,1,3
		End If
	'Response.write sql_edit_st
	ors_status.movenext
	loop
End if
'��Ǩ�ͺʶҹТͧ�ͺ�������������������������

set ors_o=server.createobject("adodb.recordset")
	 'sqlmark_o="select * from progress_report_thesis order by datebegin asc, year_edu desc, semeter desc"
	 sqlmark_o="select * from progress_report_thesis order by id_progress_report desc"
	 ors_o.open sqlmark_o,Conn,1,3

If Not ors_o.eof then
	ors_o.movefirst
	aa=0
	do while not ors_o.eof

aa=aa+1
if aa mod 2 = 0 then
bg1="#EBEBEB"
else
bg1="#FFFFFF"
end If
		Response.write "<tr bgcolor="&bg1&">"
		Response.write "<td>"&ors_o("semeter")&"/"&ors_o("year_edu")&"<td>"

sql_o_po="select * from curriculum where id_curriculum='"&ors_o("id_curriculum")&"'"
	  set ors_o_po=server.createobject("adodb.recordset")
	  ors_o_po.open sql_o_po,conn,1,3
If Not ors_o_po.eof then
response.write ors_o_po("curriculum_sum")
Else Response.write "-/"
End if

response.write "-"
id_type_curr=ors_o("id_type_curri")

set ors_tc=server.createobject("adodb.recordset")
	 sqlmark_tc="select * from type_curriculum where id_type_curri='"&id_type_curr&"'"
	 ors_tc.open sqlmark_tc,Conn,1,3
If Not ors_tc.eof then
		response.write ors_tc("type_curri_th")&" "
Else Response.write "-/"
End if	
		      			 
      sql_sta="select * from major where id_major='"&ors_o("id_major")&"'"
	  set ors_sta=server.createobject("adodb.recordset")
	  ors_sta.open sql_sta,conn,1,3
	  If Not ors_sta.eof then
response.write " ("&ors_sta("major_name")&")</td>"
		End if

Response.write "<td align=center>"
	Response.write ors_o("noofreport")&"<td align=center>"&ors_o("date_begin")&"/"&ors_o("month_begin")&"/"&ors_o("year_begin")&"-"&ors_o("date_end")&"/"&ors_o("month_end")&"/"&ors_o("year_end")&"<td align=center>"

If ors_o("id_status")="1" Then
status_t="�Դ"
Else status_t="Close"
End if
Response.write status_t
		Response.write "<td align=center>"
		'If ors_o("id_status")="1" Then
		Response.write  "[<a href=edit_thesis_progress_form.asp?id="&ors_o("id_progress_report")&">Edit</a>]"

'End if
		Response.write  "[<a href=detail_thesis_progress1.asp?id="&ors_o("id_progress_report")&">Detail</a>]"
%>
		<td align=center>
<form name="form2" method="post" action="preview_thesis_progress.asp">
<input type="submit" name="Submit" value="View"> 
<input type="hidden" name="id" value=<%=ors_o("id_progress_report")%>> 
</form>
<%
		ors_o.movenext
		Loop
Else 
Response.write "<tr><td colspan=6>no plan"
End if
		%>
			    
              </tr>
            
          </div></td>
       
      </tr></table>

<br>

<%	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: thesis_progress.asp