File Manager

id_course=request.form("id_course")
id_lecturer=request.form("id_lecturer")
id_schedule=session("id_schedule")
response.write id_schedule
datetime=now
  %>
<%
'*****************************************************************

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

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

sql_data="select * from course_schedule2 where id_course='"&id_course&"' and id_lecturer='"&id_lecturer&"' and id_schedule='"&id_schedule&"'"
	 set ors_data=server.createobject("adodb.recordset")
	 ors_data.open sql_data,conn,1,3

if  not ors_data.eof  then

%>
				
<SCRIPT LANGUAGE="JavaScript">
<%
'response.write "���ʫ��"&id_lecturer
		response.write"alert('�ѹ�֡�����ū��');"
		response.write "window.location.href='add_schedule1.asp?id_schedule="&id_schedule&"';"
%>
		-->
		</SCRIPT>
		
		<%
else
								sqlid="select * from course_schedule2 order by id asc"
									set orsid=server.createobject("adodb.recordset")
									orsid.open sqlid,conn,1,3

if  not orsid.eof  then
								orsid.movelast
								id=cint(orsid("id"))+1
						
								end if
  sqldata="insert into course_schedule2(id_course,id_lecturer,id_schedule,id,datetime)  values('"&id_course&"','"&_
  id_lecturer&"','"&id_schedule&"','"&id&"','"&datetime&"')"

set orsdata = Server.CreateObject("adodb.recordset")
 orsdata.open sqldata,conn,1,3
 '�óշ�� course_schedule1 ��ѹ�֡����Ԫҹ������� ��ᵡ��ҧ�ҡ course_schedule2 �кѹ�֡�繤� � �������Ԫҵ�������� �ѹ�֧�������� �����ʹ�
sqlcsch1="select * from course_schedule1 where id_course='"&id_course&"' and id_schedule='"&id_schedule&"'"
set orscsch1=server.createobject("adodb.recordset")
orscsch1.open sqlcsch1,conn,1,3
if orscsch1.eof then
							  sql_schedule1="insert into course_schedule1(id_course,id_schedule,id_status)  values('"&id_course&"','"&id_schedule&"','1')"

set ors_schedule1 = Server.CreateObject("adodb.recordset")
							ors_schedule1.open sql_schedule1,conn,1,3
end if
'response.write sql_schedule1&"<br>"
'response.write sqldata
response.write "<meta http-equiv='refresh' content ='0;url=add_schedule1.asp?id_schedule="&id_schedule&"'>"
end if

'set conn = nothing

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

File Manager

Editing: add_course_lec_sche.asp.bak