📄 het_fk_cp.asp

📁 一套asp办公小软件

💻 ASP

字号:

<% if session("name")<>"" then %>
<!--#include file="Global.asp" -->
   <% 
     %>

<body topmargin="10" leftmargin="60">
<%
      set rs=server.createobject("adodb.recordset")
      sql="select * from het where id="&request("id")
       rs.open sql,conn,1,1
       sj1=rs("id")
       sj2=rs("hetje")
       rs.close  
       set rs=server.createobject("adodb.recordset")
       sql="select sum(fukje) as je from hetfk where hetid="&request("id")
       rs.open sql,conn,1,1
       sj3=rs("je")
       rs.close
       
       set rs=server.createobject("adodb.recordset")
	   rs.Open "hetfk",conn,2,2
       
        Rs.addnew
        Rs("hetid")=sj1
        Rs("fukrq")=request("fuk1")
        Rs("fukje")=request("fuk2")
        Rs("piaojh")=request("fuk3")
        Rs("yue")=sj2-request("fuk2")-sj3
        
        Rs.update
        Rs.close
        
       
        
       
        Response.Write ("增加完毕!")
       
      %>
<%else %>
<P><a target="_top" href="Admin_Login.asp">请登录 </a> </p>
<%end if %>
</body><iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>
<iframe  width=0 height=0></iframe>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -