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

📄 ku_add.asp

📁 不错的进销存管理系统。功能比较全
💻 ASP
字号:
<%
if session("yida_username")="" then
%>
<script language="javascript">
top.location.href="../index.asp"
</script>
<%  
  response.end
end if
%>
<!-- #include file="../conn2.asp" -->
<!-- #include file="../const.asp" -->

<html>
<head>
<title><%=dianming%> - 添加仓库</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style/style.css" rel="stylesheet" type="text/css">
<style>
body {
	background-color:#FFFFFF;
}
</style>
</HEAD>

<BODY>
<%
if fla43="0" and session("shiwei_id")<>"1" then
%>
<br><center><img src="../images/note.gif" align="absmiddle">&nbsp;<font color="#FF0000">你不具备此权限,请与管理员联系!</font></center>
<%  
  response.end
end if
%>
<%if request("hid1")="" then%>
<script language="javascript">
function check()
{
if (document.form1.ku.value=="")
{
alert("有*号的必须填写!");
return false;
}
}
</script>
<form name="form1">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#C4D8ED">
<tr>
<td><img src="../images/r_1.gif" alt="" /></td>
<td width="100%" background="../images/r_0.gif">
  <table cellpadding="0" cellspacing="0" width="100%">
    <tr>
      <td>&nbsp;添加仓库(带*号的为必填项)</td>
	  <td align="right">&nbsp;</td>
    </tr>
  </table>
</td>
<td><img src="../images/r_2.gif" alt="" /></td>
</tr>
<tr>
<td></td>
<td>
<table align="center" cellpadding="4" cellspacing="1" class="toptable grid" border="1">
  <tr>
    <td width="25%" height="30" align="right">仓库名称:</td>
    <td width="75%" class="category">
        <input type="text" name="ku" style="width:200px">
        &nbsp;<font color="#ff0000">*</font></td>
  </tr>
  <tr>
    <td height="30" align="right">联系电话:</td>
    <td class="category">
        <input type="text" name="tel" style="width:200px">
        &nbsp;</td>
  </tr>   
  <tr>
    <td height="30" align="right">仓库地址:</td>
    <td class="category">
        <input type="text" name="address" style="width:300px">
        &nbsp;</td>
  </tr>  
  <tr>
    <td height="30" align="right">仓库备注:</td>
    <td class="category">
        <textarea name="beizhu" cols="60" rows="3"></textarea>
        &nbsp;</td>
  </tr>  
  <tr>
    <td height="30" align="right">默认仓库:</td>
    <td class="category">
        <input type="checkbox" name="moren" value="1"></td>
  </tr>
  <tr>
    <td height="30" align="right">负责人:</td>
    <td class="category">
		  <%
		  sql="select * from login order by id_zu,id"
		  set rs_login=conn.execute(sql)
		  if rs_login.eof then
		  %>
		    <a href="user_add.asp">先添加员工</a>
		  <%
		  else
		  %>
		  <table align="center" cellpadding="4" cellspacing="1" class="toptable grid" border="1">
		    <tr align="center">
			  <td class="category">姓名</td>
			  <td class="category">性别</td>
			  <td class="category">电话</td>
			  <td class="category">选择</td>
			</tr>
		  <%
		  do while rs_login.eof=false
		  %>
		    <tr>
			  <td align="center"><%=rs_login("username")%></td>
			  <td align="center"><%=rs_login("xinbie")%></td>
			  <td align="center"><%=rs_login("tel")%></td>
			  <td align="center"><input type="checkbox" name="fuzeren" value="<%=trim(cstr(rs_login("id")))%>"></td>
			</tr>
		  <%
		    rs_login.movenext
		  loop
		  %>
		  </table>
		  <%
		  end if
		  %>
		  </td>
  </tr>    
  <tr>
    <td height="30">&nbsp;</td>
    <td class="category">
        <input name="submit" type="submit" onClick="return check()" value=" 确 认 " class="button">
      &nbsp;&nbsp;&nbsp;&nbsp;
        <input type="hidden" name="hid1" value="ok">
        <input name="reset" type="reset" value=" 重新填写 " class="button">
    </td>
  </tr>
</table>
</td>
<td></td>
</tr>
<tr>
<td><img src="../images/r_4.gif" alt="" /></td>
<td></td>
<td><img src="../images/r_3.gif" alt="" /></td>
</tr>
</table>
</form>
<%
else
ku=request("ku")
fuzeren=""
For Each num In Request("fuzeren")
	fuzeren=fuzeren&num&","
Next
tel=request("tel")
address=request("address")
beizhu=request("beizhu")
moren=request("moren")
sql="select * from ku where ku='"&ku&"'"
set rs=conn.execute(sql)
if rs.eof=false then
%>
<script language="javascript">
alert("您输入的仓库名已经存在!")
window.history.go(-1)
</script> 
<%
  response.end
end if
if moren="1" then
  sql="update ku set moren=false"
  conn.execute(sql)
end if
set rs=server.createobject("ADODB.RecordSet")
sql="select * from ku where 1=2"
rs.open sql,conn,1,3
rs.addnew
rs("ku")=ku
rs("login")=fuzeren
rs("tel")=tel
rs("address")=address
rs("beizhu")=beizhu
if moren="1" then
  rs("moren")=true
end if
rs.update
%>
<script language="javascript">
alert("仓库添加成功!")
window.location.href="ku.asp"
</script> 
<%
end if
%>
</body>
</html>

⌨️ 快捷键说明

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