七天酒店入住记录多久删除(如家酒店入住记录多

访客4年前黑客工具753

<%
Dim intBillTotal, intBillType, intBillValue, dtaToday, i, strBillCode
Rem 单记录数(预备量)
intBillTotal   = request.Form("bn")
intBillTotal   = toNum(intBillTotal, 10)

intBillType   = getOperType()
intBillValue   = getOperValue()
dtaToday     = Date()

Rem ###############################################################################################
Rem ## 操作单项目

  Dim dtaBillDate, strBillUser, strBillCheckUser, strBillContent
  Dim curBillCost, curBillCostAsp, intCustID, strCustName, strPayType, intTotalNum
  Dim dtaBillYear, intBillID, intBillPlanID, strBillPlanNum
  
  Rem ## dtaBillDate 单日期, strBillUser 填表人, strBillCheckUser 提货人, intBillID 单ID
  Rem ## strBillContent 单备注, strBillCode 流水号, curBillCost 单总价(js), curBillCostAsp 单总价(asp)
  Rem ## intCustID 客户ID, strCustName 客户名称, strPayType 付款方式, intTotalNum 单 行数量
  Rem ## intBillType 单类型, intBillValue 单类型描述, intBillPlanID 计划单ID, strBillPlanNum 计划单号
  
  Rem ## 操作单日期
  dtaBillDate = RePlace(Trim(request.Form("BillDate")), ".", "-")
  If Not IsDate(dtaBillDate) Then
   oUser.gs_AddMessage "操作单日期为空"
  Else
   dtaBillDate = CDate(dtaBillDate)
   dtaBillYear = Year(dtaBillDate)
   If (oSys.CheckYearOut(dtaBillYear)) Then
    oUser.gs_AddMessage "操作单日期(" & dtaBillYear & ")超出范围"
   End If
   
   Rem #############################################################################################
   Rem ## 数据封存限制
   
   Rem #############################################################################################
  End If
  
  Rem ## 填表人
  strBillUser = Trim(request.Form("BillUser") & "")
  If strBillUser = "" Then
   oUser.gs_AddMessage "填表人为空"
  End If
  
  Rem ## 提货人
  strBillCheckUser = Trim(request.Form("BillCheckUser") & "")
  If strBillCheckUser = "" Then
   oUser.gs_AddMessage "提货人为空"
  End If

相关文章

我是一名保安是什么梗 我是一名保安爱吃小熊饼干是什么意思

昨日在微博上发生了一个很有趣的新浪微博;我是一个保安人员 爱吃小熊饼干,实际上这是一个招数是女孩们用于套路男朋友的,实际上是一句藏头诗。我是一名保安人员是什么梗 我是一名保安人员喜欢小熊饼干代表什么意...

代理加盟是什么意思,什么项目值得代理加盟!

代理加盟是什么意思,什么项目值得代理加盟!

新零售的开始,线下店开始了新机遇! 之前一直讲虚实结合一直没人听,马云喊了一句“新零售”。市场风险瞬间从线上跑到了线下!互联网纷纷开始了自己的全国扩张,要不“单点加盟”要不“城市合伙人”。互联网公司...

燃料油(新加坡燃料油行情哪里看)

  新加坡富时指数   我们公司是做入口燃料油销售生意的,需要每月一句新加坡普氏价值,来测算。   新加坡价值也就是参考180,380价值,可是这2种中每一种所交货的品质也是差异,并且也要看你的生意业...

成都理工大学一条街_榆次大学城炮点

韩综被指抄袭乘风破浪的姐姐...

Win7系统桌面文档无法删除的恢复方式

Win7系统桌面文档无法删除的恢复方式

有客户在自身的桌面放了好多个文档,結果却无法删除,这是什么原因呢?Win7系统桌面上的文档不可以删掉该如何解决?下边给大伙儿详细介绍Win7系统桌面文档无法删除的恢复方式。 难题叙述: 1、便是下...

公民身份证号码查询,在哪联系黑客,微信被盗了哪里找黑客帮忙

3 假如是管理员用户,就直接回来false,不答应其删去。 增修正查四个操作,删、改都要加这个判别。 当然,好事者能够写个脚本,添加999999个假文件,flag款式都相似,谁也不知道哪个是真...