File Manager
Back to List
| Current Directory: ~/
Editing: rp_add_sitin.asp.bak
Full path: C:\ict\ICT\rp_add_sitin.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<% 'date_begin=request.form("date_exitexam") If date_begin="" Then date_begin ="00/00/0000" End if date1=left(date_begin,2) month1=mid(date_begin,4,2) year_b4=right(date_begin,4) if date1=1 then date1="01" elseif date1=2 then date1="02" elseif date1=3 then date1="03" elseif date1=4 then date1="04" elseif date1=5 then date1="05" elseif date1=6 then date1="06" elseif date1=7 then date1="07" elseif date1=8 then date1="08" elseif date1=9 then date1="09" end if if month1=1 then month1="01" elseif month1=2 then month1="02" elseif month1=3 then month1="03" elseif month1=4 then month1="04" elseif month1=5 then month1="05" elseif month1=6 then month1="06" elseif month1=7 then month1="07" elseif month1=8 then month1="08" elseif month1=9 then month1="09" end If date_pass=year_b4+month1+date1 date_create=Now() 'Response.write datebegin&"+"&date_exitexam&"+"&""&"" sqlt="select * from rp_sitin where id_report='"&id_activity&"'" Set orst=server.createobject("adodb.recordset") orst.open sqlt,conn,1,3 'Response.write sqlt If Not orst.eof Then sqlt1="update rp_sitin set date_begin='"&date_pass&"', d_begin='"&date1&"', m_begin='"&month1&"', date_create='"&date_create&"', y_begin='"&year_b4&"', id_status='1', summary_sitin='"&summary_sitin&"', vanue='"&vanue&"', organizer_name='"&organizer_name&"' where id_report='"&id_activity&"'" Set orst1=server.createobject("adodb.recordset") orst1.open sqlt1,conn,1,3 'Response.write sqlt1 Else sqlt1="insert into rp_sitin (id_report, date_begin, d_begin, m_begin,id_status, y_begin, date_create,summary_sitin,vanue,organizer_name) values('"&id_activity&"','"&date_pass&"','"&date1&"', '"&month1&"', '1' , '"&year_b4&"','"&date_create&"','"&summary_sitin&"','"&vanue&"','"&organizer_name&"')" Response.write sqlt1 Set orst1=server.createobject("adodb.recordset") orst1.open sqlt1,conn,1,3 End if %>