adm_contact.asp

来自「非常有商业价值的软件」· ASP 代码 · 共 91 行

ASP
91 行
字号 
<!--#include file="chk.asp"-->
<!--#include file="../my_lib/my_request.asp" -->
<!--#include file="db_conn.asp" -->
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>联系方式</title>
<LINK href="style.css" rel=stylesheet type=text/css>
</head>

<body>
<%
action=my_request("action",0)
if action="save" then
call save()
end if
sql="select company_name,company_address,postal,linkman,phone,fax,email from system_setup where id=1"
set rs=conn.execute (sql)
%>
<form action="adm_contact.asp" method="post">
<div align="center">
	<table border="0" width="760" id="table1" bordercolor="#EFEFEF">
		<tr>
			<td colspan="2" bgcolor="#EFEFEF">
			<p align="center">联系方式</td>
		</tr>
		<tr>
			<td width="286" align="right">公司名称：</td>
			<td width="448">
			<input type="text" name="company_name" size="37" value="<%=rs("company_name")%>"></td>
		</tr>
		<tr>
			<td width="286" align="right">公司地址：</td>
			<td width="448">
			<input type="text" name="company_address" size="37" value="<%=rs("company_address")%>"></td>
		</tr>
		<tr>
			<td width="286" align="right">邮政编码：</td>
			<td width="448">
			<input type="text" name="postal" size="21" value="<%=rs("postal")%>"></td>
		</tr>
		<tr>
			<td width="286" align="right">联系人：</td>
			<td width="448">
			<input type="text" name="linkman" size="21" value="<%=rs("linkman")%>">
			<input type="hidden" name="action" value="save"></td>
		</tr>
		<tr>
			<td width="286" align="right">联系电话：</td>
			<td width="448">
			<input type="text" name="phone" size="37" value="<%=rs("phone")%>"></td>
		</tr>
		<tr>
			<td width="286" align="right">传真号码：</td>
			<td width="448">
			<input type="text" name="fax" size="37" value="<%=rs("fax")%>"></td>
		</tr>
		<tr>
			<td width="286" align="right">电子邮件地址：</td>
			<td width="448">
			<input type="text" name="email" size="29" value="<%=rs("email")%>"></td>
		</tr>
		<tr>
			<td colspan="2">
			<p align="center"><input type="submit" value="确定修改" name="B1"></td>
		</tr>
	</table>
</div>
</form>
</body>

</html>
<%
rs.close
set rs=nothing

sub save()
company_name=my_request("company_name",0)
company_address=my_request("company_address",0)
postal=my_request("postal",0)
linkman=my_request("linkman",0)
phone=my_request("phone",0)
fax=my_request("fax",0)
email=my_request("email",0)
sql="update system_setup set company_name='"&company_name&"',company_address='"&company_address&"',postal='"&postal&"',linkman='"&linkman&"',phone='"&phone&"',fax='"&fax&"',email='"&email&"' where id=1"
conn.execute (sql)
end sub

%>

adm_contact.asp - 源码说明

本页面展示了「非常有商业价值的软件」中的 adm_contact.asp 源码文件，采用 ASP 编程语言编写，共 91 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与商相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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