File Manager
Back to List
| Current Directory: ~/
Editing: add_activity_stu.asp.bak
Full path: C:\ict\ICT\add_activity_stu.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#include file="inc_cache_control.asp"--> <!--#include file="inc_access_control.asp"--> <!--#include file="chk_login.asp"--> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html><!-- InstanceBegin template="/Templates/ict.dwt" codeOutsideHTMLIsLocked="false" --> <head> <!-- InstanceBeginEditable name="doctitle" --> <title>�к����ʹ�����͡�ú�����</title> <!-- InstanceEndEditable --> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> <!-- InstanceBeginEditable name="head" --><!-- InstanceEndEditable --> <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" /> </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"><!-- InstanceBeginEditable name="EditRegion5" --><!--#include file="chk_menu.asp"--><!-- InstanceEndEditable --></td> <td width="77%" align="left" valign="top"><!-- InstanceBeginEditable name="EditRegion3" --> <table width="100%" border="0" cellspacing="1"> <% '***************************************************************** session("tb_name")="thesis" %> <!--#include file="chk_permission.asp"--> <% '***************************************************************** if session("tb_preview") <> 1 or session("id_lecturer1") = id_lecturer then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ %><tr><td>[<a href=thesis_progress_lecturer.asp>�����Ź��Ե��§ҹ��������˹��</a>][<a href=http://bsris.swu.ac.th/thesis_progress.asp>�ͺ��§ҹ��������˹��</a>] <tr> <td width="892" align="left" valign="top"><div align="center"> <br> <form name="form1" method="post" action="add_activity_form.asp"> <table width="100%" border="0" align="center" cellpadding="3" cellspacing="0"> <tr bgcolor=#FFFFCC><td colspan=2 align=center>�ѹ�֡�Ԩ�������Ե</td></tr> <% dateactivity=request.form("dateactivity") datebegin=request.form("datebegin") dateend=request.form("dateend") id_table=request.form("id_table") activity_name=request.form("activity_name") venue_name=request.form("venue_name") d_begin=left(datebegin,2) m_begin=mid(datebegin,4,2) y_begin=right(datebegin,2) year_b4=right(datebegin,4) date_begin=year_b4+m_begin+d_begin d_activity=left(dateactivity,2) m_activity=mid(dateactivity,4,2) y_activity=right(dateactivity,2) year_a4=right(dateactivity,4) date_activity=year_a4+m_activity+d_activity d_end=left(dateend,2) m_end=mid(dateend,4,2) y_end=right(dateend,2) year_e4=right(dateend,4) date_end=year_e4+m_end+d_end 'Response.write id_major&"major<br>" 'Response.write id_curriculum&"curriculum<br>" 'Response.write id_type_curri&"id_type_curri<br>" 'response.write id_stu_group&"id_stu_group<br>" 'Response.write id_table&"id_table" date_mo=now username=session("username") 'a=request.form("id_stu_group").count 'i=1 'if a>0 then 'do while i<=a 'id_stu_group=request.form("id_stu_group")(i) 'sqlcheck1="select * from rp_table_stugroup where id_stugroup='"&id_stu_group&"' and id_table='"&id_table&"'" 'Set orscheck1=server.createobject("adodb.recordset") 'orscheck1.open sqlcheck1,conn,1,3 ' If Not orscheck1.eof Then ' i=i+1 ' End if sqlcheck="select * from rp_activity" set orscheck=server.createobject("adodb.recordset") orscheck.open sqlcheck,conn,1,3 if orscheck.eof then id=1 Else orscheck.movelast id=orscheck("id_activity")+1 End if '-------------- '�ŧ�ѹ�շ������ѹ 22-2-63 9.23�. sqldata="insert into rp_activity(id_activity,activity_name,date_activity, d_activity,m_activity,y_activity,id_table,date_begin,d_begin,m_begin,y_begin,date_end,d_end,m_end,y_end,id_status,date_create,id_staff,venue_name) values("&id&",'"&activity_name&"','"&date_activity&"','"&d_activity&"','"&m_activity&"','"&y_activity&"','"&id_table&"','"&date_begin&"','"&d_begin&"','"&m_begin&"','"&y_begin&"','"&date_end&"','"&d_end&"','"&m_end&"','"&y_end&"','1','"&date_mo&"','"&username&"','"&venue_name&"')" set orsdata = Server.CreateObject("adodb.recordset") orsdata.open sqldata,conn,1,3 response.write sqldata 'response.write request.form("id_stu_group")(i)&" checkbox value<br>" 'i=i+1 'loop 'end If %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "alert('�ѹ�֡���������º����');" %> </SCRIPT> <form name="form1" method="post" action="add_activity_form.asp"> <!--<input type="hidden" name="id_table" value=<%=id_table%>> <input type="hidden" name="id_curriculum1" value=<%=id_curriculum%>> <input type="hidden" name="id_type_curri1" value=<%=id_type_curri%>> <input type="hidden" name="id_major1" value=<%=id_major%>>--> </form> <script type="text/javascript"> document.form1.submit(); </script> <% 'esponse.write "<meta http-equiv='refresh' content ='0;url=add_criteria_edu_form.asp?id="&id_letter&"'>" %> </tr> </tr> </table> </form> <% else '���Է� response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��" response.write "<meta http-equiv=refresh content =3;url=javascript:history.back();>" '���Է� end if '���Է� %> </table> <!-- InstanceEndEditable --></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> <!-- InstanceEnd --></html>