📄 addtype.asp
字号:
<%@ LANGUAGE="VBScript"%>
<html>
<head>
<title>新增物品类别</title>
<style type="text/css">
<!--
.STYLE2 {font-size: 36px;
font-family: "方正姚体";color: #0000FF;}
.STYLE3 {font-size: 12px}
body { background-image: url(images/1.gif);}
-->
</style>
</head>
<body topmargin="0" onload=this.document.input.typename.focus();>
<p>
<!--#include file="conn.asp"-->
<!--#include file=function.asp-->
<%
gettype(session("storage"))
%>
<%
if Request.ServerVariables("REQUEST_METHOD")="POST" then
if request.form("typename")<>"" then
sql="select * from leibie where lei_name='"&request.form("typename")&"' and in_cangku="&session("storage")
rs.open sql,conn,3,2
if rs.eof then
rs.addnew
rs("lei_name")=request.form("typename")
rs("in_cangku")=session("storage")
rs("parent_id")=session("prnt")
rs.update
response.write "<p align=center>添加成功,请<a href='viewkucun.asp'>返回</a><br><br>"
else
response.write "<p align=center>该类别已存在,请<a href='addtype.asp'>重新输入</a><br><br>"
end if
rs.close
else
response.write "<p align=center>请<a href='addtype.asp'>输入类别名称</a><br><br>"
end if
else
%>
</p>
<p><span class="STYLE2"><img src="images/2.gif" width="89" height="153">新增产品类别 </span></p>
<form action="addtype.asp" method="POST" name="input">
<table align=center border=0>
<tr>
<td nowrap><span class="STYLE3"><font color=blue>类别名称：</span></td>
<td><input class=STYLE3 type=textbox name="typename" value=''>
**</td>
</tr>
<tr>
<td>
<td><br><input class=STYLE3 type=submit name=ok value=添加>
<input class=STYLE3 type=reset name=reset value=取消 >
<input class=STYLE3 type=button name=retu value=返回 onclick=history.go(-1) >
</tr>
</table>
</form>
<%end if%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -