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

📄 step2.asp

📁 矮子多用户版客户管理系统2.0Bate2
💻 ASP
字号:
<!--#include file="conn.asp" --> 
<%
if session("name")="" or session("dd")="" then
response.write "SORRY <br>"
response.write "数据在携带中出现意外!<br>"
response.write "<a href=login.asp>回去重来</a>"
response.end
end if
if session("quanxian")="1"  then
response.write "SORRY <br>"
response.write "您的权限不够!请勿尝试非法访问!<br>"
response.end
end if

dim rs,sql
sql="select * from mclass  where mclass_id="&request("mclass")&"" 
set rs=server.createobject("adodb.recordset")
rs.Open sql,conn,1,3
if not rs.EOF then
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>客户管理系统</title>
</head>
<STYLE type=text/css>
BODY {	FONT-FAMILY: "宋体","Arial Narrow","Times New Roman"; FONT-SIZE: 9pt}
TD {	FONT-FAMILY: "宋体","Arial Narrow","Times New Roman"; FONT-SIZE: 9pt; line-height: 150%}
a:link {  color: #3366FF; text-decoration: none}
a:visited {  color: #3366FF; text-decoration: none}
a:hover {  color: #FF0080; text-decoration: underline}
.p1 {	FONT-SIZE: 9pt; LINE-HEIGHT: 14pt}
.p2 {	COLOR: #c0c0c0; FONT-SIZE: 9pt; LINE-HEIGHT: 14pt}
input {  font-family: "宋体"; font-size: 9pt;color:#0000FF}

</STYLE>
<body>
<div align="center">
	<table border="0" width="554" id="table1" cellspacing="0" cellpadding="0">
		<tr>
			<td> </td>
		</tr>
		<tr>
			<td>添加新客户 -

			<a target="mainFrame" href="vbscript:history.back()" style="text-decoration: none">返回上页</a></td>
		</tr>
		</table>
    </div>
<script Language="JavaScript">
<!--
function Form1_Validator(theForm)
{ 

   if (theForm.sclass.selectedIndex < 0)
  {
    alert("分类必须选择!");
    theForm.sclass.focus();
    return (false);
  }


  if (theForm.com_name.value == "")
  {
    alert("单位名称必须填写!");
    theForm.com_name.focus();
    return (false);
  }

 
  if (theForm.name.value.length >30)
  {
    alert("单位名称填写是否正确?请确认!");
    theForm.name.focus();
    return (false);
  }

 

    return (true);
}
//-->
</script>
<form method="POST" action="addtodb.asp" name="add_1" onsubmit="return Form1_Validator(this)" >
  <input type="hidden" name="mclass" size="18" maxlength="20" value="<%=session("dd")%>">  

  
  
  
  <div align="center">
  
  

  
  <table border="0" width="554" cellspacing="1" cellpadding="0" height="211" bgcolor="#DADADA">
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">单位名称&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_name" size="20" maxlength="50"> 
		<font color="#FF0000">*此项目为必须填写项</font></td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">省&nbsp;&nbsp;&nbsp; 
		份&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">
		&nbsp;<input type="text" name="com_shen" size="20" maxlength="250"> 
		单位所在的省份</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">城&nbsp;&nbsp;&nbsp; 
		市&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">
		&nbsp;<input type="text" name="com_city" size="20" maxlength="250"> 
		单位所在的城市</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">所属地区&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_diqu" size="20" maxlength="250"> 
		单位所在城市的地区,如:南镇、南区</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">单位电话&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_phone" size="20" maxlength="20">  
      	您可以在输入电话时输入区号、分机号等</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">单位传真&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_fax" size="20" maxlength="20">  
      	您可以在输入电话时输入区号、分机号等</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">电子邮件&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_email" size="20" maxlength="20"> 
		请输入正规的邮件格式,如:wang@163.com</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">单位地址&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_address" size="20" maxlength="255"> 
		单位所在的地址</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">&nbsp;邮政编码&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_zip" size="20" maxlength="250"> 
		单位的邮政编码</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">负 责 人&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_fuzeren" size="20" maxlength="34"> 
		单位最主要的负责人</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">注册资金&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_zczj" size="20" maxlength="20">  
      	如为企业单位,可填写该单位的注册资金</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">成立日期&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_setup" size="20" maxlength="255">  
      	该单位的成立日期</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">投资方式&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_touzi" size="20" maxlength="255">  
      	如:政府投资、美国投资、中外合资</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">所属行业&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_hangye" size="20" maxlength="30">  
      	如:电子制造、通讯、制衣、制鞋</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">经营产品&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_porduct" size="20" maxlength="255">  
      	如为政府单位可填写主要从事工作,如:工商</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">生产产值&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_chanzhi" size="20" maxlength="255">  
      	年、月、日的生产产值,请填入单位</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">认证状况&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_rzzk" size="20" maxlength="255">  
      	如:通过ISO9001认证</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">公司网址&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">&nbsp;<input type="text" name="com_web" size="20" maxlength="255" value="http://">  
      	如有的话请填入,这将帮助您更好的查阅资料</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">重 要 度&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">
		<input type="radio" value="0" name="zy">初步     
      <input type="radio" value="1" name="zy" checked>一般&nbsp;<input type="radio" value="2" name="zy">重要</td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">所属类别&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">
		&nbsp;<select size="1" name="sclass" style="font-family: 宋体; font-size: 9pt;color:#0000FF" >  
     <%	
     	dim foldersql,folderrs
     	set folderrs=server.createobject("adodb.recordset")    
		    foldersql="select * from sclass where vest ="&Request("mclass")&" order by paixu asc;"     
		    folderrs.open foldersql,conn,1,1  
  do while not folderrs.EOF    
    
   Response.Write "<option value="&folderrs("sclass_id")&">&nbsp; "&folderrs("sclass_folder")&"&nbsp;</option>" 
    
    folderrs.movenext
    loop
    folderrs.close
    set folderrs=nothing
%>
  </select></td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">备注&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25">
		&nbsp;<textarea rows="4" name="content" cols="63" style="font-family: 宋体; font-size: 9pt;color:#0000FF"></textarea></td>
	</tr>
	<tr>
		<td width="143" bgcolor="#EBEBEB" height="25" align="right">录入时间&nbsp; </td>
		<td width="408" bgcolor="#FFFFFF" height="25"><%n=Year(date())
y=Month(date())
r=Day(date())
s=Hour(time())
f=Minute(time())
m=Second(time())
if len(y)=1 then y="0" & y
if len(r)=1 then r="0" & r
if len(s)=1 then s="0" & s
if len(f)=1 then f="0" & f
if len(m)=1 then m="0" & m
sj="" & n & "年" & y & "月" & r & "日 " & weekdayname(weekday(date())) & " " & s & ":" & f & ":" & m & ""
%>
		&nbsp;<%=sj%><input type="hidden" name="time" value="<%=sj%>"></td>
	</tr>
	</table>
  
  
  
  
  
  
  
  
 	</div>
  
  
  
  
  
  
  
  
 <p align="center"><input type="submit" value="提交" name="B1">&nbsp;&nbsp; 
 <input type="reset" value="重写" name="B2"></p>
</form>
</body>

</html>
<%end if%>

⌨️ 快捷键说明

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