⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 statuschanged.asp

📁 online sales system of texttile mill was a project within which there was great opportunity for Lear
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<html>
<head>
	<title>Untitled</title>
</head>

<body bgcolor="">
<%
dim st
id = request.QueryString("id")
st = trim(Request.form("t1"))

dim act_id

if (st="Production Planning") then
act_id=1
elseif(st="Production Schedule") then
act_id=2
elseif(st="Purchase of Raw Material") then
act_id=3

elseif(st="Production in Progress") then
act_id=4
elseif(st="Quality Checking") then
act_id=5
elseif(st="Packing") then
act_id=6
elseif(st="Shipmnet") then
act_id=7
elseif(st="Shipped") then
act_id=8
end if


SQL = "update Orders set act_id=" & cInt(act_id) & " where orderid=" & id
objcon.execute(SQL)

response.redirect "admin_options.asp"
%>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -