File Manager

if( document.form1.name_stu.value == "" )
	{
		alert("��سҡ�͡����")
		document.form1.name_stu.focus()
			return false;
	}
if( document.form1.sur_stu.value == "" )
	{
		alert("��سҡ�͡���ʡ��")
		document.form1.sur_stu.focus()
			return false;
	}
if( document.form1.name_eng.value == "" )
	{
		alert("InputName")
		document.form1.name_eng.focus()
			return false;
	}
if( document.form1.sur_eng.value == "" )
	{
		alert("InputSurname")
		document.form1.sur_eng.focus()
			return false;
	}
	if( document.form1.nickname.value == "" )
	{
		alert("Input Nickname")
		document.form1.nickname.focus()
			return false;
	}
if( document.form1.date1.value == "" )
	{
		alert("�ѹ��͹���Դ")
		document.form1.date1.focus()
			return false;
	}

if( document.form1.tell_mobile.value == "" )
	{
		alert("��سҡ�͡�������Ѿ����Ͷ��")
		document.form1.tell_mobile.focus()
			return false;
	}
		if( document.form1.email_stu.value == "" )
	{
		alert("��سҡ�͡�����")
		document.form1.email_stu.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">
</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">
   <%
'*****************************************************************

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

<%
id_stu=request("id_stu")
'response.write session("id_stu1")
'response.write id_stu
'*****************************************************************
  if session("tb_edit") <> 1 or session("id_stu1") = id_stu then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ

<%
			id_stu=request("id_stu")
			session("id_stu1")=id_stu
			sql_edit="select * from student where id_stu='"&id_stu&"'"
			set ors_edit=server.createobject("adodb.recordset")
			ors_edit.open sql_edit,conn,1,3
			if not ors_edit.eof then
			%>
            <tr> 
              <td height="20"><div align="right">���ʻ�Шӵ��*</div></td>
              <td> <input type="text" name="id_stu" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' readonly value=<%=ors_edit("id_stu")%>></td>
			  <%
			  response.write "<td colspan=2 rowspan=10><div align=center><img src=pic_stu/"&ors_edit("pic_stu")&" width=150 height=150></td></tr>"

%>
            </tr>
            <tr> 
              <td><div align="right">���˹觷ҧ������</div></td>
              <td>
			  <select name="id_administor">
			  		<%	  set ors1=server.createobject("adodb.recordset")
	 sql="select * from administrator_position"
	 ors1.open sql,Conn,1,3
	ors1.movefirst
	do while not ors1.eof%>

<option 		<%
		if cint(ors1("id_administor"))=cint(ors_edit("id_administor")) then 
		'if ors1("id_administor")=ors_edit("id_administor") then 
		%>
		value=<%=ors_edit("id_administor")%>
		selected 
		<%else%>
		value=<%=ors1("id_administor")%>
		<% end if %>>
		<%=ors1("administor")%>
		</option>
<%		ors1.movenext
		loop
		%>
			  </select>
		
			  
			 
            <tr> 
              <td><div align="right">���˹觷ҧ�Ԫҡ��</div></td>
              <td>
			  <select name="academic">
<% 
			   set ors_p=server.createobject("adodb.recordset")
	 sqlmark_p="select * from academic_position"
	 ors_p.open sqlmark_p,Conn,1,3
	ors_p.movefirst
	do while not ors_p.eof
		%>
	           <option <%if cint(ors_p("id_academic"))=cint(ors_edit("id_academic")) then%> value = <%=cint(ors_edit("id_academic"))%> 
				selected
							<%else%>
				value =  <%=ors_p("id_academic") %><%end if%>> <%=ors_p("academic")%></option>
		<%
		ors_p.movenext
		loop
		%>
			  </select>
			  
            </tr>
	       <tr> 
              <td><div align="right">���˹���� �</div></td>
              <td>
			  <input name="other_position" maxlength= 9 value=
					<%=ors_edit("id_other_position")%>>
		
			  </input>
            </tr>
            <tr> 
              <td><div align="right">�ӹ�˹��</div></td>
			  <td>
			  <select name="preface">
<% 
			  set ors2=server.createobject("adodb.recordset")
	 sql2="select * from preface"
	 ors2.open sql2,Conn,1,3
	ors2.movefirst
	do while not ors2.eof
	%>

<option <%if cint(ors2("id_preface"))=cint(ors_edit("id_preface")) then%> value=<%=ors_edit("id_preface")%> selected
	<%else%>
	value=<%=ors2("id_preface")%><%end if%>><%=ors2("preface")%></option>
	<%
		ors2.movenext
		loop
		%>
			  </select>
			  </td>
            </tr>
            <tr> 
              <td><div align="right">����*</div></td>
              <td><TEXTAREA type="text" name="name_stu"><%=ors_edit("name_stu")%></textarea> </td>
            </tr>
            <tr> 
              <td><div align="right">���ʡ��*</div></td>
              <td><TEXTAREA type="text" name="sur_stu"><%=ors_edit("sur_stu")%></textarea> </td>
            </tr>
			 <tr> 
              <td><div align="right">Name*</div></td>
              <td><TEXTAREA type="text" name="name_eng"><%=UCase(ors_edit("name_eng"))%></textarea> </td>
            </tr>
            <tr> 
              <td><div align="right">Surname*</div></td>
              <td><TEXTAREA type="text" name="sur_eng"><%=UCase(ors_edit("sur_eng"))%></textarea> </td>
            </tr>
			<tr> 
              <td><div align="right">�������*</div></td>
              <td><input type="text" name="nickname" value=<%=ors_edit("nickname")%>> </td>
            </tr>
            
			
<tr> 
			
<%		cutday=ors_edit("bdate_stu")
			dayleft=left(cutday,2)
			'response.write dayleft
numday=Array("01","02","03","04","05","06","07","08","09","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31")
				  i=lbound(numday)
				 ' response.write numday(i)
				  %>

<td colspan="2"><div align="center">�ѹ 
                  <select name="bdate_stu">
				  <% 				  do while i<=ubound(numday)
				  %>
				  <option <% if numday(i)=dayleft then %>
				  value=<%=dayleft%> selected <%else%>
				  value=<%=numday(i)%><%end if%>><%=numday(i)%></option>
				<%  i=i+1
				  loop
				  %>
                  </select>
                  ��͹ 
				   <%
				  monthmid=mid(cutday,4,2)
				  'response.write monthmid
				  nummonth=array("01","02","03","04","05","06","07","08","09","10","11","12")
				  nummonthth=array("���Ҥ�","����Ҿѹ��","�չҤ�","����¹","����Ҥ�","�Զع�¹","�á�Ҥ�","�ԧ�Ҥ�","�ѹ��¹","���Ҥ�","��Ȩԡ�¹","�ѹ�Ҥ�")
				  ii=lbound(nummonth)
				  iii=lbound(nummonthth)%>
                  <select name="bmon_stu">
				    <%
				do while ii<=ubound(nummonth)
  %>
  <option <% if nummonth(ii)=monthmid then%>
  value=<%=monthmid%> selected <%else%>
  value=<%=nummonth(ii)%><%end if%>><%=nummonthth(iii)%></option>
  <%ii=ii+1
        iii=iii+1
		loop
	%>
                  </select>
                  �� �.�. 
				  <%
yearleft=right(cutday,4)

%>
                  <input type="text" name="byear_stu" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' value=<%=yearleft%>>
                  ����Դ</div></td>
            </tr>

<br>
			  <tr><td>������Ͷ��*<td><INPUT TYPE="text" NAME="tell_mobile" maxlength="15" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' value=<%=ors_edit("tell_mobile")%>>
			  <tr><td>�����ҹ<td><INPUT TYPE="text" NAME="tell_home" maxlength="10" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' value=<%=ors_edit("tell_home")%>>
			  <tr><td>�������<td><TEXTAREA NAME="address_stu" ROWS="4" COLS="50"><%=ors_edit("address_stu")%></TEXTAREA>
			  <tr><td>���˹觧ҹ<td><TEXTAREA NAME="work_position" ROWS="1" COLS="50"><%=ors_edit("work_position")%></TEXTAREA>
			  <tr><td>���ӧҹ<td><TEXTAREA NAME="work_place" ROWS="4" COLS="50"><%=ors_edit("work_place")%></TEXTAREA>

<option <% if cint(ors_edit("id_status_edu"))=cint(ors3("id_status_edu")) then%>
		value=<%=ors_edit("id_status_edu")%>
		selected
		<%else%>
		value=<%=ors3("id_status_edu")%>
		<%end if%>>
		<%=ors3("status_edu")%></option>
		<%
		ors3.movenext
		loop
		%>
			  </select>
			  <tr><td align="right">������֡���ѹ���
			  <%		cutday=ors_edit("d_finish_edu")
			dayleft=left(cutday,2)
			'response.write dayleft
numday=Array("00","01","02","03","04","05","06","07","08","09","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31")
				  i=lbound(numday)
				 ' response.write numday(i)
				  %><td >
 
                  <select name="d_finish_edu">
				  <% 				  do while i<=ubound(numday)
				  %>
				  <option <% if numday(i)=dayleft then %>
				  value=<%=dayleft%> selected <%else%>
				  value=<%=numday(i)%><%end if%>><%=numday(i)%></option>
				<%  i=i+1
				  loop
				  %>
                  </select>
			  ��͹
			  <%
				  monthmid=ors_edit("m_finish_edu")
				  'response.write monthmid
				  nummonth=array("00","01","02","03","04","05","06","07","08","09","10","11","12")
				  nummonthth=array("��͹","���Ҥ�","����Ҿѹ��","�չҤ�","����¹","����Ҥ�","�Զع�¹","�á�Ҥ�","�ԧ�Ҥ�","�ѹ��¹","���Ҥ�","��Ȩԡ�¹","�ѹ�Ҥ�")
				  ii=lbound(nummonth)
				  iii=lbound(nummonthth)%>
                  <select name="m_finish_edu">
				    <%
				do while ii<=ubound(nummonth)
  %>
  <option <% if nummonth(ii)=monthmid then%>
  value=<%=monthmid%> selected <%else%>
  value=<%=nummonth(ii)%><%end if%>><%=nummonthth(iii)%></option>
  <%ii=ii+1
        iii=iii+1
		loop
	%>
                  </select>
				  ��
				  <INPUT TYPE="text" NAME="y_finish_edu" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' value=<%=ors_edit("y_finish_edu")%>>
			  
            </tr>
<tr> 
              <td><div align="right">�ա���֡�ҷ�診</div></td>
              <td>
			  <select name="f_edu_semeter">
<% 
			  set orsfe=server.createobject("adodb.recordset")
	 sqlfe="select * from academic_semeter order by id_academic_semeter"
	 orsfe.open sqlfe,Conn,1,3
	orsfe.movefirst
	If Not orsfe.eof Then
	%>
	<option value=0>�Ҥ���¹</option>
	<%
	do while not orsfe.eof

'sqlc="select * from student where id_curriculum='"&ors4("id_curriculum")&"'"
	'set orsc=server.createobject("adodb.recordset")
	'orsc.open sqlc,conn,1,3
	'if not orsc.eof then
           'sqlt="select * from type_curriculum where id_type_curri='"&ors4("id_type_curri")&"'"
		   'set orst=server.createobject("adodb.recordset")
		   'orst.open sqlt,conn,1,3
		   'if not orst.eof then
		   'response.write ors4("id_stugroup")
		   'sqlma="select * from major where id_major='"&ors4("id_major")&"'"
	'Set orsma=server.createobject("adodb.recordset")
	'orsma.open sqlma,conn,1,3
	'If Not orsma.eof Then

<option <%if ors_edit("f_edu_semeter")=orsfe("id_academic_semeter") then %>
		value=<%=ors_edit("f_edu_semeter")%>
		selected
		<%else%>
		value=<%=orsfe("id_academic_semeter")%>
		<%end if%>>
		<%=orsfe("academic_semeter")%></option>
		<%
		'end If
		'End if
'end if
		orsfe.movenext
		Loop
		End if
		%>
			  </select>
			  /��
				  <INPUT TYPE="text" NAME="f_edu_year" onkeypress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' value=<%=ors_edit("f_edu_year")%>>
            </tr>
<%'end If
''''��������Ե��͡��ҵ���ͧ���¹�����ѧ
%>
            <tr> 
              <td><div align="right">��ѡ�ٵ�</div></td>
              <td><%'=session("tb_edit")%>
			  <%
'if session("tb_edit")=2 then
'�������ʵ�Ѵ���������ͧ���µ���ͧ
			  
			  %>
			  <select name="id_stugroup"
			  <%if session("tb_edit")="1" then%>
		disabled
		<%End if%>>
		
<% 
yedu=year(date)+543-8
			  set ors4=server.createobject("adodb.recordset")
	 'sql4="select * from student_group where year_edu>='"&yedu&"' order by id_type_curri, id_begin_year"
	 sql4="select * from student_group order by id_type_curri, id_begin_year"
	 ors4.open sql4,Conn,1,3
	ors4.movefirst
	'If Not ors4.eof Then
	
	do while not ors4.eof
	
id_major=ors4("id_major")
	sqlc="select * from curriculum where id_curriculum='"&ors4("id_curriculum")&"'"
	set orsc=server.createobject("adodb.recordset")
	orsc.open sqlc,conn,1,3
	if not orsc.eof then
           sqlt="select * from type_curriculum where id_type_curri='"&ors4("id_type_curri")&"'"
		   set orst=server.createobject("adodb.recordset")
		   orst.open sqlt,conn,1,3
		   if not orst.eof then
		   'response.write ors4("id_stugroup")
		   sqlma="select * from major where id_major='"&ors4("id_major")&"'"
	Set orsma=server.createobject("adodb.recordset")
	orsma.open sqlma,conn,1,3
	If Not orsma.eof Then
	
	
	%>

<option <%if ors_edit("id_stugroup")=ors4("id_stugroup") then %>
		value=<%=ors_edit("id_stugroup")%>
		selected
		<%else%>
		value=<%=ors4("id_stugroup")%>
		<%end if%>>
			
		
		
		<%'=ors4("id_stugroup")%><%=orsc("curriculum_sum")%> (<%=orsma("major_name")%>) Ẻ <%=orst("type_curri_th")%> ��� <%=ors4("no_stugroup")%>
	
		
		
		<%
		end If
		End if
end if
		ors4.movenext
		Loop
		'End if
		%>
			  </select>

</tr>
<%
sql_all="select * from student_group where id_stugroup='"&ors_edit("id_stugroup")&"' "
		set ors_all=server.createobject("adodb.recordset")
		ors_all.open  sql_all,Conn,1,3
		if not ors_all.eof Then

id_major=ors_all("id_major")
		End if
'Response.write id_major

If id_major="4" Then
%>
<tr> 
              <td><div align="right">ᢹ�</div></td>
              <td>
			  <select name="id_subgroup" >
			  
<%

set orssg4=server.createobject("adodb.recordset")
	'sql4="select * from student_group where year_edu>='"&yedu&"' order by id_type_curri, id_begin_year"
	sqlsg4="select * from student_sgroup order by id_sgroup"
	orssg4.open sqlsg4,Conn,1,3
	
	If Not orssg4.eof Then
	orssg4.movefirst

do while not orssg4.eof

<option <%if ors_edit("id_sgroup")=orssg4("id_sgroup") then %>
		value=<%=ors_edit("id_sgroup")%>
		selected
		<%else%>
		value=<%=orssg4("id_sgroup")%>
		<%end if%>>
		<%'=ors4("id_stugroup")%><%=orssg4("sgroup")%></option>
		<%
		
		orssg4.movenext
		Loop
		End if
		%>
			  </select>
			  
            </tr>
<%end If
'�Դ if id-major=4
%>

<tr> 
              <%
			response.write "<td><td><td><div align=center>[<a href=upload_stu.asp?id_stu="&id_stu&" width=150 height=150>����ٻ�Ҿ </a>]<br>(������� .jpg)</td>"	
			%>
            </tr>
            <tr>
              <td>&nbsp;</td><td><input type="submit" name="Submit" value="Save" onmousedown="doSubmit();">
                <input type="reset" name="Submit2" value="Reset"></td></tr>
          
      </form>
      </div></td>
  
  </tr>
  </table>
  </div>
  <%
  end if
  else '���Է�
	response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��"
response.write "<meta http-equiv=refresh content =2;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: edit_stu_form.asp.bak