📄 admin_upload_product.asp
字号:
<%@ Language=VBScript %>
<!--#INCLUDE FILE="includes/adovbs.asp"-->
<!--#INCLUDE FILE="includes/connstr.asp"-->
<%
if trim(Session("LoggedUser"))<> "" then
dim acnDB, arsDB, prod_id, arsDBCat, arsDBSubCat,arsDBBrd, arsDBHmPrd
set acnDB = Server.CreateObject("ADODB.Connection")
set arsDB = Server.CreateObject("ADODB.Recordset")
set arsDBCat = Server.CreateObject("ADODB.Recordset")
set arsDBSubCat = Server.CreateObject("ADODB.Recordset")
set arsDBBrd = Server.CreateObject("ADODB.Recordset")
set arsDBHmPrd = Server.CreateObject("ADODB.Recordset")
acnDB.ConnectionString = connstr
acnDB.Open
if Request.Form("frmSubmit") = "Y" then
'dim details, hm_item, count, namename, descname
'for count = 1 to 20
'namename = "txtdetname" & count
'descname = "txtdetail" & count
'if Request.Form(namename) <> "" then
' if count = 1 then
' details = details & Request.Form(namename)
' else
' details = details & "||" & Request.Form(namename)
' end if
' details = details & "|" & Request.Form(descname)
'end if
'next
arsDB.Open "Select max(prod_id)+1 from product",acnDB
if isnull(arsDB.Fields(0)) then
prod_id = 1
else
prod_id = arsDB.Fields(0)
end if
arsDB.Close
strSQL = "Insert into product (prod_id,category_id,brand_id,prd_name,prd_desc,prd_intro,prd_features,app_link,prd_details,act_price,our_price,parcel_units,quantity,home_item,active,upd_date,enable) values "
strSQL = strSQL & "(" & prod_id & "," & Request.Form("cbosubcate") & ","
strSQL = strSQL & Request.Form("cbobrd") & ",'"
strSQL = strSQL & Request.Form("txtName") & "','"
strSQL = strSQL & Request.Form("txtdesc") & "','"
strSQL = strSQL & Request.Form("txaprdintro") & "','"
strSQL = strSQL & Request.Form("txaprdfeatures") & "','"
strSQL = strSQL & Request.Form("txtUrl") & "','"
strSQL = strSQL & Request.Form("txtdetname") & "||" & Request.Form("txtdetdesc") & "',"
strSQL = strSQL & Request.Form("txtListPrice") & ","
strSQL = strSQL & Request.Form("txtOurPrice") & ","
strSQL = strSQL & Request.Form("txtParcelUnits") & ",0,'" & Request.Form("homeitem") & "','Y',getdate(),'"& Request.Form("enableitem")&"')"
'Response.Write strSQL
acnDB.Execute strSQL
if Request.Form("cboReplItem") <> "" then
strSQL = "Update product set home_item = 'N' where prod_id = " & Request.Form("cboReplItem")
acnDB.Execute strSQL
end if
Response.Redirect "admin_upload_product_images.asp?id=" & prod_id
Else
arsDBCat.Open "select category_id,cat_name from category where active='Y' and parent_id is null",acnDB
arsDBSubCat.Open "SELECT category_id,parent_id,cat_name FROM category WHERE active='Y' and parent_id is not null",acnDB
arsDBBrd.Open "select brand_id,brd_name from brand where active='Y'",acnDB
arsDBHmPrd.Open "select prod_id, prd_name from product where home_item = 'Y' and active='Y'",acnDB,adOpenStatic
End if
else
Response.Redirect "login.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Welcome to Waytec EShop</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style>
<link href="includes/waytec_eshop.css" rel="stylesheet" type="text/css">
<script language=Javascript>
arrSelect=new Array();
<%index =0
do until arsDBSubCat.EOF %>
arrSelect[<%=index%>]=new Array("<%=arsDBSubCat.Fields("cat_name")%>",<%=arsDBSubCat.Fields("parent_id")%>,<%=arsDBSubCat.Fields("category_id")%>)
<%index = index + 1
arsDBSubCat.MoveNext
loop
%>
function change_select(selvalue)
{
document.all.cbosubcate.length=0;
var newOption;
newOption=new Option("Select Sub Category");
document.all.cbosubcate.options.add(newOption);
for(i=0;i<arrSelect.length;i++)
{
if(arrSelect[i][1]==selvalue)
{
newOption=new Option(arrSelect[i][0],arrSelect[i][2]);
document.all.cbosubcate.options.add(newOption);
}
}
}
function validateform() {
if (ValidateNull(frmRegister.txtName,'Name')) {
return;
}
if (ValidateNull(frmRegister.txtDesc,'Description')) {
return;
}
if (ValidateNull(frmRegister.cbocat,'Category')) {
return;
}
if (ValidateNull(frmRegister.cbosubcate,'Sub Category')) {
return;
}
if (ValidateNull(frmRegister.cbobrd,'Brand')) {
return;
}
if ((frmRegister.HomeYesNo(0).status) && (frmRegister.HomeYesNo(0).value >= 4)) {
if (frmRegister.cboReplItem.value=="") {
alert ("You have opted to put this item in the home page. But you have not specified which home item to replace with. Please select one.");
return;
}
}
if (ValidateNumber(frmRegister.txtListPrice,1,'List Price')) {
return;
}
if (ValidateNumber(frmRegister.txtOurPrice,1,'Our Price')) {
return;
}
if (ValidateNumber(frmRegister.txtParcelUnits,1,'Units Per Parcel')) {
return;
}
frmRegister.enableitem.value = "N";
if (frmRegister.enableYesNo(0).status)
frmRegister.enableitem.value = "Y";
frmRegister.homeitem.value = "N";
if (frmRegister.HomeYesNo(0).status)
frmRegister.homeitem.value = "Y";
document.frmRegister.frmSubmit.value = "Y";
frmRegister.frmGetSubCate.value = "";
document.frmRegister.submit();
}
function validateform1() {
if (frmRegister.cbocat.value == "") {
alert ("please select a category");
return;
}
frmRegister.frmSubmit.value = "";
frmRegister.frmGetSubCate.value = "Y";
document.frmRegister.submit();
}
function ValidateNull(vControl,vName) {
for(i=0;i<vControl.value.length;i++)
{
if(vControl.value.charAt(i)!=" ") {
return false;
}
}
alert("Enter a valid value for " + vName + ", Value should not be blank");
vControl.focus();
return true;
}
function ValidateNumber(vControl,LentoCheck,vName) {
if(LentoCheck > 0 && vControl.value=="") {
alert("Enter a valid value for " + vName + ", Value should not be null");
vControl.focus();
return true;
}
for(var i=0;i<vControl.value.length;i++) {
if (vControl.value.charCodeAt(i) < 48 || vControl.value.charCodeAt(i) > 57) {
alert("Enter a valid value for " + vName + ", Value should be numeric");
vControl.focus();
return true;
}
}
}
function NoHome() {
if (frmRegister.HomeYesNo(0).status)
frmRegister.cboReplItem.disabled = false;
else
frmRegister.cboReplItem.disabled = true;
}
</script>
<script type='text/javascript' src='includes/general_functions.js'></script>
</head>
<body>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#999999"><table width="780" border="0" cellspacing="1" cellpadding="0">
<tr>
<td bgcolor="#FFFFFF">
<!--#INCLUDE FILE="includes/TopMenu.inc"-->
<!--#INCLUDE FILE="includes/submenu_home.inc"-->
<table width="780" border="0" cellspacing="0" cellpadding="0">
<tr> <td width="169" valign="top">
<!--#INCLUDE FILE="includes/left_nav_menu.inc"--></td>
<form name="frmRegister" action="admin_upload_product.asp" method="POST">
<td width="45"> </td>
<td valign="top"><table width="566" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="565" align="right" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50" align="right" valign="bottom" class="header">Upload Product- Step 1 </td>
<td width="20" align="right" valign="middle"> </td>
</tr>
<tr>
<td height="5" align="right" valign="bottom"></td>
<td align="right" valign="middle"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="1" align="right"><img src="images/line_horizontal.gif" width="450" height="1" border="0"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="4" align="right" valign="bottom" class="9pointBLue"> </td>
<td height="10" valign="bottom"> </td>
</tr>
<tr>
<td width="263" height="23" align="right" class="9Point">Product Name </td>
<td width="12" align="center" class="9pointBold">:</td>
<td colspan="2"><input name="txtName" type="text" class="textBox" style="width:100% " value="">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -