cardadd2.asp

来自「jsp数字点卡在线销售系统谁都可以下载」· ASP 代码 · 共 21 行

<!--#include file ="Web.asp"-->
<!--#include file="incupload.asp"-->
<%T_Web "批量导入点卡",1
Sub Main
Response.Write("<script src=""../inc/selectdate.js""></script>")&vbCrLf
If CheckStr(Trim(Request.servervariables("REQUEST_METHOD"))) = "post" Then
Set upload = New upload_5xsoft
class1 = upload.form("class1")
class2 = upload.form("class2")
class3 = upload.form("class3")
tsplit = upload.form("tsplit")
texp = upload.form("exp")
inprice = upload.form("inprice")
Set upfile = upload.file("txts")
upfile.saveas server.mappath("cnjv_card_addtxt.txt")
Set upfile = Nothing
Set upload = Nothing
Onez.page_cardadd2a
End If
Onez.page_cardadd2b
End Sub%>