📄 g_lostshedit.asp

📁 一个很好的在线购物系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页








<!--#include file="../include/Pubconn.asp"-->
<!--#include file="../include/PubFun.asp"--> 
<% username=Getuser()%>
<%

'*******************************
'
'Author:Ruphi Update Time:2001-09-20
'功能说明：执行中审核输入处理
'
'* *****************************

%>
<%
'从另一个表单传来的值
Sid=request("sid")   '业务员代号
wid=request("wid")       '周次
                                                      
set rssh=server.createobject("ADODB.RecordSet")
sql="select * from G_TblclRemark  where AssessorID='"&Session("UserID")&"' and StuffNum='"&sid&"' and  CloseMonth='"&wid&"'"
rssh.open sql,Pubconn,1,3 
if rssh.eof then    '表示该当前登录人还没有审核
   sftg="N"
   shpy=""
else
   sftg=rssh("LostYN")
   shpy=rssh("AssRemark")
end  if 
rssh.close
set rssh=nothing

txtremark=request("txtremark")
tgf=request("tgf")
'response.write txtshr&"+"
'response.write txtremark&"+"
'response.write tgf&"<br>"

if request("bc")="保存" then
 
   '以下对子表的操作
   set rssh=server.createobject("ADODB.RecordSet")
   sql="select * from G_TblclRemark where AssessorID='"&Session("UserID")&"' and StuffNum='"&sid&"' and  CloseMonth='"&wid&"'" 
   rssh.open sql,Pubconn,1,3 
  
   if rssh.eof then   
      rssh.Addnew     '新增一条审核
      rssh("StuffNum")=sid
      rssh("CloseMonth")=wid
      rssh("AssessorID")=Session("UserID")
      rssh("LostYN")=tgf
      rssh("AssRemark")=txtRemark
      rssh.update
   else              '修改审核意见
      rssh("LostYN")=tgf
      rssh("AssRemark")=txtRemark
      rssh.update
   end if 
   rssh.close
   set rssh=nothing
   
  
 
  set rsp=server.createobject("ADODB.RecordSet")
  mysql="Select * from G_TbllostReport  where StuffNum='"&sid&"' and CloseMonth='"&wid&"' and AuditingYN<>'Y'"
  rsp.open mysql,pubconn,1,3
  if not rsp.eof then
     for m=1 to rsp.RecordCount
        if tgf="Y"  then
           rsp("AuditingYN")="Y"
        else
           rsp("AuditingYN")="YN"
        end if 
        rsp.update
        rsp.movenext
     next
  end if 



      
   response.write "<br><br><center>审核完成，<a href=javascript:history.go(-1)>返回</a></center>"      
   response.end
end if     '保存完毕      %>    
                                                                                   
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title><link href="../cread.css" rel="stylesheet" type="text/css">
</head>
                                                                                                                  
<body bgcolor="#FFFFFF" >                                                   

　
                                                                                                                  
 <table border="0" cellpadding="0" cellspacing="0" width="100%">
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -