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

📄 edit.asp

📁 具有计划、任务、通告、公文、员工档案、等网络办公功能
💻 ASP
字号:
<%response.expires=0%>
<%Response.Buffer=true%>
<!-- #include file="../conn_lr.asp"-->
<!-- #include file="../css.asp"-->
<%
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusyusername="" then 
	response.write("<script language=""javascript"">")
	response.write("window.top.location.href='../../default.asp';")
	response.write("</script>")
	response.end
end if
%>

<head>

<title>客户信息管理</title>

<meta http-equiv=Content-Type content="text/html; charset=gb2312">

<!--  #Include File=../inc/css.asp -->

<%
	on error resume next
    Server.ScriptTimeOut =4
	
	dim Number,opFlag,title,image
	Number=cint(request("Number"))
	opFlag=request("opFlag")

	dim Kdengji,dengji,Ktype,Ktyper
	'用于传递等级字段和类别字段的值
	
	Set rs = Server.CreateObject("ADODB.Recordset")

	if opFlag="cmdAddNew" then
    
	else
		rs.Open Session("SQL"),Session("conn"),1,3
		rs.move number
		'还原客户等级和客户类别的内容
		dengji  = "" & rs("Kdengji")
    	Kdengji = mid(dengji,1,12)
    	Ktyper = "" & rs("Ktype")
    	Ktype = mid(Ktyper,1,4)

	end if
	title="客户信息管理"
	image="../images/kehu.gif"

%>

<style>
.css0{border:none;}
</style>

<script language=JavaScript>

function ds(sstr)
{
 	var dstr="";
 
 	for (i=0;i<sstr.length;i++)
 	{   
 		if (sstr.charAt(i)!=' ') dstr+=sstr.charAt(i);
 	}
 	return dstr;
}

function oninput()
{
	
	//提示必须填写的项目
	if (ds(document.submitinput.Kdengji.value)=="") 
    {
     	alert("客户等级不能为空!");
     	document.submitinput.Kdengji.focus();
     	return false;
    }
	if (ds(document.submitinput.Ktype.value)=="") 
    {
     	alert("客户类型不能为空!");
     	document.submitinput.Ktype.focus();
     	return false;
    }
	if (ds(document.submitinput.Knumber.value)=="") 
    {
     	alert("序号不能为空!");
     	document.submitinput.Knumber.focus();
     	return false;
    } 
	if (ds(document.submitinput.Kname.value)=="") 
    {
     	alert("客户名称不能为空!");
     	document.submitinput.Kname.focus();
     	return false;
    }
    
    	if (document.submitinput.Knumber.value.length>10)
		{
     		alert("序号输入不能超过10位");
     		document.submitinput.Knumber.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kname.value.length>50)
		{
     		alert("客户名称输入不能超过25字");
     		document.submitinput.Kname.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Klianxi.value.length>50)
		{
     		alert("联系人/职务输入不能超过25字");
     		document.submitinput.Klianxi.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Ktelephone.value.length>20)
		{
     		alert("电话号码输入不能超过20位");
     		document.submitinput.Ktelephone.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kfax.value.length>20)
		{
     		alert("传真号码输入不能超过20位");
     		document.submitinput.Kfax.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kdizhi.value.length>80)
		{
     		alert("公司地址输入不能超过40字");
     		document.submitinput.Kdizhi.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kyoubian.value.length>10)
		{
     		alert("邮编输入不能超过10位");
     		document.submitinput.Kyoubian.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kdiqu.value.length>20)
		{
     		alert("所在地区输入不能超过10字");
     		document.submitinput.Kdiqu.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kyixiang.value.length>100)
		{
     		alert("发展意向输入不能超过50字");
     		document.submitinput.Kyixiang.focus();
     		return false;
    	}
    	
    	if (document.submitinput.Kchengdu.value.length>50)
		{
     		alert("已进展程度输入不能超过25字");
     		document.submitinput.Kchengdu.focus();
     		return false;
    	} 
    	rphtml('Knumber','Kname','Klianxi','Ktelephone','Kfax','Kdizhi','Kyoubian','Kdiqu','Kyixiang','Kchengdu','Kbeizhu');      

		MM_validateForm('Knumber','','RisNum','Kyoubian','','NisNum');
		if(document.MM_returnValue)
		{
			document.submitinput.submit();
		};
		return false;
		
		document.all.submitinput.submit();

}
</script>

</head>

<body>

<form  name="submitinput" action="save.asp?opFlag=<%=opFlag%>&Number=<%=Number%>" method="post" >

