File Manager
Back to List
| Current Directory: ~/
Editing: qe_search_stu.asp
Full path: C:\ict\ICT\qe_search_stu.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!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"> </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" --> <div align="center"> <p>�š�ä��ҹ��Ե���ŧ����¹�ͺ QE</p> <p><TABLE><% search_name=request.form("keyword1") type_search=request.form("type_search") idc=request.form("idc") idq=request.form("idq") if type_search="2" then sqlname="select * from student where sur_stu like '%"&search_name&"%'" 'response.write sqlname set orsname=server.CreateObject("adodb.recordset") orsname.open sqlname,conn,1,3 elseif type_search="1" then sqlname="select * from student where name_stu like '%"&search_name&"%'" 'response.write sqlname set orsname=server.CreateObject("adodb.recordset") orsname.open sqlname,conn,1,3 elseif type_search="3" then sqlname="select * from student where id_stu like '%"&search_name&"%' and id_status_edu=1" 'response.write sqlname set orsname=server.CreateObject("adodb.recordset") orsname.open sqlname,conn,1,3 end if if not orsname.eof then %> <TR> <TD div align="center" bgcolor="#FFCCFF">����</TD> <TD div align="center" bgcolor="#FFCCFF">����-ʡ��</TD> <TD div align="center" bgcolor="#FFCCFF">���</TD> <TD div align="center" bgcolor="#FFCCFF">ŧ����¹</TD> </TR> <% orsname.movefirst do while not orsname.eof response.write "<tr>" response.write "<td>" response.write "[<a href=detail_stu.asp?id_stu="&orsname("id_stu")&">"&orsname("id_stu")&"</a>]" response.write "<td>" response.write orsname("name_stu")&" "&orsname("sur_stu") response.write "<td>" 'response.write orsname("id_stugroup") '�������������´��� sql_all="select * from student_group where id_stugroup='"&orsname("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 response.write ors_curri("curriculum_full")&" " end if 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") end if %> <input name="submit" type="submit" id="submit" value="Go"> <% else response.write "<tr><td colspan=6>��辺�����ŷ�����<br>"&search_name end if response.write "</TABLE>" %></p> </div> <!-- 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>