<%
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
安卓手机一枚 15图3 射频芯片翻开某个网页,此刻数据被BurpSuite截获,从截获的数据中能够看到,“?id=25”这类信息都是以get方法提交的。 这样的选手一般自称“搅屎...
Step 1提交账号恳求:a、白名单and (select count(username) fromadmin)>0* 2 /usr/bin/ruby1.9.2 400 man...
你知道目前最赚钱的网络商机是什么吗?其中,网络直播不仅可以现场卖货,还可以在直播中获得奖励。很多女主播为了获得高额报酬而直播。不过前几天有报道称,这种高额奖励不会再有了,对于网络直播的高额奖励也是...
除了大的莹光紫蓝色,实际上也是有三种柔软而与众不同的色彩尤其合适夏天穿。 桃子色 最开始,它是下面的色彩。感觉掌握吗?这类色彩有很多名字,比如大丽花和干玫瑰花,大家都很掌握。还有一个名字叫...
本文目录一览: 1、黑客帝国到底在讲什么?里面好多情节我都看不懂 2、为什么很多人吐槽说看不懂《黑客帝国》这部电影呢? 3、黑客帝国看不懂 4、《黑客帝国》到底说了什么内容,我怎么看的不太...
文|淘妈 然然和老公备孕一年后发现怀孕了,当时是大姨妈很长时间没有来,她用验孕棒测试的,显示的是两道红杠。但是她觉得还是去医院在检查一下比较放心,没想到去了医院听到却是不幸的消息。不是然然没有怀孕,...