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
		  
%>
	
	
	<%'if session("tb_edit")	= 2 then %>

<%'end if%><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")
			  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")
'Response.write 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
		'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>

<div class="templatemo-content-widget orange-bg">
                              
                <div class="media">
                  
                  <div class="media-body">
                    <h2 class="media-heading text-uppercase">ŧ����¹��������Ԩ����<%%></h2>
                    
                  </div>        
                </div>                
              </div>            
<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>ŧ����¹
<% 
date1=datepart("d",date)
			month1=month(now())
			y=year(now())
			y=543+y
y=right(y,4)
			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 rp_activity "
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_activity")
		'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("date_begin")<= dcheck and ors_status("date_end") >= dcheck Then
sql_edit_st="update rp_activity set id_status='1' where id_activity='"&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 rp_activity set id_status='0' where id_activity ='"&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
'��Ǩ�ͺʶҹТͧ�ͺ�������������������������
sqlsg="select * from rp_table_stugroup where id_stugroup ='"&id_stugroup&"' and id_status=1"
Set orssg=server.createobject("adodb.recordset")
orssg.open sqlsg,conn,1,3
	If Not orssg.eof Then
	
	 set ors_o=server.createobject("adodb.recordset")
	 sqlmark_o="select * from rp_activity where id_table='"&orssg("id_table")&"' order by date_end asc"
	 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&"><td>"&aa
		Response.write "<td>"&ors_o("activity_name")&"("&ors_o("id_table")&")"

Response.write "<td align=center>"&ors_o("d_activity")&"/"&ors_o("m_activity")&"/"&ors_o("y_activity")
Response.write "<td align=center>"&ors_o("d_begin")&"/"&ors_o("m_begin")&"/"&ors_o("y_begin")
Response.write "-"&ors_o("d_end")&"/"&ors_o("m_end")&"/"&ors_o("y_end")
If ors_o("id_status")="1" Then
status_t="�Դ"
' ����� ŧ����¹���ѧ
'����� ����������Ԩ�������ѧ
'

Else status_t="Close"
End if
Response.write "<td>"&status_t

'Response.write "<td align=center>"

'Response.write  "[<a href=edit_activity_form.asp?id="&ors_o("id_activity")&">Edit</a>]"

'Response.write  "[<a href=detail_activity.asp?id="&ors_o("id_activity")&">Detail</a>]"
%>
		<td align=center>
<form name="form2" method="post" action="register_activity.asp">
<%If ors_o("id_status")="1" Then
		sqlchsr="select * from rp_activity_register where id_stu='"&id_stu&"' and id_activity='"&ors_o("id_activity")&"'"
		Set orschsr=server.createobject("adodb.recordset")
		orschsr.open sqlchsr,conn,1,3
		If orschsr.eof then
		%>
<input type="hidden" name="id" value=<%=ors_o("id_activity")%>> 
<input type="hidden" name="id_stu" value=<%=id_stu%>> 
<input type="submit" name="Submit" value="Register"> 
<%
		End if
else%>
<input type="submit" name="Submit" value="Register" disabled> 
<%End if%>

</form>
<%
		ors_o.movenext
		Loop
Else 
Response.write "<tr><td colspan=6>no activity"
End If
End if
		%>
			    
              </tr>
            
          </div></td>
       
      </tr></table>

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