File Manager
Back to List
|
Up to Parent Directory
| Current Directory: ~/journal
Editing: journal/add_manu.asp.bak
Full path: C:\ict\ICT\journal\add_manu.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <% id_member=session("idm") title_thai=request.form("title_thai") title_eng=request.form("title_eng") datetime=now sql="select * from manuscript" set ors=server.createobject("adodb.recordset") ors.open sql,conn,1,3 if not ors.eof then ors.movelast id_manu=ors("id_manu") id_manu=id_manu+1 else id_manu=1 end if id_status=1 sqldata="insert into manuscript(id_manu,title_thai,title_eng,datetime,id_status,id_member) values('"&id_manu&"','"&title_thai&"','"&title_eng&"','"&datetime&"', '"&id_status&"','"&id_member&"')" set orsdata = Server.CreateObject("adodb.recordset") orsdata.open sqldata,conn,1,3 response.write sqldata sqlh="insert into manu_hitstatus(id_manu,datetime,id_status) values('"&id_manu&"','"&datetime&"', '"&id_status&"')" set orsh = Server.CreateObject("adodb.recordset") orsh.open sqlh,conn,1,3 response.write "<meta http-equiv='refresh' content ='0;url=detail_member.asp'>" 'response.write "<meta http-equiv='refresh' content ='0;url=detail_member.asp?id_member="&id_member&"'>" session("idmanu")=id_manu set conn = nothing %>