Editing: add_rp_thesis_progress.asp

<% sqlt="select * from rp_thesis_progress where id_activity='"&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_thesis_progress set thesis_name='"&thesis_name&"', advisor_name1='"&advisor_name1&"', advisor_name2='"&advisor_name2&"', date_create='"&date_create&"' where id_activity='"&id_activity&"'" Set orst1=server.createobject("adodb.recordset") orst1.open sqlt1,conn,1,3 'Response.write sqlt1 Else sqlt1="insert into rp_thesis_progress (id_activity, thesis_name, advisor_name1, advisor_name2,id_status, date_report, d_report, m_report, y_report, date_create) values('"&id_activity&"','"&thesis_name&"','"&advisor_name1&"', '"&advisor_name2&"', '1' , '"&date_report&"','"&date1&"', '"&month1&"', '"&y&"', '"&date_create&"')" 'Response.write sqlt1 Set orst1=server.createobject("adodb.recordset") orst1.open sqlt1,conn,1,3 End if 'sqlt2="select * from thesis where id_stu='"&id_stu&"'" 'Set orst2=server.createobject("adodb.recordset") 'orst2.open sqlt2,conn,1,3 'If Not orst2.eof Then %>