Editing: rp_add_conferrence.asp

<% Response.write "bbb" '����÷��кѹ�֡ 'id_report=id_activity 'id_attend_num 'id_stu 'con_name 'date_begin 'date_end 'organizer_name 'd_begin 'd_end 'm_begin 'm_end 'y_begin 'y_end 'date_create 'vanue 'city 'country date3=left(date_present,2) month3=mid(date_present,4,2) year3_b4=right(date_present,4) date2=left(date_end,2) month2=mid(date_end,4,2) year2_b4=right(date_end,4) 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 if date2="1" then date2="01" elseif date2="2" then date2="02" elseif date2="3" then date2="03" elseif date2="4" then date2="04" elseif date2="5" then date2="05" elseif date2="6" then date2="06" elseif date2="7" then date2="07" elseif date2="8" then date2="08" elseif date2="9" then date2="09" end if if month2="1" then month2="01" elseif month2="2" then month2="02" elseif month2="3" then month2="03" elseif month2="4" then month2="04" elseif month2="5" then month2="05" elseif month2="6" then month2="06" elseif month2="7" then month2="07" elseif month2="8" then month2="08" elseif month2="9" then month2="09" end If if date3="1" then date3="01" elseif date3="2" then date3="02" elseif date3="3" then date3="03" elseif date3="4" then date3="04" elseif date3="5" then date3="05" elseif date3="6" then date3="06" elseif date3="7" then date3="07" elseif date3="8" then date3="08" elseif date3="9" then date3="09" end if if month3="1" then month3="01" elseif month3="2" then month3="02" elseif month3="3" then month3="03" elseif month3="4" then month3="04" elseif month3="5" then month3="05" elseif month3="6" then month3="06" elseif month3="7" then month3="07" elseif month3="8" then month3="08" elseif month3="9" then month3="09" end If date_present=year3_b4+month3+date3 date_begin=year_b4+month1+date1 date_end=year2_b4+month2+date2 date_create=Now() 'activiti_hours=request.form("activiti_hours") sqlt="select * from rp_conference where id_report='"&id_activity&"'" Set orst=server.createobject("adodb.recordset") orst.open sqlt,conn,1,3 Response.write "bb" Response.write sqlt If Not orst.eof Then sqlt1="update rp_conference set id_type_attend='"&id_attend_num&"', id_stu='"&id_stu&"', date_create='"&date_create&"',con_name='"&con_name&"', date_begin='"&date_begin&"', date_end='"&date_end&"', organizer_name='"&organizer_name&"',vanue='"&vanue&"',city='"&city&"',country='"&country&"',id_status='"&id_status&"',d_begin='"&date1&"',m_begin='"&month1&"',y_begin='"&year_b4&"',d_end='"&date2&"',m_end='"&month2&"',y_end='"&year2_b4&"',date_present='"&date_present&"',d_present='"&date3&"',m_present='"&month3&"',y_present='"&year3_b4&"',title_article='"&title_article&"',title_article_eng='"&title_article_eng&"' 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_conference (id_report, id_type_attend, id_stu, con_name,id_status, date_begin, date_end, d_begin, m_begin, y_begin, d_end, m_end, y_end,date_create,organizer_name, vanue,city,country,date_present,d_present,m_present,y_present,title_article,title_article_eng) values("&id_activity&",'"&id_attend_num&"','"&id_stu&"', '"&con_name&"', '"&id_status&"' , '"&date_begin&"','"&date_end&"', '"&date1&"', '"&month1&"', '"&year_b4&"', '"&date2&"', '"&month2&"', '"&year2_b4&"','"&date_create&"','"&organizer_name&"', '"&vanue&"', '"&city&"', '"&country&"','"&date_present&"','"&date3&"','"&month3&"','"&year3_b4&"','"&title_article&"','"&title_article_eng&"')" Response.write sqlt1 Set orst1=server.createobject("adodb.recordset") orst1.open sqlt1,conn,1,3 End if %>