buy2buyps.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")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('您的管理权限未达到此操作等级!');history.go(-1);</script>"
response.End
end if


dim action,deliveryid
deliveryid=SafeRequest("id",1)
action=FormatSQL(SafeRequest("action",0))
set rs=server.CreateObject("adodb.recordset")

select case action

case "deliverysave"
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('你无权更改送货方式！');history.go(-1);</script>"
response.End
end if
rs.open "select * from delivery where deliveryid="&deliveryid,conn,1,3
rs("subject")=trim(request.form("subject"))
rs("deliveryidorder")=request.form("deliveryidorder")
rs("fee")=request.form("fee")
rs("methord")=0
rs("payfee")=request.form("payfee")
rs("memo")=request.form("memo")
rs.update
rs.close
response.write "<script language=javascript>alert('成功修改了送货方式！');history.go(-1);</script>"
response.End

case "deliveryadd"
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('你无权添加送货方式！');history.go(-1);</script>"
response.End
end if
rs.open "select * from delivery",conn,1,3
rs.addnew
rs("subject")=trim(request.form("subject"))
rs("deliveryidorder")=request.form("deliveryidorder")
rs("fee")=request.form("fee")
rs("methord")=0
rs("payfee")=request.form("payfee")
rs("memo")=request.form("memo")
rs.update
rs.close
response.write "<script language=javascript>alert('成功添加了新的送货方式！');history.go(-1);</script>"
response.End

case "deliverydel"
if session("rank")>1 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('你无权删除送货方式！');history.go(-1);</script>"
response.End
end if
conn.execute "delete from delivery where deliveryid="&deliveryid
response.redirect "buy2buyps.asp?action=delivery"

end select
set rs=nothing
%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.STYLE1 {color: #000000;
	font-weight: bold;
}
.style4 {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> -&gt; <span class="style4">配送方式管理 / 添加</span></span></td>
</tr> 
<tr>  
<td bgcolor="#FFFFFF"><br>
  <table width="96%"  border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#f2f2f2">
  <tr align="center" bgcolor="#F7F7F7">
    <td width="16%" height="25" background="images/topbg.gif"><strong>配送方式</strong></td>
    <td width="14%" height="25" background="images/topbg.gif"><strong>配送费用</strong></td>
    <td width="15%" height="25" background="images/topbg.gif"><strong>保价费用</strong></td>
    <td width="38%" height="25" background="images/topbg.gif"><strong>相关说明</strong></td>
    <td width="6%" height="25" background="images/topbg.gif"><strong>排序</strong></td>
    <td width="11%" height="25" background="images/topbg.gif"><strong>操作</strong></td>
  </tr>
        <%dim i,j
		set rs=server.CreateObject("adodb.recordset")
		rs.open "select * from delivery where methord=0 order by deliveryidorder",conn,1,1
		i=rs.recordcount
		do while not rs.eof%>
		<form name="form1" method="post" action="buy2buyps.asp?action=deliverysave&id=<%=rs("deliveryid")%>">
  <tr align="center" bgcolor="#FFFFFF">
    <td height="25"><input name="subject" type="text" class="input_sr" id="subject" value=<%=trim(rs("subject"))%> size="14"></td>
    <td height="25"><input name="fee" type="text" class="input_sr" id="fee" value=<%=rs("fee")%> size="6">
      元</td>
    <td height="25"><input name="payfee" type="text" class="input_sr" id="payfee" value=<%=rs("payfee")%> size="6">
      %</td>
    <td height="25"><textarea name="memo" cols="46" rows="4" id="memo"><%=rs("memo")%></textarea></td>
    <td height="25"><input name="deliveryidorder" type="text" class="input_sr" id="deliveryidorder" onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))" value=<%=rs("deliveryidorder")%> size="2"
		onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))"></td>
    <td height="25"><input name="Submit" type="submit" class="input_bot" value="修改">
      <a href="buy2buyps.asp?action=deliverydel&id=<%=rs("deliveryid")%>" onClick="return confirm('您确定进行删除操作吗？')">删除</a></td>
  </tr>
  </form>
        <%rs.movenext
		loop
		rs.close
		set rs=nothing%>
</table> 
  <br>
  <br>
  <table width="96%"  border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#f2f2f2">
 
    <tr align="center" bgcolor="#F7F7F7">
      <td width="16%" height="25" background="images/topbg.gif"><strong>配送方式</strong></td>
      <td width="14%" height="25" background="images/topbg.gif"><strong>配送费用</strong></td>
      <td width="15%" height="25" background="images/topbg.gif"><strong>保价费用</strong></td>
      <td width="38%" height="25" background="images/topbg.gif"><strong>相关说明</strong></td>
      <td width="6%" height="25" background="images/topbg.gif"><strong>排序</strong></td>
      <td width="11%" height="25" background="images/topbg.gif"><strong>操作</strong></td>
    </tr>
	<form name="form2" method="post" action="buy2buyps.asp?action=deliveryadd">
    <tr align="center" bgcolor="#FFFFFF">
      <td height="25"><input name="subject" type="text" class="input_sr" id="subject" size="14"></td>
      <td height="25"><input name="fee" type="text" class="input_sr" id="fee" size="6" >
      元</td>
      <td height="25"><input name="payfee" type="text" class="input_sr" id="payfee" size="6">
      %</td>
      <td height="25"><textarea name="memo" cols="46" rows="4" id="memo"></textarea></td>
      <td height="25"><input name="deliveryidorder" type="text" class="input_sr" id="deliveryidorder" onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))" value=<%=i+1%> size="2"
		onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))"></td>
      <td height="25"><input name="Submit" type="submit" class="input_bot" value="添加">      </td>
    </tr>
	</form>
  </table>
  <br></td>
</tr> </table>

<script>
	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>