📄 root_option_set.asp
字号:
<!--#include file="admin_check.asp"-->
<%dim dbpath
dbpath="../"
%>
<!--#include file="../Conn.asp"-->
<!--#include file="../include/MyRequest.asp"-->
<%
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select root_option_NumsPerRow,root_option_RowsPerPage,root_option_RowsIndexNew,root_option_RowsIndexTj,root_option_RowsIndexSpec,root_option_WidthSPic,root_option_HeighSPic,root_option_OnOffAliPayButton from root_option where id=1"
rs.open sql,conn,1,1
root_option_NumsPerRow = rs(0)
root_option_RowsPerPage = rs(1)
root_option_RowsIndexNew = rs(2)
root_option_RowsIndexTj = rs(3)
root_option_RowsIndexSpec = rs(4)
root_option_WidthSPic = rs(5)
root_option_HeighSPic = rs(6)
root_option_OnOffAliPayButton = rs(7)
rs.close
set rs=nothing
action=my_request("action",0)
if action="save" then
call save()
end if
sub save()
root_option_NumsPerRow = my_request("root_option_NumsPerRow",1)
root_option_RowsPerPage = my_request("root_option_RowsPerPage",1)
root_option_RowsIndexNew = my_request("root_option_RowsIndexNew",1)
root_option_RowsIndexTj = my_request("root_option_RowsIndexTj",1)
root_option_RowsIndexSpec = my_request("root_option_RowsIndexSpec",1)
root_option_WidthSPic = my_request("root_option_WidthSPic",1)
root_option_HeighSPic = my_request("root_option_HeighSPic",1)
root_option_OnOffAliPayButton = my_request("root_option_OnOffAliPayButton",1)
ErrMsg=""
if root_option_RowsPerPage="" then
FoundErr=True
ErrMsg=ErrMsg & "<li>每页显示商品行数不能为空！</li>"
end if
if root_option_WidthSPic="" then
FoundErr=True
ErrMsg=ErrMsg & "<li>商品缩图尺寸-横宽不能为空！</li>"
end if
if root_option_HeighSPic="" then
FoundErr=True
ErrMsg=ErrMsg & "<li>商品缩图尺寸-竖高不能为空！</li>"
end if
if FoundErr<>True then
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from root_option where id=1"
rs.open sql,conn,1,3
rs("root_option_NumsPerRow") = root_option_NumsPerRow
rs("root_option_RowsPerPage") = root_option_RowsPerPage
rs("root_option_RowsIndexNew") = root_option_RowsIndexNew
rs("root_option_RowsIndexTj") = root_option_RowsIndexTj
rs("root_option_RowsIndexSpec") = root_option_RowsIndexSpec
rs("root_option_WidthSPic") = root_option_WidthSPic
rs("root_option_HeighSPic") = root_option_HeighSPic
rs("root_option_OnOffAliPayButton") = root_option_OnOffAliPayButton
rs.update
rs.close
set rs=nothing
call ok("您已成功保存参数选项设置！","root_option_set.asp")
else
call WriteErrMsg(ErrMsg)
end if
end sub
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>参数选项-设置</title>
<link rel="stylesheet" href="style.css" type="text/css">
</head>
<body>
<table cellspacing="1" cellpadding="4" width="100%" class="tableborder">
<tbody class="altbg2">
<form name="form1" action="root_option_set.asp" method="post">
<input type="hidden" name="action" value="save">
<tr>
<td colspan="2" class="header">参数选项-设置</td>
</tr>
<tr>
<td>每行显示商品数：</td>
<td><select size="1" name="root_option_NumsPerRow">
<option value="3" <%if cint(root_option_NumsPerRow)=3 then response.write "selected"%>>3</option>
<option value="4" <%if cint(root_option_NumsPerRow)=4 then response.write "selected"%>>4</option>
<option value="5" <%if cint(root_option_NumsPerRow)=5 then response.write "selected"%>>5</option>
<option value="6" <%if cint(root_option_NumsPerRow)=6 then response.write "selected"%>>6</option>
<option value="7" <%if cint(root_option_NumsPerRow)=7 then response.write "selected"%>>7</option>
<option value="8" <%if cint(root_option_NumsPerRow)=8 then response.write "selected"%>>8</option>
</select> 件</td>
</tr>
<tr>
<td>每页显示商品行数：</td>
<td>
<input type="text" name="root_option_RowsPerPage" size="3" value="<%=root_option_RowsPerPage%>"> 行(只能是数字)</td>
</tr>
<tr>
<td>首页新品上市-行数：</td>
<td><select size="1" name="root_option_RowsIndexNew">
<option value="1" <%if root_option_RowsIndexNew=1 then response.write "selected"%>>1</option>
<option value="2" <%if root_option_RowsIndexNew=2 then response.write "selected"%>>2</option>
<option value="3" <%if root_option_RowsIndexNew=3 then response.write "selected"%>>3</option>
<option value="4" <%if root_option_RowsIndexNew=4 then response.write "selected"%>>4</option>
</select> 行</td>
</tr>
<tr>
<td>首页推荐商品-行数：</td>
<td><select size="1" name="root_option_RowsIndexTj">
<option value="1" <%if root_option_RowsIndexTj=1 then response.write "selected"%>>1</option>
<option value="2" <%if root_option_RowsIndexTj=2 then response.write "selected"%>>2</option>
<option value="3" <%if root_option_RowsIndexTj=3 then response.write "selected"%>>3</option>
<option value="4" <%if root_option_RowsIndexTj=4 then response.write "selected"%>>4</option>
</select> 行</td>
</tr>
<tr>
<td>首页特价商品-行数：</td>
<td><select size="1" name="root_option_RowsIndexSpec">
<option value="1" <%if root_option_RowsIndexSpec=1 then response.write "selected"%>>1</option>
<option value="2" <%if root_option_RowsIndexSpec=2 then response.write "selected"%>>2</option>
<option value="3" <%if root_option_RowsIndexSpec=3 then response.write "selected"%>>3</option>
<option value="4" <%if root_option_RowsIndexSpec=4 then response.write "selected"%>>4</option>
</select> 行</td>
</tr>
<tr>
<td>商品缩图-显示尺寸-横宽：</td>
<td><input type="text" name="root_option_WidthSPic" size="3" value="<%=root_option_WidthSPic%>"><font color="#BFBFBF">像素</font></td>
</tr>
<tr>
<td>商品缩图-显示尺寸-竖高：</td>
<td>
<input type="text" name="root_option_HeighSPic" size="3" value="<%=root_option_HeighSPic%>"><font color="#BFBFBF">像素</font></td>
</tr>
<tr>
<td>支付宝单独购买按钮开关：</td>
<td>
<input type="radio" value="1" name="root_option_OnOffAliPayButton" <%if root_option_OnOffAliPayButton=1 then response.write "checked"%>>开启
<input type="radio" value="0" name="root_option_OnOffAliPayButton" <%if root_option_OnOffAliPayButton=0 then response.write "checked"%>>关闭</td>
</tr>
<tr>
<td> </td>
<td><input type="submit" value=" 提 交 " name="B1">
<input type="reset" value="重置" name="B2"></td>
</tr>
</form>
</tbody>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -