File Manager
Back to List
| Current Directory: ~/
Editing: project_add.asp.bak
Full path: C:\ict\ICT\project_add.asp.bak
Permissions: rwx
Write test: File appears not directly writable
Current process identity: IIS APPPOOL\DefaultAppPool
<!--#INCLUDE FILE="Connectdb.asp"--> <!--#INCLUDE FILE="chk_login.asp"--> <% project_name=request.form("project_n") project_detail=request.form("project_detail") project_year=request.form("id_year") budget=request.form("budget") real_budget=request.form("real_budget") bdate=request.form("bdate") bmonth=request.form("bmonth") byear=request.form("byear") edate=request.form("edate") emonth=request.form("emonth") eyear=request.form("eyear") id_budget=request.form("id_budget") id_plan=request.form("id_plan") if bdate=1 then bdate="01" elseif date1=2 then bdate="02" elseif date1=3 then bdate="03" elseif date1=4 then bdate="04" elseif date1=5 then bdate="05" elseif date1=6 then bdate="06" elseif date1=7 then bdate="07" elseif date1=8 then bdate="08" elseif date1=9 then bdate="09" end if if bmonth=1 then bmonth="01" elseif month1=2 then bmonth="02" elseif month1=3 then bmonth="03" elseif month1=4 then bmonth="04" elseif month1=5 then bmonth="05" elseif month1=6 then bmonth="06" elseif month1=7 then bmonth="07" elseif mreceive=8 then bmonth="08" elseif month1=9 then bmonth="09" end if if edate=1 then edate="01" elseif date1=2 then edate="02" elseif date1=3 then edate="03" elseif date1=4 then edate="04" elseif date1=5 then edate="05" elseif date1=6 then edate="06" elseif date1=7 then edate="07" elseif date1=8 then edate="08" elseif date1=9 then edate="09" end if if emonth=1 then emonth="01" elseif month1=2 then emonth="02" elseif month1=3 then emonth="03" elseif month1=4 then emonth="04" elseif month1=5 then emonth="05" elseif month1=6 then emonth="06" elseif month1=7 then emonth="07" elseif mreceive=8 then emonth="08" elseif month1=9 then emonth="09" end if start_date=byear+bmonth+bdate end_date=eyear+emonth+edate date_mo=now sqlnews="select * from project" set orsnews=server.createobject("adodb.recordset") orsnews.open sqlnews,conn,1,3 if not orsnews.eof then orsnews.movelast id_project=orsnews("id_project") id_project=id_project+1 else id_project=1 end if response.write "<br>"&id_project&"bb" sqldata="insert into project(id_project,project_name,project_detail,project_year,budget,real_budget,start_date,end_date,id_budget,id_plan,date_create,id_status,bdate,bmonth,byear,edate,emonth,eyear) values('"&id_project&"','"&project_name&"','"&project_detail&"','"&project_year&"','"&budget&"','"&real_budget&"','"&start_date&"','"&end_date&"','"&id_budget&"','"&id_plan&"','"&date_mo&"','1','"&bdate&"','"&bmonth&"','"&byear&"','"&edate&"','"&emonth&"','"&eyear&"')" set orsdata=server.createobject("adodb.recordset") orsdata.open sqldata,conn,1,3 response.write sqldata 'response.write "<meta http-equiv='refresh' content ='0;url=project_detail.asp?id="&id_project&"'>" %>