📄 gysinfo_add.asp
字号:
<!--#include file="../conn.asp"-->
<%
ckadd=douhao(trim(request("ckadd")))
company_type_id=douhao(trim(request("company_type_id")))
company_name=douhao(trim(request("company_name")))
company_address=douhao(trim(request("company_address")))
company_tel=douhao(trim(request("company_tel")))
company_fax=douhao(trim(request("company_fax")))
company_linkman=douhao(trim(request("company_linkman")))
company_linkmantel=douhao(trim(request("company_linkmantel")))
company_bank_id=douhao(trim(request("company_bank_id")))
Company_banknum=douhao(trim(request("Company_banknum")))
company_credit_id=douhao(trim(request("company_credit_id")))
remark=douhao(trim(request("remark")))
'response.End()
if ckadd<>"" then
set rs=server.createobject("adodb.recordset")
rs.open "select * from ht_company where company_name='"&company_name&"'",conn,1,1
if not rs.eof then
response.write "<script language='javascript'>alert('该记录已存在！请不要重复添加！');history.back();</script>"
rs.close
response.end()
else
rs.close
set rs=nothing
if ckadd="保存退出" then
conn.execute ("insert into ht_company(company_type_id,company_name,company_address,company_tel,company_fax,company_linkman,company_linkmantel,company_bank_id,company_banknum,company_credit_id,remark) values ("&company_type_id&",'"&company_name&"','"&company_address&"','"&company_tel&"','"&company_fax&"','"&company_linkman&"','"&company_linkmantel&"',"&company_bank_id&",'"&company_banknum&"',"&company_credit_id&",'"&remark&"')")
response.write "<script language='javascript'>window.opener.location.reload();window.close();</script>"
elseif ckadd="保存新增" then
conn.execute ("insert into ht_company(company_type_id,company_name,company_address,company_tel,company_fax,company_linkman,company_linkmantel,company_bank_id,company_banknum,company_credit_id,remark) values ("&company_type_id&",'"&company_name&"','"&company_address&"','"&company_tel&"','"&company_fax&"','"&company_linkman&"','"&company_linkmantel&"',"&company_bank_id&",'"&company_banknum&"',"&company_credit_id&",'"&remark&"')")
response.write "<script language='javascript'>window.opener.location.reload();</script>"
end if
end if
end if
%>
<html>
<head>
<title>基础资料维护--增加供应商</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/body.css" rel="stylesheet" type="text/css">
<link href="../css/test.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
-->
</style>
</head>
<script language="JavaScript">
function check(){
if (document.form1.company_name.value==''){
alert('请输入单位名称！');
document.form1.company_name.focus();
return false;
history.back();
}
if (document.form1.company_linkman.value==''){
alert('请输入联系人！');
document.form1.company_name.focus();
return false;
history.back();
}
return true;
}
</script>
<body leftmargin="0" topmargin="00" marginwidth="0" marginheight="0">
<form name="form1" method="post" action="">
<table width="100%" border="0" cellspacing="0">
<tr>
<td height="711" valign="top" class="borderon"><table width="500" border="0" align="center" cellpadding="0" cellspacing="2">
<tr>
<td>往来单位详细信息：</td>
<td> </td>
</tr>
<tr>
<tr><td height="10"> </td>
<td></td></tr>
<td>往来类型：
<select name="company_type_id" id="company_type_id">
<% set rs=conn.execute("select * from ht_companytype")
if not rs.eof then
do while not rs.eof
response.Write(" <option value="&rs("Company_typeid")&">"&rs("Company_typename")&"</option>")
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
</td>
<td> </td>
</tr>
<tr>
<td colspan="2">单位名称：
<input name="company_name" type="text" id="company_name" size="30">
<span class="STYLE1">*</span></td>
</tr>
<tr>
<td colspan="2">单位地址：
<input name="company_address" type="text" id="company_address" size="40"></td>
</tr>
<tr>
<td>单位电话：
<input name="company_tel" type="text" id="company_tel" size="20"></td>
<td>单位传真：
<input name="company_fax" type="text" id="company_fax" size="20"></td>
</tr>
<tr>
<td>联 系 人：
<input name="company_linkman" type="text" id="company_linkman">
<span class="STYLE1">*</span></td>
<td>联系电话：
<input name="company_linkmantel" type="text" id="company_linkmantel"></td>
</tr>
<tr>
<td colspan="2">开户银行：
<select name="company_bank_id" id="company_bank_id">
<% set rs=conn.execute("select * from ht_bank")
if not rs.eof then
do while not rs.eof
response.Write(" <option value="&rs("bank_id")&">"&rs("bank_name")&"</option>")
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
</td>
</tr>
<tr>
<td colspan="2">银行账户：
<input name="Company_banknum" type="text" id="Company_banknum" size="30"></td>
</tr>
<tr>
<td>信 誉 度：
<select name="company_credit_id" id="company_credit_id">
<% set rs=conn.execute("select * from ht_creditlevel")
if not rs.eof then
do while not rs.eof
response.Write(" <option value="&rs("creditlevel_id")&">"&rs("creditlevel_name")&"</option>")
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</select>
</td>
<td> </td>
</tr>
<tr>
<td colspan="2" valign="middle">备 注：
<textarea name="remark" cols="40" rows="5" id="remark"></textarea></td>
</tr>
<tr>
<td height="20"> </td>
<td><td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input name="ckadd" type="submit" id="ckadd" onClick="javascript:return check();" value=" 保存退出 ">
<input type="button" name="Submit22" value=" 关闭 " onClick="javascript:window.close();">
<input name="ckadd" type="submit" id="ckadd" onClick="javascript:return check();" value=" 保存新增 ">
</div></td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -