File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/info4stu
Editing: info4stu/reply_news.asp
Full path: C:\ict\ICT\info4stu\reply_news.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<%response.cachecontrol="private"%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html><!-- InstanceBegin template="/Templates/info4stu.dwt" codeOutsideHTMLIsLocked="false" --> <head> <!-- InstanceBeginEditable name="doctitle" --> <!--#INCLUDE FILE="Connectdb.asp"--> <title>�к����ʹ�����͡�ú�����</title> <!-- InstanceEndEditable --> <meta http-equiv="Content-Type" content="text/html; charset=windows-874"> <!-- InstanceBeginEditable name="head" --> <link href="../Templates/style.css" rel="stylesheet" type="text/css"> <style type="text/css"> <!-- .style1 {font-size: small} --> </style> <!-- InstanceEndEditable --> <link href="style.css" rel="stylesheet" type="text/css"> </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/info4stu.gif"></div></td> </tr> <tr> <td colspan="2" background="../Image/bggreen.gif"><div align="right"><font size="2" face="MS Sans Serif, Tahoma, sans-serif"><strong><a href="index.asp">HOME</a> | <a href="http://www.swu.ac.th">SWU</a> | <a href="http://bsri.swu.ac.th">BSRI</a> |</strong></font></div></td> </tr> <tr> <td width="19%" align="left" valign="top" bgcolor="#CCFF99"><table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><strong>Message to..</strong></td> </tr> <tr> <td height="14" bgcolor="#CCFFCC"><img src="../Image/facebook_logo.gif" width="15" height="15"><a href="http://www.facebook.com/profile.php?id=100001056211628">Dr.Dusadee Y.</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><img src="../Image/facebook_logo.gif" width="15" height="15">Dr.Kanu Priya Mohan</td> </tr> <tr> <td bgcolor="#CCFFCC"><img src="../Image/facebook_logo.gif" width="15" height="15"><a href="http://www.facebook.com/profile.php?id=582371142">Dr.Narisara P.</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><img src="../Image/facebook_logo.gif" width="15" height="15"><a href="http://www.facebook.com/profile.php?id=120785687960475">BSRI</a></td> </tr> <tr> <td><strong>Student</strong></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=652124">Generation 6</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=550124">Generation 5</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=448124">Generation 4</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=347124">Generation 3</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=246124">Generation 2</a></td> </tr> <tr> <td bgcolor="#CCFFCC"><a href="http://bsris.swu.ac.th/info4stu/detail_stu.asp?group=145124">Generation 1</a></td> </tr> </table></td> <td width="81%" align="left" valign="top"><!-- InstanceBeginEditable name="EditRegion3" --> <span class="NewsLetterText style1"> <script language="javascript"> function Dosubmit(){ if(document.all.mnews.value!='' ){ }else { alert('��͡��ͤ������¹Ш�� '); return false; } } </script> </span> <p class="NewsLetterText style1">.Welcome <% id_infostu=session("id_infostu") id_member1=session("id_member1") response.write (id_infostu) response.write (id_member1)%> to my Project </p> <span class="NewsLetterText style1"> </span><%if id_member1<>"" then%> <div align="right" class="NewsLetterText style1">[<a href="log_out.asp">Logout</a>][<a href="info_upload.asp">UploadFile</a>] </div> <%else%> </span> <div align="right" class="NewsLetterText style1"> [<a href="login_form.asp">Login</a>]</div> <%end if%> <p class="NewsLetterText style1" ><br> <% id_in=request("idnews") sqlan="select * from info_news where id_infonews='"&id_in&"'" set orsan=server.CreateObject("adodb.recordset") orsan.open sqlan,conn,1,3 if not orsan.eof then numv=orsan("numreviews") numv=numv+1 else numv=1 end if sqln="update info_news set numreviews='"&numv&"' where id_infonews='"&id_in&"'" set orsn=server.CreateObject("adodb.recordset") orsn.open sqln,conn,1,3 response.Write"<table><tr><td colspan=2 bgcolor=#CCFFCC>News<td bgcolor=#CCFFCC>Author<td bgcolor=#CCFFCC>When<td bgcolor=#CCFFCC>Review" 'response.write id_in id_status="1" sqlall="select * from info_news where id_infonews='"&id_in&"'" set orsall=server.CreateObject("adodb.recordset") orsall.open sqlall,conn,1,3 if not orsall.eof then orsall.movefirst 'do while not orsall.eof response.write "<tr ><td>" response.write "<td width=500>"&orsall("infonews") response.write "<td>"&orsall("id_member") response.write "<td>"&orsall("datetimestamp") response.write "<td>"&orsall("numreviews")&"</tr>" idin=orsall("id_infonews") session("idin")=idin sqlre="select * from info_snews where id_infonews="&idin&"" set orsre=server.CreateObject("adodb.recordset") orsre.open sqlre,conn,1,3 if not orsre.eof then a=0 orsre.movefirst do while not orsre.eof a=a+1 'response.write "<tr><td>"&orsre("id_snews") response.write "<tr><td>" response.write "<td width=500>"&orsre("snews") response.write "<td>"&orsre("id_member") response.write "<td>"&orsre("sdatetimestamp") response.write "<td>"&orsre("snumreview") orsre.movenext loop 'response.write "<td>"&a end if chkown=orsall("id_member") ' if chkown=id_member1 then ' response.write "[<a href=edit_statinfonews.asp?id_news="&orsall("id_infonews")&">Hide</a>]" 'end if 'response.write "[<a href=reply_news.asp?idnews="&idin&">Read</a>]" response.write "<tr>" ' orsall.movenext ' Next 'loop else response.write "<tr><td colspan=5>No News</td></tr>" end if ' response.Write"<tr><td colspan=5 bgcolor=#CCFFCC align=right>All News>>" ' response.Write"<tr><td colspan=5 bgcolor=#99FFCC>Download>>" response.write "<tr><td colspan=5>" if id_member1<>"" then%> <form action="add_snews.asp" method="post" name="form" class="style1" onSubmit="return Dosubmit();"> <span class="NewsLetterText"> <label> <textarea name="mnews" cols="50" rows="3"></textarea><input class = "button" type="submit" name="�������к�2" value = "Public"> </label> ��������դ����������Թ 249 ����ѡ�ä�� </span> </form> <span class="NewsLetterText style1"> <span class="NewsLetterText style1"> <%end if%> </span> <% response.Write "</tr></table>" %> </p> <p class="style1"> <span class="NewsLetterText"> <% %> </span></p> <!-- InstanceEndEditable --></td> </tr> <tr> <td colspan="2" background="../Image/bggreen.gif"> </td> </tr> </table> </body> <!-- InstanceEnd --></html>