啊估风栅设备订单管理系统 2.1(access数据库)

基本信息

源码名称：啊估风栅设备订单管理系统 2.1(access数据库)

源码大小：0.60M

文件格式：.rar

开发语言：ASP

更新时间：2019-03-04

友情提示：（无需注册或充值，赞助后即可获取资源下载链接）

嘿，亲！知识可是无价之宝呢，但咱这精心整理的资料也耗费了不少心血呀。小小地破费一下，绝对物超所值哦！如有下载和支付问题，请联系我们QQ(微信同号)：813200300

本次赞助数额为： 2 元　

源码介绍

一款风栅订单管理系统，设计这套系统，只为方便公司内部使用。可以添加多个管理账号，同时多人登录操作。添加/修改订单，添加/统计材料的使用记录（默认可以添加2种材料的使用和统计，每种材料可以添加使用4种不同的规格、使用张数，切割方式），制作过程中，随时更改订单状态。搜索/筛选订单。在订单列表，自动统计2种不同规格的材料的使用张数。

<%@language="VBScript" CodePage="65001"%>
<%Option Explicit%>
<%Session.CodePage=65001%>
<%Response.Charset="UTF-8"%>
<%Server.ScriptTimeout=60%>
<%dim WebpageSort:WebpageSort="Administrator"%>
<%dim WebpageName:WebpageName=""%>
<%dim WebpageTitle:WebpageTitle="网 站 管 理 中 心"%>
<!--#include file="../Include/Config.asp"-->
<!--#include file="../Include/Connection.asp"-->
<!--#include file="../Include/MD5.asp"-->

<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8" />
<title>风栅订单管理--<%=CompanyName%></title>
<meta name="Keywords" content="" />
<meta name="Description" content="" />
<link type="text/css" rel="stylesheet" id="WebsiteStyleWhole" href="../Include/Style.css" />
<link type="text/css" rel="stylesheet" id="WebsiteStyleAdmin" href="Include/Style.css" />
<script type="text/javascript" src="../Include/Function.js"></script>
<script type="text/javascript">
<!--
if (top.location!=self.location) {
	top.location=self.location;
	}
//-->
</script>
</head>

<body style="margin:30px 0px 0px 30px;background:#FFFFFF;">

<%
if trim(request.querystring("Command"))="Login" then

	dim AM_Account,AM_Password

	AM_Account=lcase(trim(request.form("GuAccount")))
	AM_Password=MD5(MD5(trim(request.form("GuPassword"))))

	if trim(request.form("GuAccount"))="" or trim(request.form("GuPassword"))="" then
		response.redirect "Admin.asp?Command=2718"
		response.end
	elseif instr(AdminLoginPageParameter,"CaptchaShow")>=1 and ucase(trim(request.form("GuCaptchaForm")))<>ucase(request.cookies("GuCaptchaCookies")) then
		ACMA.Execute("insert into "&GuDatabaseTablePrefix&"_Administrator_Log(AL_Code,AL_Note,AL_AddAdministrator,AL_AddIP,AL_AddDateTime) values('2719','登录失败，验证码错误。','"&AM_Account&"','"&GuBrowserIP&"','"&now()&"')")
		response.redirect "Admin.asp?Command=2719"
		response.end
	else
		set ARAC=Server.CreateObject("ADODB.RecordSet")
		SQL="select * from "&GuDatabaseTablePrefix&"_Administrator where AM_DatabaseTablePrefix='"&GuDatabaseTablePrefix&"' and AM_Account='"&AM_Account&"' and AM_Password='"&AM_Password&"' and AM_Status='Enabled'"
		ARAC.Open SQL,ACMA,1,3
		if ARAC.bof and ARAC.eof then
			ACMA.Execute("insert into "&GuDatabaseTablePrefix&"_Administrator_Log(AL_Code,AL_Note,AL_AddAdministrator,AL_AddIP,AL_AddDateTime) values('2718','登录失败，管理帐号或者密码错误。','"&AM_Account&"','"&GuBrowserIP&"','"&now()&"')")
			response.redirect "Admin.asp?Command=2718"
			response.end
		else
			ARAC("AM_LoginNumber")=ARAC("AM_LoginNumber") 1
			ARAC("AM_LoginLdentifying")=MD5(now())
			ARAC("AM_LastLoginIP")=GuBrowserIP
			ARAC("AM_LastLoginDateTime")=now()
			ARAC.Update

			if instr(AdminLoginPageParameter,"CookiesEnabled")>=1 then
				response.cookies("GUEEONAIRGRIDADMINISTRATOR")("ACCOUNT")=ARAC("AM_Account")
				response.cookies("GUEEONAIRGRIDADMINISTRATOR")("LOGINLDENTIFYING")=ARAC("AM_LoginLdentifying")
				response.cookies("GUEEONAIRGRIDADMINISTRATOR").Expires=now() AdminLoginTimeout/1440
			else
				session("GUEEONAIRGRIDADMINISTRATORACCOUNT")=ARAC("AM_Account")
				session("GUEEONAIRGRIDADMINISTRATORLOGINLDENTIFYING")=ARAC("AM_LoginLdentifying")
				Session.timeout=AdminLoginTimeout
			end if

			if instr(ucase(ARAC("AM_Purview")),"ALAY")>=1 then
				ACMA.Execute("insert into "&GuDatabaseTablePrefix&"_Administrator_Log(AL_Code,AL_Note,AL_AddAdministrator,AL_AddIP,AL_AddDateTime) values('2720','登录成功。','"&AM_Account&"','"&GuBrowserIP&"','"&now()&"')")
			end if

			response.redirect "Admin_AirGrid_Data.asp"
			response.end
		end if
		ARAC.Close
		set ARAC=nothing
	end if

