File Manager

<%
		  pern=session("usernamekm")
		  per="2"
		  tb="letterin"

if pern<>"" then
		  %>

<%
		  sqlnc="select * from km_abs"
		  set orsnc=server.createobject("adodb.recordset")
		  orsnc.open sqlnc,conn,1,3
		  if not orsnc.eof then
					orsnc.movelast
					ida=orsnc("id_abs_km")
					id_abs_km=cint(ida)+1
			else
					id_abs_km=1
		  end if
id_course_eng=request.form("id_course_eng")
id_lecturer=request.form("id_lecturer")
abs_km_name=request.form("abs_km_name")
author_km=request.form("author_km")
ipcreate=request.servervariables("remote_addr")
date_mo=now
username=session("username")
sqldata="insert into km_abs(id_abs_km,username,id_lecturer,datetime_mo,id_course_eng,abs_km_name,author_km,ipcreate,status_online)  values('"&id_abs_km&"','"&username&"','"&id_lecturer&"','"&date_mo&"','"&id_course_eng&"','"&abs_km_name&"','"&author_km&"','"&ipcreate&"','1')"
  response.write sqldata

set orsdata = Server.CreateObject("adodb.recordset")
 sqlcheck="select * from km_abs where abs_km_name='"&abs_km_name&"'"
 set orscheck=server.createobject("adodb.recordset")
 orscheck.open sqlcheck,conn,1,3
 if orscheck.eof then
 orsdata.open sqldata,conn,1,3
response.write sqldata

%>
<SCRIPT LANGUAGE="JavaScript">
<%
		response.write"alert('�ѹ�֡���������º��������');"
%>

</SCRIPT>
		<%

response.write "<meta http-equiv='refresh' content ='0;url=index_km_stu.asp'>"
else
%>
<SCRIPT LANGUAGE="JavaScript">
<%

response.write"alert('�ѹ�֡�����ū��++ ��ҹ��ѹ�֡�����Ź�������');"
		response.write "window.location.href='add_km_stu_form.asp';"
%>
	
		</SCRIPT>
		<%
end if

%><%
else
%>
<SCRIPT LANGUAGE="JavaScript">
<%

'response.write "window.location.href='index.html';"
		%>
		
		</SCRIPT>
		<%
end if

File Manager

Editing: add_km_stu.asp.bak