File Manager

<script language="javascript">	
		function doSubmit()
{
	
if( document.form1.keyword1.value == "" )
	{
		alert("��سҡ�͡���Ӥѭ")
		document.form1.keyword1.focus()
			return false;
	}
if( document.form1.keyword2.value == "" )
	{
		alert("��سҡ�͡���Ӥѭ")
		document.form1.keyword2.focus()
			return false;
	}
if( document.form1.keyword3.value == "" )
	{
		alert("��سҡ�͡���Ӥѭ")
		document.form1.keyword3.focus()
			return false;
	}

}
		</script>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874" />
<title>��ǹ���Ŵ �ҹ�Ԩ��ʶҺѹ�Ԩ�¾ĵԡ�����ʵ�� (BSRI) Behavioral Science Research Institute</title>
</head>

<input type="reset" name="Submit2" value="Reset"></td></tr>
          </table>
      </form>--> 
<%

id=request("id_thesis")			'			
datek1=now
m=Month(date)
cm=Len(m)
	If cm=1 Then
		m="0"&""&m
	End if
d=day(Date)
	cd=Len(d)
	If cd=1 Then
		d="0"&""&d
	End if
y=year(date)+543
ddd=y&""&m&""&d
	keyw=session("kw")
sqldata="insert into keywords_Lthesis(id_thesis,kw,datek1,ddd)  values('"&id&"','"&keyw&"','"&datek1&"','"&ddd&"')"

set orsdata = Server.CreateObject("adodb.recordset")
 orsdata.open sqldata,conn,1,3
 	
sqla="select * from thesis where id_thesis='"&id&"'"
	set orsa=server.createobject("adodb.recordset")
	 orsa.open sqla,conn,1,3
response.write sqla

response.redirect "http://bsris.swu.ac.th/thesis/"&orsa("full_thesis")
							
	
	
conn.close
%>
</body>
</html>

File Manager

Editing: hitc_fullthesis.asp