editmsg.asp

流溪网络办公系统：管理员： 用户名:admin 密码：

<!--#include file="menu.asp" -->
      </td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td class="fontsize04">　</td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr> 
      <td height="30" bgcolor="#6699FF">　　<span class="fontsize14"><%=user_name%>，你好！欢迎使用留溪网上传文系统。你现在可以修改已发送的信息！</span></td>
      <td width="40" bgcolor="#6699FF"><div align="center"><a href="list.asp?pageno=<%=pageno%>" class="fontsize14wu" onMouseOver="window.status='';return true"><strong><font color="#FF0000">返回</font></strong></a></div></td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td class="fontsize04">　</td>
    </tr>
  </table>
<%str="select * from woa where id="&edit_id&""
  set rs=conn.execute(str)
  old_bt=rs("标题")
  old_nr=rs("内容")
    old_nr=replace(old_nr,"<br>",chr(13))
  old_jsr=rs("接收者")
  old_fjs=rs("附件数")
  old_fjsm=replace(rs("附件说明")," ","")
  old_fjname=replace(rs("附件")," ","")
  old_userall=rs("所有人")
  rs.close
  %>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelrb">
    <tr>
      <td bgcolor="#6699FF"><table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td class="fontsize10">　</td>
          </tr>
        </table>
        <table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><form name="form2" method="post" action="editmsg.asp?doing=rejsr&edit_id=<%=edit_id%>&list=all">
                <table width="740" border="1" align="center" cellpadding="2" cellspacing="0" borderColorLight="#000000" borderColorDark="#ffffff">
                  <tr> 
                    <td width="16" align="center" valign="middle" bgcolor="#99CCFF"> 
                      <p class="fontsize14">接</p>
                      <p class="fontsize14">收</p>
                      <p class="fontsize14">人</p></td>
                    <td width="710" valign="top" bgcolor="#99CCFF" class="fontsize14h20wu"><table width="100%" border="0" align="center" cellpadding="3" cellspacing="0">
                        <tr> 
                          <td><input name="usr_all" type="checkbox" id="usr_all" value="1" <%if old_userall="1" then%>checked<%end if%>> 
                            <span class="fontsize14">所有人　　　<font color="#FF0000">若选所有人接收信息，则下面不用再选择。</font>　　　　　　　　　　 
                            <%if list<>"all" then%>
                            <a href="editmsg.asp?list=all&edit_id=<%=edit_id%>" class="fontsize14wu" onMouseOver="window.status='';return true">显示所有人名单</a> 
                            <%else%>
                            <a href="editmsg.asp?edit_id=<%=edit_id%>" class="fontsize14wu" onMouseOver="window.status='';return true">关闭所有人名单</a> 
                            <%end if%>
                            </span></td>
                        </tr>
                      </table>
                      <%str="select * from woa_bumeng"
		  set rs=conn.execute(str)
		  if not rs.eof then
		  m=0%> <table width="100%" border="0" align="center" cellpadding="3" cellspacing="0">
                        <tr> 
                          <%do while not rs.eof%>
                          <td width="14%"> <input name="sele_bumeng" type="checkbox" id="sele_bumeng" value="<%=rs("部门")%>"> 
                            <span class="fontsize14"><%=rs("部门")%></span></td>
                          <%rs.movenext
			   m=m+1
			     if m mod 7=0 then response.write "</tr><tr>"
			   loop%>
                        </tr>
                      </table>
                      <%end if
		  rs.close%> <%str="select * from woa_zhuwu"
		  set rs=conn.execute(str)
		  if not rs.eof then
		  m=0%> <table width="100%" border="0" cellspacing="0" cellpadding="3">
                        <tr> 
                          <%do while not rs.eof%>
                          <td width="14%"> <input name="sele_zhuwu" type="checkbox" id="sele_zhuwu" value="<%=rs("职务")%>"> 
                            <span class="fontsize14"><%=rs("职务")%></span></td>
                          <%rs.movenext
			   m=m+1
			     if m mod 7=0 then response.write "</tr><tr>"
			   loop%>
                        </tr>
                      </table>
                      <%end if
		  rs.close%> <table width="100%" border="0" cellspacing="0" cellpadding="3">
                        <tr> 
                          <td class="fontsize14">指定接收人： 
                            <input name="sure_user" type="text" class="inputtext" id="sure_user" size="40">
                            请输入收文人姓名，多人以半角的“|”符号隔开。</td>
                        </tr>
                      </table>
                      <%if list="all" then%> <%str="select 姓名,部门 from user_teacher order by "&jsrx&""
		  set rs=conn.execute(str)
		    if not rs.eof then
			m=0%> <table width="99%" border="0" align="center" cellpadding="1" cellspacing="0">
                        <tr> 
                          <%do while not rs.eof%>
                          <td width="14%"><input name="sele_name" type="checkbox" id="sele_name" value="<%=rs("姓名")%>" <%if instr(old_jsr,"|"&rs("姓名")&"|") then%>checked<%end if%>> 
                            <span class="fontsize12h20"><%=rs("姓名")%>(<%=left(rs("部门"),1)%>)</span></td>
                          <%rs.movenext
				  m=m+1
				    if m mod 7=0 then response.write "</tr><tr>"
				  loop%>
                        </tr>
                      </table>
                      <%end if%> <%rs.close%> <%end if%> </td>
                  </tr>
                  <tr> 
                    <td height="30" colspan="2" align="center" valign="middle" bgcolor="#99CCFF" class="fontsize14"><input name="Submit4" type="submit" class="inputbox" value="修改接收人">
                      　　　　　　　　
                      <input name="Submit5" type="reset" class="inputbox" value=" 重 选 "></td>
                  </tr>
                </table>
              </td></form>
          </tr>
          <tr> 
            <td><form name="form1" LANGUAGE="javascript" onsubmit="return form1_onsubmit()" method="post" action="editmsg.asp?doing=sendto&edit_id=<%=edit_id%>">
                <table width="500" border="0" cellspacing="0" cellpadding="0">
                  <tr> 
                    <td class="fontsize04">　</td>
                  </tr>
                </table>
                <table width="740" border="1" align="center" cellpadding="2" cellspacing="0" borderColorLight="#000000" borderColorDark="#ffffff" bgcolor="#99CCFF">
                  <tr> 
                    <td width="40" class="fontsize14"><div align="center">主题</div></td>
                    <td width="706"><div align="center"> 
                        <input name="zt" type="text" class="inputtext" id="zt" value="<%=old_bt%>" size="112">
                      </div></td>
                  </tr>
                  <tr> 
                    <td valign="top" class="fontsize14"> <div align="center">内容</div></td>
                    <td><div align="center"> 
                        <textarea name="nr" style="font-family:宋体;font-size:12px" cols="110" rows="20" id="nr"><%=old_nr%></textarea>
                      </div></td>
                  </tr>
                  <tr> 
                    <td valign="top" class="fontsize14"> <div align="center"> 
                        <p class="fontsize14h20">附件</p>
                      </div></td>
                    <td height="30"> <%if old_fjs>0 then %> 
                      <table width="98%" border="0" align="center" cellpadding="2" cellspacing="0">
                        <tr> 
                          <td height="20"><table width="100%" border="0" cellspacing="0" cellpadding="2">
                              <%for m=1 to old_fjs
			     temp1=mid(old_fjsm,1,instr(old_fjsm,"|")-1)
				 old_fjsm=mid(old_fjsm,instr(old_fjsm,"|")+1)
				 temp2=mid(old_fjname,1,instr(old_fjname,"|")-1)
				 old_fjname=mid(old_fjname,instr(old_fjname,"|")+1)
			%>
                              <tr> 
                                <td width="90%" height="24">　　<a href=<%=temp2%> target="_blank" class="fontsize12" onMouseOver="window.status='';return true"><%=temp1%></a></td>
                                <td width="10%"><div align="center" class="fontsize12wu"><a href=editmsg.asp?doing=delefj&delefile=<%=temp2%>&edit_id=<%=edit_id%>&defjsm=<%=temp1%>>删除附件</a></div></td>
                              </tr>
                              <%next%>
                            </table></td>
                        </tr>
                      </table>
                      <%end if%> <table width="600" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td class="fontsize04">　</td>
                        </tr>
                      </table>
                      　　　　　　 
                      <input type="button" name="Submit2" class="inputbox" value="上传附件" style="font-size: 9pt;cursor:hand" onclick="javascript:upload1()" title="选择上传文件">
                      <strong><font color="#FF0000"><span class="fontsize12"> 
                      　　上传附件后须点击“修改信息”才会显示附件信息。 </span></font></strong><font color="#FF0000"><span class="fontsize12"> 
                      </span></font> 
                      <table width="600" border="0" cellspacing="0" cellpadding="0">
                        <tr> 
                          <td class="fontsize04">　</td>
                        </tr>
                      </table></td>
                  </tr>
                  <tr> 
                    <td height="40" colspan="2" class="fontsize14"><div align="center"> 
                        <input name="Submit" type="submit" class="inputbox" value=" 修改信息 ">
                        　　　　　　 
                        <input name="Submit3" type="reset" class="inputbox" value=" 重填信息 ">
                      </div></td>
                  </tr>
                </table>
              </td></form>
          </tr>
        </table>
        <table width="600" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td class="fontsize10">　</td>
          </tr>
        </table></td>
    </tr>
  </table>
  <table width="760" border="0" cellpadding="0" cellspacing="0" class="tablelr">
    <tr>
      <td class="fontsize04">　</td>
    </tr>
  </table>
  <table width="760" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td><!--#include file="bottom.asp" --></td>
    </tr>
  </table>
</div>
</body>
</html>