File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/info4stu
Editing: info4stu/add_infonews.asp
Full path: C:\ict\ICT\info4stu\add_infonews.asp
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <!--#INCLUDE FILE="chk_login.asp"--> <% id_member=session("id_member1") mmnews=request.form("mnews") response.write (id_member) response.write (mmnews) date_mo=now a=len("mmnews") 'response.write (a) 'if a<250 then sqlnews="select * from info_news" set orsnews=server.createobject("adodb.recordset") orsnews.open sqlnews,conn,1,3 if not orsnews.eof then orsnews.movelast id_infonewss=orsnews("id_infonews") 'response.write "<br>"&id_infonews&"bb" id_infonewss=id_infonewss+1 else id_infonewss=1 end if response.write "<br>"&id_infonewss&"bb" sqldata="insert into info_news(id_infonews,id_member,infonews,datetimestamp,id_status,numreviews) values("&id_infonewss&",'"&id_member&"','"&mmnews&"','"&date_mo&"','1','0')" 'sqldata="update info_news set id_member='"&id_member&"',datetimestamp='"&date_mo&"',id_infonews='"&id_infonewss&"',infonews='"&mmnews&",id_status="1"' where id_contact='"&id&"'" 'response.write sqldata set orsdata=server.createobject("adodb.recordset") orsdata.open sqldata,conn,1,3 'end if response.write "<meta http-equiv='refresh' content ='0;url=index.asp'>" %>