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

📄 buy_rec_new.asp

📁 === ==ASP销售管理系统
💻 ASP
字号:
<!--#include file="../config.asp"-->
<!--#include file="../inc/check_login.asp"-->
<!--#include file="../inc/functions.asp"-->
<%
Application_ID = 1000500	'本功能编号,含义请查看编码表
if not CheckAuth(Session("Employee_ID"),Application_ID)	then	'验证权限
	Server.Transfer "../err/un_authorized.htm"
	response.end
end if
%>
<!--**************身份验证部分****************-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
	<title>Untitled</title>
	<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
	<LINK rel="stylesheet" type="text/css" href="../style.css">
</head>
<body>
<%
Customer_ID = request("Customer_ID")
if not IsNot(Customer_ID,"n") then
	response.write "客户编号丢失"
	response.end
end if
%>
<form action="buy_rec_new_exe.asp" method="post" name="frm" onSubmit="return CheckInput();">
<input type="hidden" name="Customer_ID" value="<%=Customer_ID%>">
添加采购记录
<hr size=1>
<table border=0 cellpadding=1 cellspacing=1 width="100%">
<tr>
	<td bgcolor="#EFEFEF">采购日期</td><td><input type="text" name="Rec_Date" size="16" value="<%=date()%>"></td>
	<td bgcolor="#EFEFEF">采购项目</td><td><input type="text" name="Rec_Item" size="16"></td>
</tr>
<tr>
	<td bgcolor="#EFEFEF">金额(¥)</td><td><input type="text" name="Rec_Account" size="16"></td>
	<td bgcolor="#EFEFEF">备注</td><td colspan="5"><input type="text" name="Rec_Note" size="32"></td>
</table>
<input type="submit" name="Submit" value="确定添加">
</form>
</body>
</html>
<script language="JavaScript" type="text/javascript">
	function CheckInput(){
		var Rec_Date = document.frm.Rec_Date.value;
		var Rec_Item = document.frm.Rec_Item.value;
		var Rec_Account = document.frm.Rec_Account.value;
		//客户名称
		if(Rec_Date.length < 8){
			alert('请正确填写采购日期');
			return false;
		}else{
			//行业
			if(Rec_Item.length < 1){
				alert('请正确填写采购项目');
				return false;
			}else{
				return true;
			}
		}		
	}
</script>

⌨️ 快捷键说明

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