<!-- #include file="../inc/title.asp" -->

  <table cellspacing=1 cellpadding=2 width=603 bgcolor=<%=Session("vtablebordercolor")%> border=0 class=vtext align="center">
     <tr>               
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">客户等级(C):</td>              
      <td bgcolor=<%=Session("vcolcolor")%> width="197" >               
        <select id="客户等级"  size=1 name=Kdengji accesskey="c" onKeyDown=gonext("Ktype")>                                          
             <option value="" selected >
              <% if opFlag="cmdEdit" then%>  
              <option value="<%=Kdengji%>" selected><%=Kdengji%></option>  
              <% end if %>              
                --搿?-<option value="有发展意向的">有发展意向的</option> 
                <option value="已合作过的">已合作过的</option>
				<option value="现正合作的">现正合作的</option>
        </select>                              
                 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">               
        客户类别(T):              
      <td bgcolor=<%=Session("vcolcolor")%> width="189" >               
        <select id="客户类别"  size=1 name=Ktype accesskey="t" onKeyDown=gonext("Knumber")>                                       
             <option value="" selected >
             <% if opFlag="cmdEdit" then%>  
              <option value="<%=Ktype%>" selected><%=Ktype%></option>  
              <% end if %>            
                --搿?-<option value="重点">重点</option> 
                <option value="普通">普通</option>
        </select>                              
    </tr>
    <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">序号(N):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" >
          <input id="序号" size=12 name=Knumber class=css0 style="width=100%" value="<%=rs("Knumber")%>" onKeyPress="checkkey()" accesskey="n" onKeyDown=gonext("Kname")>
      </td>
    </tr>
    <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">客户名称(H):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="客户名称" size=69 name=Kname class=css0 style="width=100%" value="<%=rs("Kname")%>" accesskey="h" onKeyDown=gonext("Klianxi")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">联系人/职务(L):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="联系人/职务" size=69 name=Klianxi class=css0 style="width=100%" value="<%=rs("Klianxi")%>" accesskey="l" onKeyDown=gonext("Ktelephone")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25" >电话(P):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="电话" size=69 name=Ktelephone class=css0 style="width=100%" value="<%=rs("Ktelephone")%>" accesskey="p" onKeyPress="checkkey()" onKeyDown=gonext("Kfax")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25" >传真(F):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="传真" size=69 name=Kfax class=css0 style="width=100%" value="<%=rs("Kfax")%>" accesskey="f" onKeyPress="checkkey()" onKeyDown=gonext("Kdizhi")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">公司地址(A):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="公司地址" size=69 name=Kdizhi class=css0 style="width=100%" value="<%=rs("Kdizhi")%>" accesskey="a" onKeyDown=gonext("Kyoubian")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25" >邮编(Y):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="邮编" size=69 name=Kyoubian class=css0 style="width=100%" value="<%=rs("Kyoubian")%>" accesskey="y" onKeyPress="checkkey()" onKeyDown=gonext("Kdiqu")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">所在地区(D):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="所在地区" size=69 name=Kdiqu class=css0 style="width=100%" value="<%=rs("Kdiqu")%>" accesskey="d" onKeyDown=gonext("Kyixiang")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">发展意向(X):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="发展意向" size=69 name=Kyixiang class=css0 style="width=100%" value="<%=rs("Kyixiang")%>" accesskey="x" onKeyDown=gonext("Kchengdu")>
      </td>
    </tr>
     <tr> 
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">已进展程度(K):</td>
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" > 
        <input id="已进展程度" size=69 name=Kchengdu class=css0 value="<%=rs("Kchengdu")%>" accesskey="k" onKeyDown=gonext("Kbeizhu")>
        &nbsp;                                                                                                      
      </td>                                                                        
    </tr>                                                                        
                                                          
     <tr>                                                           
      <td bgcolor=<%=Session("vtabletitlebackcolor")%> width="93" align="right" nowrap height="25">备注(M):</td>                                                          
      <td bgcolor=<%=Session("vcolcolor")%> width="499" colspan="3" >                                                           
        <textarea name=Kbeizhu rows=6 cols=55 style="width:100%;" class=css0 accesskey="m"><%=rs("Kbeizhu")%></textarea>                                                          
      </td>                                                          
    </tr>                                                          
  </table>                                                          
<table  cellspacing=0 cellpadding=0 width=90% border=0 align="center">                                                          
  <tr>                                                           
    <td>                                                           
      <p align=center>                                                           
          <br>                                                          
          <button class=vinputbutton  style="height=24"  onClick="oninput();"><img src="../images/save.gif" align="absmiddle">&nbsp;保存</button>&nbsp;    
    
          <button class=vinputbutton name="Submit6" style="height=24"  onClick=javascript:history.go(-1);><img src="../images/back.gif" align="absmiddle">&nbsp;返回</button>                                                         
      </p>                                                          
    </td>                                                          
  </tr>                                                          
                                                          
</table>                                                          
                                                          
</form>                           
                           
.                           
                           
</body>

⌨️ 快捷键说明

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