Editing: info4stu/add_snews.asp.bak

<!--#INCLUDE FILE="Connectdb.asp"--> <!--#INCLUDE FILE="chk_login.asp"--> <% id_member=session("id_member1") mnews=request.form("mnews") id_in=session("idin") response.write (id_member) response.write (smnews) date_mo=now a=len("mmnews") 'response.write (a) 'if a<250 then sqlnews="select * from info_snews" set orsnews=server.createobject("adodb.recordset") orsnews.open sqlnews,conn,1,3 if not orsnews.eof then orsnews.movelast id_snewss=orsnews("id_snews") 'response.write "<br>"&id_infonews&"bb" id_snewss=id_snewss+1 else id_snewss=1 end if response.write "<br>"&id_snewss&"bb" sqldata="insert into info_snews(id_infonews,id_snews,id_member,snews,sdatetimestamp) values('"&id_in&"','"&id_snewss&"','"&id_member&"','"&mnews&"','"&date_mo&"')" 'sqldata="update info_news set id_member='"&id_member&"',datetimestamp='"&date_mo&"',id_infonews='"&id_infonewss&"',infonews='"&mnews&",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=reply_news.asp?idnews="&id_in&"'>" %>