end if


if trim(request.querystring("Command"))="Logout" then

	if len(GuAdministratorAccount)>=1 then
		set ARAC=Server.CreateObject("ADODB.RecordSet")
		SQL="select * from "&GuDatabaseTablePrefix&"_Administrator where AM_DatabaseTablePrefix='"&GuDatabaseTablePrefix&"' and AM_Account='"&GuAdministratorAccount&"' and AM_Status='Enabled'"
		ARAC.open SQL,ACMA,1,1
		if ARAC.bof and ARAC.eof then
			response.write ""
			response.end
		else
			if instr(ucase(ARAC("AM_Purview")),"ALAY")>=1 then
				ACMA.Execute("insert into "&GuDatabaseTablePrefix&"_Administrator_Log(AL_Code,AL_Note,AL_AddAdministrator,AL_AddIP,AL_AddDateTime) values('2000','退出成功。','"&GuAdministratorAccount&"','"&GuBrowserIP&"','"&now()&"')")
			end if
		end if
		ARAC.Close
		set ARAC=nothing
	end if

	if instr(AdminLoginPageParameter,"CookiesEnabled")>=1 then
		response.cookies("GUEEONAIRGRIDADMINISTRATOR")("ACCOUNT")=""
		response.cookies("GUEEONAIRGRIDADMINISTRATOR")("LOGINLDENTIFYING")=""
		response.cookies("GUEEONAIRGRIDADMINISTRATOR").Expires=#2000-01-01#
	else
		session("GUEEONAIRGRIDADMINISTRATORACCOUNT")=""
		session("GUEEONAIRGRIDADMINISTRATORLOGINLDENTIFYING")=""
	end if

'	response.redirect WebsiteDomain
	response.redirect "Admin.asp"
	response.end

end if


if len(trim(request.querystring("Command")))>=1 then
	select case trim(request.querystring("Command"))
	case "2711"
		GuSystemMessageContent="登录失败，读取数据出现错误。"
	case "2718"
		GuSystemMessageContent="登录失败，用户帐号或者密码错误。"
	case "2719"
		GuSystemMessageContent="登录失败，验证码错误。"
	case "2811"
		GuSystemMessageContent="操作失败，没有登录或者已经超时。"
	case else
		GuSystemMessageContent="操作失败，"
	end select
end if
%>
<table border="0px" cellpadding="0px" cellspacing="0px" class="Style_Table_Login_Whole">
<form method="post" name="Admin_Login" action="?Command=Login" target="_top">
 <tr>
  <td colspan="2" style="width:auto;height:88px;"></td>
 </tr>
 <tr>
  <td align="right" style="width:128px;height:38px;"><span style="font-family:宋体;font-size:14px;color:#2F2F2F;">管理账号:</span>&nbsp;</td>
  <td align="left" style="width:auto;height:38px;"><input type="text" id="GuAccount" name="GuAccount" maxlength="50" value="<%=trim(request.querystring("Account"))%>" onfocus="javascript:this.select();" class="Style_InputText" style="width:166px;background:#FFFFFF;" /></td>
 </tr>
 <tr>
  <td align="right" style="width:128px;height:38px;"><span style="font-family:宋体;font-size:14px;color:#2F2F2F;">登录密码:</span>&nbsp;</td>
  <td align="left" style="width:auto;height:38px;"><input type="password" id="GuPassword" name="GuPassword" maxlength="50" value="<%=trim(request.querystring("Password"))%>" onfocus="javascript:this.select();" class="Style_InputText" style="width:<%if instr(AdminLoginPageParameter,"CaptchaShow")>=1 then response.write "102" else response.write "166" end if%>px;background:#FFFFFF;" /> <%if instr(AdminLoginPageParameter,"CaptchaShow")>=1 then%><input type="text" id="GuCaptchaForm" name="GuCaptchaForm" maxlength="20" value="" onfocus="javascript:this.select();" class="Style_InputText" style="width:52px;" />&nbsp;<img id="" src="../Include/Captcha.asp" alt="验证码" title="单击即可刷新验证码" onclick="javascript:this.src='../Include/Captcha.asp?' Math.random();" style="width:46px;height:12px;border:0px;vertical-align:middle;cursor:pointer;" /><%end if%></td>
 </tr>
 <tr>
  <td style="width:128px;height:40px;"></td>
  <td style="width:auto;height:40px;"><input type="submit" id="Button_Submit" name="Button_Submit" value="" class="Style_Button_Confirm" />&nbsp;<input type="reset" id="Button_Reset" name="Button_Reset" value="" class="Style_Button_Reset" /></td>
 </tr>
 <tr>
  <td colspan="2" align="right" style="width:auto;height:40px;vertical-align:top;"><table border="0px" cellpadding="0px" cellspacing="0px" style="width:388px;height:20px;"><tr><td align="left" style="width:240px;height:auto;vertical-align:bottom;"><span class="RedS12"><%if len(trim(request.querystring("Command")))>=1 then response.write GuSystemMessageContent end if%></span></td><td align="center" style="width:auto;height:auto;vertical-align:bottom;"><span class="SilverS12"><a href="http://www.gueeon.com" target="_blank" class="SilverS12">啊估工作室</a>·设计</span></td></tr></table></td>
 </tr>
 <tr>
  <td colspan="2" style="width:auto;height:20px;"></td>
 </tr>
</form>
</table>

<script type="text/javascript">
<!--
	document.forms['Admin_Login'].GuAccount.focus();
//-->
</script>

<script type="text/javascript" src="../Include/AltTitle.js"></script>

</body>
</html>

<%call GuDatabaseClose()%>