📄 b2b_ppgl.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
else
if request.cookies("Buy2Buy")("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
end if
end if
'限制查看权限管理员
if session("rank")=3 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('您的管理权限未达到此操作等级!');history.go(-1);</script>"
response.End
end if
dim action,Markid
Markid=SafeRequest("id",1)
action=FormatSQL(SafeRequest("action",0))
select case action
case "add"
if Not isNumeric(request.form("MarkTop")) then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('品牌推荐必须是数字！');history.go(-1);</script>"
response.End
end if
if Not isNumeric(request.form("MarkNum")) then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('品牌排序必须是数字！');history.go(-1);</script>"
response.End
end if
if request.form("MarkName") ="" then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('请填写品牌名称！');history.go(-1);</script>"
response.End
end if
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from b2b_parductppp",conn,1,3
rs.AddNew
rs("MarkName")=trim(request.form("MarkName"))
rs("MarkNum")=int(request.form("MarkNum"))
rs("MarkTop")=int(request.form("MarkTop"))
rs.Update
rs.Close
set rs=nothing
conn.close
set conn = nothing
response.Redirect "b2b_ppgl.asp"
case "edit"
if Not isNumeric(request.form("MarkTop")) then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('品牌推荐必须是数字！');history.go(-1);</script>"
response.End
end if
if Not isNumeric(request.form("MarkNum")) then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('品牌排序必须是数字！');history.go(-1);</script>"
response.End
end if
if request.form("MarkName") ="" then
conn.close
set conn = nothing
response.Write "<script language=javascript>alert('请填写品牌名称！');history.go(-1);</script>"
response.End
end if
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from b2b_parductppp where Markid="&Markid,conn,1,3
rs("MarkName")=trim(request.form("MarkName"))
rs("MarkNum")=int(request.form("MarkNum"))
rs("MarkTop")=int(request.form("MarkTop"))
rs.Update
rs.Close
set rs=nothing
conn.close
set conn = nothing
response.Redirect "b2b_ppgl.asp"
case "del"
conn.execute ("delete from b2b_parductppp where MarkID="&Markid)
conn.close
set conn = nothing
response.Redirect "b2b_ppgl.asp"
end select
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language = "JavaScript">
<!--
function CheckAdd()
{
if(checkspace(document.AddForm.MarkNmae.value)) {
document.AddForm.MarkNmae.focus();
alert("请输入商品品牌名称！");
return false;
}
if(checkspace(document.AddForm.MiniPost.value)) {
document.AddForm.MiniPost.focus();
alert("请输入等级积分！");
return false;
}
if(checkspace(document.AddForm.startMark.value)) {
document.AddForm.startMark.focus();
alert("请输入等级排序！");
return false;
}
if(checkspace(document.AddForm.Stars.value)) {
document.AddForm.Stars.focus();
alert("请输入等级折扣！");
return false;
}
}
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function regInput(obj, reg, inputStr)
{
var docSel = document.selection.createRange()
if (docSel.parentElement().tagName != "INPUT") return false
oSel = docSel.duplicate()
oSel.text = ""
var srcRange = obj.createTextRange()
oSel.setEndPoint("StartToStart", srcRange)
var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
return reg.test(str)
}
//-->
</script>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.STYLE1 { color: #000000;
font-weight: bold;
}
.STYLE2 {color: #FF0000}
-->
</style>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
<tr>
<td height="20" background="images/topbg.gif"><span class="STYLE1"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是： <a href="adminhelp.asp">管理首页</a> -> <span class="STYLE2">品牌设置</span></span></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<br>
<table width="80%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
<tr align="center" bgcolor="#F7F7F7" height="25">
<td width="28%" height="25" background="images/topbg.gif" bgcolor="#F7F7F7"><strong>品牌名称</strong></td>
<td width="18%" height="25" background="images/topbg.gif" bgcolor="#F7F7F7"><strong> 品牌排序</strong></td>
<td width="18%" height="25" background="images/topbg.gif" bgcolor="#F7F7F7"><strong>品牌推荐</strong></td>
<td width="18%" height="25" background="images/topbg.gif" bgcolor="#F7F7F7"><strong>操作</strong></td>
</tr>
<%set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from b2b_parductppp order by MarkNum",conn,1,1
dim follows
if rs.EOF and rs.BOF then
response.Write "<div align=center><font color=red>还没有商品品牌</font></center>"
follows=0
else
do while not rs.EOF
%>
<form name="form1" method="post" action="b2b_ppgl.asp?action=edit&id=<%=int(rs("Markid"))%>">
<tr align="center" bgcolor="#FFFFFF">
<td height="25"><input name="MarkName" type="text" class="input_sr" id="category" value="<%=trim(rs("MarkName"))%>" size="20" maxlength="15"></td>
<td height="25"><input name="MarkNum" type="text" class="input_sr" id="MarkNum" value="<%=int(rs("MarkNum"))%>" size="4" maxlength="4"></td>
<td height="25"><select name="MarkTop" id="MarkTop">
<option value="0" <% if rs("MarkTop")=0 Then Response.write("Selected") %>>普通品牌</option>
<option value="1" <% if rs("MarkTop")=1 Then Response.write("Selected") %>>推荐品牌</option>
</select></td>
<td height="25"><input name="Submit" type="submit" class="input_bot" value="修 改">
<img src="images/pic12.gif" width="20" height="15" align="absmiddle" /><a href="b2b_ppgl.asp?id=<%=int(rs("Markid"))%>&action=del" onClick="return confirm('您确定进行删除操作吗？')"><font color=red>删除</font></a> </td>
</tr>
</form>
<%rs.MoveNext
loop
follows=rs.RecordCount
end if%>
</table>
<br></td>
</tr>
</table>
<br>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
<tr>
<td height="20" background="images/topbg.gif"><span class="STYLE1"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是： <a href="adminhelp.asp">管理首页</a> -> <span class="STYLE2">添加新品牌</span></span></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<br>
<table width="80%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
<tr align="center" bgcolor="#F7F7F7" height="20">
<td width="28%" height="25" background="images/topbg.gif"><strong> 品牌名称</strong></td>
<td width="18%" height="25" background="images/topbg.gif"><strong>品牌排序</strong></td>
<td width="18%" height="25" background="images/topbg.gif"><strong>品牌推荐</strong></td>
<td width="18%" height="25" background="images/topbg.gif"><strong>操作</strong></td>
</tr>
<form name="AddForm" method="post" action="b2b_ppgl.asp?action=add">
<tr align="center" bgcolor="#FFFFFF">
<td height="25"><input name="MarkName" type="text" class="input_sr" id="MarkName" size="20"></td>
<td height="25"><input name="MarkNum" type="text" class="input_sr" id="MarkNum" value="<%=follows+1%>" size="4"></td>
<td height="25"><select name="MarkTop" id="MarkTop">
<option value="0" selected>普通品牌</option>
<option value="1">推荐品牌</option>
</select> </td>
<td height="25"><input name="Submit3" type="submit" class="input_bot" onClick="return CheckAdd();" value="添 加"></td>
</tr>
</form>
</table>
<br></td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -