| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 667 人关注过本帖
标题:[请教]如何实现文件转发
取消只看楼主 加入收藏
craft001wen
Rank: 2
等 级:论坛游民
帖 子:242
专家分:62
注 册:2006-5-4
收藏
 问题点数:0 回复次数:0 
[请教]如何实现文件转发

如何才能实现文件的转发?就像邮件的收件箱,可以转发邮件,转发的只是副本。
各位帮帮忙,谢谢 啦!!!

我有二个表:receivefile 和 sendfile
转发的代码如下:
<table>
<tr>
<td width="114" height="28" align=center background="../img/img/filebg.gif"><font color="#ffffff">呈报人</font></td>
<td width="120" align=center background="../img/img/filebg.gif"><font color="#ffffff">呈报人部门</font></td>
<td width="118" align=center background="../img/img/filebg.gif"><font color="#ffffff">部门主管签字</font></td>
<td width="70" align=center background="../img/img/filebg.gif"><font color="#ffffff">转发</font></td>
</tr>
<form method="post" action="sendfile.asp" name="form1" >
<%
do while not rs.eof or rs.bof
%>
tr style="border:1px solid" bgcolor="216bb5">
<td height="28" align=center style="border:1px solid">
<a href="showsignfile.asp?id=<%=rs("id")%>"><span class="style2"><%=rs("username")%></span></a></td>
<td align=center style="border:1px solid"><span class="style2"><%=rs("userdept")%></span></td>
<td align=center style="border:1px solid"><span class="style2"><%=rs("receivename1")%></span></td>
<td align=center style="border:1px solid">
<input type="checkbox" name="checkid" id="id" value="<%=rs("id")%>">
</td>
</tr>
</table>.
<% if request("checked")<>"" and id=request("id") then
set conn=opendb("oabusy","conn","accessdsn")
set rs1=server.createobject("adodb.recordset")
sql="insert into resignfile(username,userdept,receivename) select(username,userdept,receivename) from signfile where resenduser="&sqlstr(oabusyname)
rs1.open sql,conn,1,3
end if
%>
<table align="center">
<tr>
<td>
<select name="resenduser">
<option selected>请选择转发人</option>
<% set conn=opendb("oabusy","conn","accessdsn")
set rsname=server.createobject("adodb.recordset")
sql="select distinct name from userinf"
rsname.open sql,conn,1,1
do while not rsname.eof and not rsname.bof %>
<option><%=rsname("name")%></option>
<% rsname.movenext
loop %>
</select>
<input type="submit" name="editsignfile" value="转发" style="border:1px solid ">
</td>
</tr>
</table>

搜索更多相关主题的帖子: background ffffff center 收件箱 color 
2006-05-29 17:50
快速回复:[请教]如何实现文件转发
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.027286 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved