admin_orderdetail.asp

公司企业网站管理系统全站源码,用于企业内部对网站的管理

<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!-- #include file="Inc/Head.asp" -->
<%
OrderNum=request("OrderNum")
if Request.QueryString("action")="southidc" then
 id=request("id")
 price=request.form("price")
 Set rs_save = Server.CreateObject("ADODB.Recordset")
 rs_save.open "select * from OrderDetailwy where ID="&id,conn,1,3
 rs_save("BuyPrice")=price
 rs_save.update
 rs_save.close
 set rs_flag=server.createobject("adodb.recordset")
 sqltext="Update OrderList set Flag='Yes' where OrderNum='"&OrderNum&"'"
 rs_flag.open sqltext,conn,1,3 
 rs_flag.close
 'response.redirect "Admin_OrderDetail.asp?OrderNum='"&OrderNum&"'"
end if 

page=request("page")
set rs=server.createobject("adodb.recordset")
sqltext="select * from OrderList where OrderNum='"&OrderNum&"'"
rs.open sqltext,conn,1,1
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <strong><br>
      </strong><img src="Image/xj.jpg" alt="1111" width="550" height="691"></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>
<!-- #include file="Inc/Foot.asp" -->