📄 addnew.asp
字号:
<!--#include file="top.htm"-->
<!--#include file="db.asp"-->
<!--#include file="session.asp"-->
<body><table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="25%" valign="top" rowspan="2">
<table border="1" width="100%" bordercolorlight="#000000" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF">
<%mess="公 司 通 讯 记 录 列 表"
add=request("add")
if add="on" then
addr=request("addr")
yb=request("yb")
zj=request("zj")
cz=request("cz")
comp=request("comp")
if addr="" then
addr="-"
end if
if yb="" then
yb="-"
end if
if zj="" then
zj="-"
end if
if cz="" then
cz="-"
end if
if comp="" then
comp="-"
end if
strSql = "insert into cp(addr,yb,zj,cz,comp) values('"&addr&"','"&yb&"','"&cz&"','"&cz&"','"&comp&"')"
conn.Execute strSql
mess="添加新记录成功！"
end if
Set rsd = Server.CreateObject("ADODB.Recordset")
sql="Select * From cp Order By id"
rsd.open sql,Conn,3,3
do while not rsd.eof
%>
<tr>
<td width="100%" class="coolButton" height="30"><a href=default.asp?id=<%=rsd("id")%> target=_self title=<%=rsd("comp")%>详细情况><%=rsd("comp")%></a></td>
</tr>
<%rsd.MoveNext
Loop%>
</table>
</td>
<td width="75%" valign="top">
<form action=addnew.asp target=_self><input type="hidden" name="add" value="on">
<div align="center">
<center>
<table border="2" width="90%" bordercolorlight="#000000" cellspacing="1" cellpadding="0" bordercolordark="#000000">
<tr>
<td width="20%" align="center" height="20">公司名称：</td>
<td width="58%" colspan="4" height="20"> <input type="text" name="comp" size="40" style="font-size: 9pt"></td>
<td width="19%" height="40" rowspan="2">
<p align="center"><input type="submit" value="添 加" style="font-size: 12pt"></td>
</tr>
<tr>
<td width="20%" align="center" height="20">公司地址：</td>
<td width="58%" colspan="4" height="20"> <input type="text" name="addr" size="40" style="font-size: 9pt"></td>
</tr>
<tr>
<td width="20%" align="center" height="20">邮 编：</td>
<td width="10%" height="20">
<p align="center"><input type="text" name="yb" size="8" style="font-size: 9pt"></td>
<td width="15%" height="20">
<p align="center">总机：</td>
<td width="20%" height="20">
<p align="center"><input type="text" name="zj" size="10" style="font-size: 9pt"></td>
<td width="15%" height="20">
<p align="center">传真：</td>
<td width="20%" height="20">
<p align="center"><input type="text" name="cz" size="10" style="font-size: 9pt"></td>
</tr>
</table>
</center>
</div>
</form></td>
</tr>
<tr>
<td width="75%">
<p align="center"><font color="#FF0000"><%=mess%></font><iframe src="listcomp.asp" width=100% height=250></iframe>
</p>
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -