mailfjname.asp

来自「功能非常强大的一款办公自动化软件原代码,其中的文档签收功能特别实用.不相信下下来」· ASP 代码 · 共 27 行

<!--#include file="check.asp"-->
<!--#include file="connect.asp"-->
<%
maxid=0
set rs=server.createobject("adodb.recordset")
sql="select max(id) as nid from mailfj where uid like '"&session("uid")&"%'"
rs.open sql,conn,1,1
if not rs.eof then
maxid=trim(rs("nid"))
end if
rs.close

if maxid>0 then
sql="select filename,filetype from mailfj where id="&maxid
rs.open sql,conn,1,3
rs("filename")=trim(request("name"))
rs("filetype")=trim(request("type"))
rs.update
rs.close
end if

set rs=nothing
conn.close
set conn=nothing
'response.write "success"
%>