Editing: save_edit_letter.asp.bak

<!--#INCLUDE FILE="ConnectDB.asp"--> <!--#include file="chk_login.asp"--> <% pern=session("username") per="2" tb="letterin" sqlnc="select * from tb_permission where id_staff='"&pern&"' and tb_edit='"&per&"' and tb_name='"&tb&"'" set orsnc=server.createobject("adodb.recordset") orsnc.open sqlnc,conn,1,3 if not orsnc.eof then %> <% id_typeletin=request.form("id_typeletin") id_letter=request.form("id_letter") id_sent=request.form("id_sent") dletter=request.form("dletter") mletter=request.form("mletter") yletter=request.form("yletter") mreceive=request.form("mreceive") yreceive=request.form("yreceive") dreceive=request.form("dreceive") originletter=request.form("originletter") titleletter=request.form("titleletter") toname=request.form("toname") directorcommand=request.form("directorcommand") id_itletter=request.form("id_itletter") statusletter="1" dued=request.form("dued") dued2=request.form("dued2") Response.write "dued="&dued&" dued2="&dued2 If dued2="0" Then dued="1" Else dued="0" End if 'End if duey=request.form("duey") duemonth=request.form("duemonth") duedate=request.form("duedate") if duedate=1 then duedate="01" elseif duedate=2 then duedate="02" elseif duedate=3 then duedate="03" elseif duedate=4 then duedate="04" elseif duedate=5 then duedate="05" elseif duedate=6 then duedate="06" elseif duedate=7 then duedate="07" elseif duedate=8 then duedate="08" elseif duedate=9 then duedate="09" end if if duemonth=1 then duemonth="01" elseif duemonth=2 then duemonth="02" elseif duemonth=3 then duemonth="03" elseif duemonth=4 then duemonth="04" elseif duemonth=5 then duemonth="05" elseif duemonth=6 then duemonth="06" elseif duemonth=7 then duemonth="07" elseif duemonth=8 then duemonth="08" elseif duemonth=9 then mduemonth="09" end if if dreceive=1 then dreceive="01" elseif dreceive=2 then dreceive="02" elseif dreceive=3 then dreceive="03" elseif dreceive=4 then dreceive="04" elseif dreceive=5 then dreceive="05" elseif dreceive=6 then dreceive="06" elseif dreceive=7 then dreceive="07" elseif dreceive=8 then dreceive="08" elseif dreceive=9 then dreceive="09" end if if mreceive=1 then mreceive="01" elseif mreceive=2 then mreceive="02" elseif mreceive=3 then mreceive="03" elseif mreceive=4 then mreceive="04" elseif mreceive=5 then mreceive="05" elseif mreceive=6 then mreceive="06" elseif mreceive=7 then mreceive="07" elseif mreceive=8 then mreceive="08" elseif mreceive=9 then mreceive="09" end if dbreceive=yreceive&""&mreceive&""&dreceive dued1=duey&""&duemonth&""&duedate dcreate=now usercreate=session("username") sqldata="update letterin set id_sent='"&id_sent&"',dletter="&dletter&",mletter="&mletter&",yletter="&yletter&",mreceive="&mreceive&",dreceive="&dreceive&",yreceive="&yreceive&",originletter='"&originletter&"',titleletter='"&titleletter&"',toname='"&toname&"',dbreceive="&dbreceive&",id_itletter='"&id_itletter&"',dued="&dued&",duey="&duey&",duemonth="&duemonth&",duedate="&duedate&",dued1="&dued1&" ,directorcommand='"&directorcommand&"',dedit='"&dcreate&"',useredit='"&usercreate&"',id_typeletin="&id_typeletin&" where id_letter='"&id_letter&"'" set orsdata=server.createobject("adodb.recordset") response.write sqldata orsdata.open sqldata,conn,1,3 %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "alert('�ѹ�֡���������º����');" %> </SCRIPT> <% response.write "<meta http-equiv='refresh' content ='0;url=detail_letterin.asp?id="&id_letter&"'>" 'else %> <SCRIPT LANGUAGE="JavaScript"> <% 'response.write"alert('�ѹ�֡�����ū��++ ��ҹ��ѹ�֡�����Ź�������');" 'response.write "window.location.href='indexletterin.asp';" %> --> </SCRIPT> <% 'response.write "�����ū�� " 'response.write "<meta http-equiv='refresh' content ='7;url=index.asp'>" 'end if %><% else %> <SCRIPT LANGUAGE="JavaScript"> <% response.write "window.location.href='index.html';" %> --> </SCRIPT> <% end if %>