File Manager

<%
'*****************************************************************

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

<%
'*****************************************************************
  if session("tb_edit") <> 1  then '���Է��� �����㹰ҹ ��� ����Ңͧ�������ͧ

%>
<form  name="form1"  Action = "detail_thesis_progress.asp" method="post">
<%

noofreport=request.form("noofreport")
year_edu=request.form("year_edu")
semeter=request.form("semeter")
  id_curriculum = request.form("id_curriculum") 
  id_type_curri=request.form("id_type_curri")
  id_major = request.form("id_major") 
  datebegin = request.form("datebegin") 
date_plan_end=request.form("date_plan_end")
d_plan_end=Left(date_plan_end,2)
m_plan_end=mid(date_plan_end,4,2)
y_plan_end=right(date_plan_end,4)
date_plan_end=y_plan_end+m_plan_end+d_plan_end
date_begin=left(datebegin,2)
month_begin=mid(datebegin,4,2)
year_begin=right(datebegin,2)
year_b4=right(datebegin,4)
datebegin=year_begin+month_begin+date_begin
year_edu=request.form("year_edu")
    dateend = request.form("dateend") 
date_end=left(dateend,2)
month_end=mid(dateend,4,2)
year_end=right(dateend,2)
year_e4=right(dateend,4)
dateend=year_end+month_end+date_end
detailprogress=request.form("detailprogress")
id_staff=session("id_staff1")

'id_status =  request.form("id_status_lec") 
   ' bdate_lec = request.form("bdate_lec") 
	'bmon_lec=request.form("bmon_lec")
'byear_lec=request.form("byear_lec")
  ' bd_lec=bdate_lec&"/"&bmon_lec&"/"&byear_lec
Response.write datebegin
  %>

<%
sql_data="select * from progress_report_thesis order by id_progress_report"
	 set ors_data=server.createobject("adodb.recordset")
	ors_data.open sql_data,conn,1,3

if  not ors_data.eof  Then
				ors_data.movelast
		id_progress_report=ors_data("id_progress_report")+1
				%>
<!--<SCRIPT LANGUAGE="JavaScript">
<%

'response.write"alert('"&id_lecturer&"�ѹ�֡���ʫ��');"
		'response.write "window.location.href='add_lec_form.asp';"
%>
		
		</SCRIPT>-->
		
		<%
''else

sqldata="insert into progress_report_thesis(id_progress_report,noofreport,semeter,id_curriculum,id_type_curri,id_major, datebegin,date_begin,month_begin,year_begin,dateend,date_end,month_end,year_end,detailprogress,year_edu,id_status,id_staff,date_plan_end,d_plan_end,m_plan_end,y_plan_end) values("&id_progress_report&",'"&noofreport&"','"&semeter&"','"&id_curriculum&"','"&id_type_curri&"','"&id_major&"','"&datebegin&"','"&date_begin&"','"&month_begin&"','"&year_b4&"','"&dateend&"','"&date_end&"','"&month_end&"','"&year_e4&"','"&detailprogress&"','"&year_edu&"','1','"&id_staff&"','"&date_plan_end&"','"&d_plan_end&"','"&m_plan_end&"','"&y_plan_end&"')"

set orsdata = Server.CreateObject("adodb.recordset")
 orsdata.open sqldata,conn,1,3
response.write sqldata
response.write "<meta http-equiv='refresh' content ='0;url=detail_thesis_progress1.asp?id="&id_progress_report&"'>"
end if

'set conn = nothing

</FORM>

<%	else '���Է�
	response.write "<tr><td colspan=3><center>�س������Է����� �س���ѵԹ��"
response.write "<meta http-equiv=refresh content =3;url=javascript:history.back();>" '���Է�
	end if '���Է�
%>

File Manager

Editing: add_thesis_progress.asp