duinfw_shcp.asp

来自「一套asp办公小软件」· ASP 代码 · 共 30 行

<% if session("name")<>"" then %>
<!--#include file="Global.asp" -->
  
   
     
<%
       
       
        set rs=server.createobject("adodb.recordset")
	    rs.Open "duinfw",conn,2,2
       
        RS.Find "id=" & request("id")
        Rs("shr")=session("yonghm")
        Rs("shyj")=request("sele1")
        Rs("shrq")=now

        Rs.update
        Rs.close
            
        Response.Write ("审核完毕!")
       
     
else %>
<P>请登录 </p>
<% end if %>
<iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>