📄 add_class_1_ok.asp
字号:
<%@ language="vbscript"%>
<%response.Expires = 0%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from Class_1 where Class_1_name='" & request.form("class_name") & "'"
rs.open sqltext,conn,1,1
'查找数据库，检查商品大类是否已经存在
if rs.recordcount >= 1 then
if rs("Class_1_name")=request.form("class_name") then
Response.Redirect "messagebox.asp?msg=此商品大类已经存在，请选用其它名称!"
response.end
rs.close
end if
end if
set rs=server.createobject("adodb.recordset")
sqltext="select * from Class_1"
rs.open sqltext,conn,3,3
'添加一个商品大类到数据库
rs.addnew
rs("Class_1_name")=request.form("class_name")
rs.update
%>
<%
set rs_detail=server.createobject("adodb.recordset")
sqltext2="select * from Class_1 where Class_1_name='" & request.form("class_name") & "'"
rs_detail.open sqltext2,conn,1,1
%>
<html>
<head>
<title>商品大类添加成功</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css">
</head>
<body text="#000000">
<p align="center">
<p align="center"> <TABLE cellSpacing=1 cellPadding=5 width=258 bgColor=#5A8BCE height="144">
<TBODY>
<TR vAlign=top bgColor=#8CAAE7>
<TD class=main1 colSpan=2 width="244" height="10"></TD>
</TR>
<TR vAlign=top bgColor=#E6F7FF>
<TD width="244" height="32" colSpan=2 class=main1><font color="#FF0000">商品大类添加成功</font></TD>
</TR>
<TR bgColor=#E6F7FF>
<TD class=main1 width=102 height=25><SPAN
class=main1>商品大类名称：</SPAN></TD>
<TD width=130 height=25 class=main1><%=rs_detail("Class_1_name")%> </TD></TR>
<TR vAlign=top bgColor=#E6F7FF>
<TD width="244" height="15" colSpan=2 class=main1></TD>
</TR>
<TR bgColor=#E6F7FF>
<TD width="244" height="27" colSpan=2 class=main1>
<p align="center"><input name="B4" type="button" class="smallInput" onclick="window.location.href='add_class_1.asp';" value="添加下一个">
</TD></TR>
<TR bgColor=#8CAAE7>
<TD class=main1 colSpan=2 width="244" height="4"></TD>
</TR></TBODY></TABLE>
</body>
</html>
<%
rs.close
rs_detail.close
conn.close
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -