File Manager

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html>
<head>

<title>�к����ʹ�����͡�ú�����</title>
<%response.cachecontrol="private"%>


<script language="javascript" type="text/javascript">
function toggle(source){
	checkboxes=document.getElementsByName('id_staff');
	for (var j=0, n=checkboxes.length;j<n;j++){
		checkboxes[j].checked=source.checked;
	}

}
function limittext(limitfield, limitcount, limitnum){
			if(limitfield.value.length>limitnum){
			    limitfield.value=limitfield.value.substring(0,limitnum);
				}else{
				limitcount.value=limitnum-limitfield.value.length;
				}}
				</script>
<script language="javascript">	
		function doSubmit()
{
	if( document.form1.id_letter.value == "" )
	{
		alert("��سҡ�͡�Ţ�Ѻ")
		document.form1.id_letter.focus()
			return false;
	}

if( document.form1.yreceive.value == "" )
	{
		alert("��سҡ�͡�շ���Ѻ")
		document.form1.yreceive.focus()
			return false;
	}
if( document.form1.id_sent.value == "" )
	{
		alert("��سҡ�͡�Ţ���˹ѧ���")
		document.form1.id_sent.focus()
			return false;
	}
if( document.form1.y_letter.value == "" )
	{
		alert("��سҡ�͡�շ���Ѻ˹ѧ���")
		document.form1.y_letter.focus()
			return false;
	}
	if ( document.form1.originalletter.value == "" ) 
	{

alert("��سҡ�͡˹��§ҹ����͡˹ѧ���")
		document.form1.originalletter.focus()
		return false;
	}

if ( document.form1.titleletter.value == "" ) 
	{

alert("��سҡ�͡��������ͧ")
		document.form1.titleletter.focus()
		return false;
	}
			if ( document.form1.toname.value == "" ) 
	{

alert("��سҡ�͡���ͼ���Ѻ")
		document.form1.toname.focus()
		return false;
	}
	}
		</script>
		<%
		  pern=session("username")
		  per="2"
		  tb="letterin"
		  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
				
		  %>

<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">
<script type="text/javascript" src="js/jquery-1.4.4.min.js"></script>

// �óյ�ͧ�����軯ԷԹŧ��ҡ���� 1 �ѹ���˹�� ����������� Code ����÷Ѵ��ҹ��ҧ���¤�Ѻ (1 �ش = 1 ��ԷԹ)

$("#datepicker-th").datepicker({ dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay, dayNames: ['�ҷԵ��', '�ѹ���', '�ѧ���', '�ظ', '����ʺ��', '�ء��', '�����'],
              dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
              monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
              monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});

$("#datepicker-th-2").datepicker({ changeMonth: true, changeYear: true,dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay,dayNames: ['�ҷԵ��','�ѹ���','�ѧ���','�ظ','����ʺ��','�ء��','�����'],
              dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
              monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
              monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});
			
			$("#datepicker-th-3").datepicker({ changeMonth: true, changeYear: true,dateFormat: 'dd/mm/yy', isBuddhist: true, defaultDate: toDay,dayNames: ['�ҷԵ��','�ѹ���','�ѧ���','�ظ','����ʺ��','�ء��','�����'],
            dayNamesMin: ['��.','�.','�.','�.','��.','�.','�.'],
            monthNames: ['���Ҥ�','����Ҿѹ��','�չҤ�','����¹','����Ҥ�','�Զع�¹','�á�Ҥ�','�ԧ�Ҥ�','�ѹ��¹','���Ҥ�','��Ȩԡ�¹','�ѹ�Ҥ�'],
            monthNamesShort: ['�.�.','�.�.','��.�.','��.�.','�.�.','��.�.','�.�.','�.�.','�.�.','�.�.','�.�.','�.�.']});

$("#datepicker-en").datepicker({ dateFormat: 'dd/mm/yy'});

$("#inline").datepicker({ dateFormat: 'dd/mm/yy', inline: true });

});
		</script>
</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">
      <div align="center">
        <p><strong>˹ѧ������ʶҺѹ�Ԩ�¾ĵԡ�����ʵ��<br>
        [<a href="all_letterin.asp">˹ѧ��ͷ�����</a>][<a href="searchletter.asp">����˹ѧ���</a>][<a href="letterin_staff.asp">˹ѧ��������ºؤ��</a>]</strong></p>
        <form name="form1" method="post" action="add_letter.asp">
          <table width="100%" border="0" cellspacing="0">
		<tr>
              <td>��Ǵ</td>
              <td><select name="id_cate" style="font-size:16px">
                  <% 
			  set orscate=server.createobject("adodb.recordset")
	 sqlcate="select * from let_category"
	 orscate.open sqlcate,Conn,1,3
	 if not orscate.eof then
	orscate.movefirst
	do while not orscate.eof
			response.write "<option value="&orscate("id_categorylet")&">"&orscate("categorylet")&" </option>"
		orscate.movenext
		loop
		end if
		%>
                </select></td>
            </tr>
            <tr>
              <td bgcolor="#FFFFCE">������˹ѧ���</td>
              <td bgcolor="#FFFFCE"><select name="id_itletter" style="font-size:16px"	 >
                <%

'		if (document.form1.id_letter.value.length<6 || document.form1.id_letter.value.length>7)
'	{
	'		alert('��سҡ�͡�Ţ˹ѧ����繵���Ţ 6 ��ѡ xxxxxx ');
	'		document.form1.id_letter.focus();
	'		return false;
	'	}

set orsoo=server.createobject("adodb.recordset")
	 sqloo="select * from itletter"
	 orsoo.open sqloo,Conn,1,3
	 if not orsoo.eof then
	orsoo.movefirst
	do while not orsoo.eof
			response.write "<option value="&orsoo("id_itletter")&">"&orsoo("itletter")&" </option>"
	orsoo.movenext
		loop
		end if
		%>
              </select></td>
            </tr>
            <tr>
              <td>�ѵ�ػ��ʧ��˹ѧ������</td>
              <td><select name="id_typeletin" style="font-size:16px">
                  <% 
			  set orstcr=server.createobject("adodb.recordset")
	 sqltcr="select * from type_letterin"
	 orstcr.open sqltcr,Conn,1,3
	 if not orstcr.eof then
	orstcr.movefirst
	do while not orstcr.eof
			response.write "<option value="&orstcr("id_typeletin")&">"&orstcr("typeletin")&" </option>"
		orstcr.movenext
		loop
		end if
		%>
                </select></td>
            </tr>
<%								y=year(now())
									y=543+y
y2=right(y,2)
%>
            <tr>
              <td width="152" bgcolor="#FFFFCC">�Ţ����Ѻ</td>
              <td width="411" bgcolor="#FFFFCC"><input name="id_letter" size=10 type="text" id="id_letter"   style="font-size:16px"> </td>
            </tr>
            <tr>
              <td>�ѹ����Ѻ </td>
              <td><input type="text" size="15" id="datepicker-th-3" name="date2" />�к��ѹ���
			  <!--<select name="dreceive" id="dreceive" style="font-size:16px">
                <% 		'date_d=datepart("d",date)
						 ' for d=1 to 31
				  %>
                <option <% 'if date_d=d then %>
				  value=<%'=d%> selected <%'else%>
				  value=<%'=d%><%'end if%>>
                <%'=d%>
                </option>
                <%  'next
				  %>
                            </select>
                <select name="mreceive" id="select2" style="font-size:16px">
                   <%
				  ' nummonth=array(0,1,2,3,4,5,6,7,8,9,10,11,12)
				'nummonthth=array("��͹","���Ҥ�","����Ҿѹ��","�չҤ�","����¹","����Ҥ�","�Զع�¹","�á�Ҥ�","�ԧ�Ҥ�","�ѹ��¹","���Ҥ�","��Ȩԡ�¹","�ѹ�Ҥ�")
				'  ii=lbound(nummonth)
				'  iii=lbound(nummonthth)
				  
				'	m_letter=month(now())
				
				  %>
                   <%
				'do while iii<=ubound(nummonthth)
  %>
  <option <% 'if nummonth(ii)=m_letter then%>
  value=<%'=m_letter%> selected <%'else%>
  value=<%'=nummonth(ii)%><%'end if%>><%'=nummonthth(iii)%></option>
  <%'ii=ii+1
       ' iii=iii+1
		'loop
	%>
                                </select>
<%								'y=year(now())
									'y=543+y

