📄 gysinfo_modi.asp
字号:
<!--#include file="../conn.asp"-->
<%
company_id=trim(request("company_id"))
ckedit=douhao(trim(request("ckedit")))
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")))
if ckedit<>"" then
set rs=server.createobject("adodb.recordset")
rs.open "select * from ht_company where company_name='"&company_name&"' and company_id<>"&company_id,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 ckedit="修改退出" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ht_company where company_id="&company_id&"",conn,1,3
if not rs.eof then
rs("company_type_id")=company_type_id
rs("company_name")=company_name
rs("company_address")=company_address
rs("company_tel")=company_tel
rs("company_fax")=company_fax
rs("company_linkman")=company_linkman
rs("company_linkmantel")=company_linkmantel
rs("company_bank_id")=company_bank_id
rs("company_banknum")=company_banknum
rs("company_credit_id")=company_credit_id
rs("remark")=remark
rs.update
end if
rs.close
set rs=nothing
response.write "<script language='javascript'>window.opener.location.reload();window.close();</script>"
end if
end if
end if
company_id=trim(request("company_id"))
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from ht_company where company_id="&company_id&"",conn,1,1
if not rs.eof then
company_type_id=rs("company_type_id")
company_name=rs("company_name")
company_address=rs("company_address")
company_tel=rs("company_tel")
company_fax=rs("company_fax")
company_linkman=rs("company_linkman")
company_linkmantel=rs("company_linkmantel")
company_bank_id=rs("company_bank_id")
company_banknum=rs("company_banknum")
company_credit_id=rs("company_credit_id")
remark=rs("remark")
end if
rs.close
set rs=nothing
%>
<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
if rs("company_typeid")=company_type_id then
response.Write(" <option value="&rs("Company_typeid")&" selected>"&rs("Company_typename")&"</option>")
rs.movenext
end if
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" value="<%=company_name%>" size="30">
<span class="STYLE1">*</span></td>
</tr>
<tr>
<td colspan="2">单位地址：
<input name="company_address" type="text" id="company_address" value="<%=company_address%>" size="40"></td>
</tr>
<tr>
<td>单位电话：
<input name="company_tel" type="text" id="company_tel" value="<%=company_tel%>" size="20"></td>
<td>单位传真：
<input name="company_fax" type="text" id="company_fax" value="<%=company_fax%>" size="20"></td>
</tr>
<tr>
<td>联 系 人：
<input name="company_linkman" type="text" id="company_linkman" value="<%=company_linkman%>">
<span class="STYLE1">*</span></td>
<td>联系电话：
<input name="company_linkmantel" type="text" id="company_linkmantel" value="<%=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
if rs("bank_id")=company_bank_id then
response.Write(" <option value="&rs("bank_id")&" selected>"&rs("bank_name")&"</option>")
rs.movenext
end if
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" value="<%=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
if rs("creditlevel_id")=company_credit_id then
response.Write(" <option value="&rs("creditlevel_id")&" selected>"&rs("creditlevel_name")&"</option>")
rs.movenext
end if
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"><%=remark%></textarea></td>
</tr>
<tr>
<td height="20"> </td>
<td><td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input name="ckedit" type="submit" id="ckedit" onClick="javascript:return check();" value=" 修改退出 ">
<input name="ckadd2" type="reset" id="ckadd2" value=" 重 置 ">
<input type="button" name="Submit22" value=" 关闭 " onClick="javascript:window.close();">
<input name="company_id" type="hidden" id="company_id" value="<%=company_id%>">
</div></td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -