File Manager

<!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">

</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">SWU</a> | <a href="http://bsri.swu.ac.th">BSRI</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> 
    <%
'*****************************************************************

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

<%
'*****************************************************************
response.write session("id_lecturer1")
response.write id_lecturer
  if session("tb_preview") <> 1 and session("tb_edit")<>1 then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ

%>
    <td width="892" align="left" valign="top"><div align="center">
	<%if session("tb_edit")=2 then%>
	[<a href=indexadvisor.asp>�ʴ������š���繷���֡��</a>]
	<%end if%><br><br><div align="center"><strong> ���������š���繷���֡��
	<form name="form1" method="post" action="add_advisor.asp">

<tr> 
              <td><div align="right">���͡��������Ե</div></td><td>
			  <select name="id_stugroup">
<% 
			  set ors4=server.createobject("adodb.recordset")
	 sql4="select * from student_group order by id_begin_year desc"
	 ors4.open sql4,Conn,1,3
	ors4.movefirst
	if not ors4.eof then
	do while not ors4.eof
		'aaaaa
		'sqls="select * from student_group "
	'set orss=server.createobject("adodb.recordset")
	'orss.open sqls,conn,1,3
	'if not orss.eof then

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"<option value="&ors4("id_stugroup")&">"&orsc("curriculum_sum")&" "&orst("type_curri_th")&" ��� "&ors4("no_stugroup")&"</option>"				
		   end if
end if
'end if
		'response.write "<option value="&ors4("id_stugroup")&">"&ors4("id_stugroup")&"</option>"
		ors4.movenext
		loop
		end if
		%>
			  </select>
			  
            </tr>
		<tr> 
              <td><div align="right">�ա���֡��</div></td><td>
			  <select name="id_year">
<% 
mydate=date
myyear=year(mydate)

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

do while i<26
	%>
		<option <%
		if yearbegin=myyear then 
		%>
		value=<%=myyear%>
		selected
		<%else%>
		value=<%=yearbegin%>
		<%end if%>>
		<%=yearbegin%>
		</option>
		<%i=i+1
	yearbegin=yearbegin+1
		loop
		%>
			  </select>
			  <%
			  sql_lec="select * from lecturer"
			set ors_lec=server.createobject("adodb.recordset")
			ors_lec.open sql_lec,conn,1,3
			      if not ors_lec.eof then
				  response.write "<tr><td><div align=right>���͡�Ҩ�������͹<td><select name=id_lecturer>"
				  ors_lec.movefirst
				  do while  not ors_lec.eof
				  response.write "<option value="&ors_lec("id_lecturer")&">"&ors_lec("name_lec")&"    "&ors_lec("sur_lec")&"</option>"
				  ors_lec.movenext
				  loop
				  response.write "</select></td></tr>"
				  else
				  response.write "<tr><td>No Lecturer</td></tr>"
				  end if
			  %>
	  
            </tr>
           
            <tr>
              <td>&nbsp;</td><td><input type="submit" name="Submit" value="Submit" >
                <input type="reset" name="Submit2" value="Reset"></td></tr>
          </table>
      </form>
	    <%	else '���Է�
	response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��"
response.write "<meta http-equiv=refresh content =4;url=javascript:history.back();>" '���Է�
	end if '���Է�
%>
      </div></td>
    
  </tr>
 
</table>

File Manager

Editing: add_advisor_form.asp.bak