%>
                <input name="yreceive" type="text" id="y_fcontact" onKeyPress='if (event.keyCode < 46 || event.keyCode >57 ) event.returnValue=false;' size="10" maxlength="4" value=<%'=y%> style="font-size:16px">--></td>
            </tr>
            <tr>
              <td bgcolor="#FFFFCC">�Ţ���˹ѧ���</td>
              <td bgcolor="#FFFFCC"><input name="id_sent" type="text" id="id_sent" style="font-size:16px"></td>
            </tr>
            <tr>
              <td>˹ѧ���ŧ�ѹ���</td>
              <td><input type="text" size="15" id="datepicker-th-2" name="date1" />�к��ѹ���
			  </td>
            </tr>
            <tr>
              <td>��˹���</td>
              <td><input type="checkbox" name="dued" value="1"> ��
			  <input type="text" size="15" id="datepicker-th" name="date0" />�к��ѹ���
			  </td>
            </tr>
            <tr>
              <td bgcolor="#FFFFCC">��ǹ�Ҫ�����Ңͧ˹ѧ���</td>
              <td bgcolor="#FFFFCC"><input name="originletter" type="text" id="originletter" size="60" maxlength="100" style="font-size:16px"></td>
            </tr>
            <tr>
              <td>����ͧ</td>
              <td><textarea style="font-size:16px" name="titleletter" cols="60" rows="7" id="titleletter" maxlength="250" onkeydown="limittext(this.form.titleletter,300,300);" style="font-size:16px"></textarea></td>
            </tr>
            <tr>
              <td bgcolor="#FFFFCC">���¹</td>
              <td bgcolor="#FFFFCC"><input name="toname" type="text" id="toname" value="" size="60" maxlength="50" style="font-size:16px"></td>
            </tr>

            <tr>
              <td >������</td>
              <td >
			<% 
			  '<select name="directorcommand" style="font-size:16px">
                  
			  'set orsd=server.createobject("adodb.recordset")
	 'sqld="select DISTINCT directorcommand from letterin"
	 'orsd.open sqld,Conn,1,3
	 'if not orsd.eof then
	'orsd.movefirst
	'do while not orsd.eof
			'response.write "<option value="&orsd("directorcommand")&">"&orsd("directorcommand")&" </option>"
		'orsd.movenext
		'loop
		'end if
		
                '</select>
			%>  
			  <input name="directorcommand" type="text"  size="60" maxlength="50" style="font-size:16px">
			  </td>
            </tr>  
         
            <tr bgcolor="#FFFFCC">
              <td >���������Ǣ�ͧ(ᷧ)</td>
              <td> <table> <tr bgcolor=#E6E6E6><td colspan=2><input type="checkbox" onclick="toggle(this)">���͡������</br>
			  <tr><td>
			  <%
			   set orsl=server.createobject("adodb.recordset")
			 	 sqll="select * from lecturer where statusdel = '1' order by name_lec"
	 orsl.open sqll,Conn,1,3
	 if not orsl.eof then
	orsl.movefirst
	do while not orsl.eof
			response.write "<input type=checkbox name=id_staff value="&orsl("id_lecturer")&">"&orsl("name_lec")&" "&orsl("sur_lec")&"<br>"
		orsl.movenext
		loop
		end if
		%>
		<td>
		<% 
			  set orso=server.createobject("adodb.recordset")
	 sqlo="select * from staff where statusdel = '1' order by name_st"
	 orso.open sqlo,Conn,1,3
	 if not orso.eof then
	orso.movefirst
	do while not orso.eof
			response.write "<input type=checkbox name=id_staff value="&orso("id_staff")&">"&orso("name_st")&" "&orso("sur_st")&"<br>"
		orso.movenext
		loop
		end if
		%>			
                 </table>
			  
			  </td>
            </tr>
			<tr >
              <td>��觷�����Ҵ���</td>
              <td>&nbsp;</td>
            </tr>
            <tr bgcolor="#FFFFCC">
              <td>˹ѧ���(pdf)</td>
              <td>&nbsp;</td>
            </tr>
            
            <tr>
              <td>&nbsp;</td>
              <td>&nbsp;</td>
            </tr>
            <tr>
              <td>&nbsp;</td>

<td><input type="submit" name="Submit" value="Submit" onmousedown="doSubmit();"></td>
            </tr>
          </table>
          <p>&nbsp;</p>
          <p>&nbsp;</p>
        </form>
        <p>&nbsp;</p>
        <p></p>
		<p></p>
      </div>
    </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>
		<%
		'else
		'response.write "No Permission"
		'response.write "<a href=index_academic.asp>Return</a>"
'end if

File Manager

Editing: indexletterin.asp.bak