📄 chang_person.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/EmpMain.asp" -->
<!--#include file="EmpMain_CheckRight.asp"-->
<%
if fncheckupart(1)=true or fncheckupart(2)=true then
else
response.Write("没有权限访问该页!")
response.end
end if
%>
<%
Dim genInfo
If (Request.QueryString("ID") <> "") Then
genInfo= Request.QueryString("ID")
End If
Set EmpList= Server.CreateObject ("ADODB.RecordSet")
EmpList.open "select F_EClerk from T_Client where F_Id = " &genInfo& " ",MM_EmpMain_STRING,1,3
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>销售员变更</title>
<link rel="stylesheet" href="CSS/SellWellWeb.css" type="text/css">
<script language="javascript" src="js_Lib/fnCheckForm.js"></script>
<script language="javascript" src="Js_Lib/Calendar.js"></script>
<script>
function CheckForm(){
if(trim(document.form1.yxsy.value)==""){
alert("原销售员不能为空！")
document.form1.yxsy.focus()
dataReady = "0"
return
}
else{
dataReady = "1"
}
if(trim(document.form1.xxsy.value)==""){
alert("新销售员不能为空！")
document.form1.xxsy.focus()
dataReady = "0"
return
}
else{
dataReady = "1"
}
if(dataReady=="1"){
document.form1.submit()
}
}
</script>
</head>
<body bgcolor="#EAF4FF" class="body">
<fieldset style="padding: 2;width:100%" class="fiedset"><legend>销售员变更操作</legend>
<form name="form1" action="chang_person_sucess.asp" method="post">
<input name="id" type="hidden" value="<%=Request.QueryString("ID")%>">
<tr>
<td valign="top">
<table width="247" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" id="AutoNumber2" style="border-collapse: collapse">
<tr>
<td width="92" align="center" class="Caption">原销售员:</td>
<td width="155" class="ValueArea"><input name="yxsy" align="left" size="20" value="<%=(EmpList.Fields.Item("F_EClerk").Value)%>"></td>
</tr>
<tr>
<td width="92" align="center" class="Caption">新销售员:</td>
<td width="155" class="ValueArea"><input name="xxsy" align="left" size="20"></td>
</tr>
</table>
<br class="Caption">
<input type="button" value="提交" name="B1" class="button" onClick="CheckForm()">
<input type="reset" value="重置" name="B2" class="button">
</td>
</tr>
<input type="hidden" name="MM_insert" value="form1">
</form>
</fieldset>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -