www.gusucode.com > 云枫企业网站源代码第二版 2.0源码程序 > admin/product/sortname.asp
<!--#include file="../inc/Conn.asp"--> <!--#include file="../inc/admin.asp"--><head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="../Admin_Style.css"> <title>后台管理--增加类别</title> </head> <SCRIPT language=javascript> function ConfirmDel() { if(confirm("确定要删除选中的记录吗?一旦删除将不能恢复!")) return true; else return false; } </SCRIPT> <table cellpadding="2" cellspacing="1" border="0" width="500" class="border" align=center height="30"> <%if request("id")<>"" then key=request("id") set tp=server.createobject("adodb.recordset") sqll="select * from sortname where id="&key tp.open sqll,conn,3,3 lb_name=tp("sortname") lb_namee=tp("sortnamee") end if %> <form name="form1" method="post" action="addsortname.asp"> <tr> <td width="480" height="26" style="background-image: url('../Images/topbg1.gif')"><font color="#FFFFFF"><strong>类别名称:</strong></font></td> </tr> <tr> <td class="tdbg"><div align="center"> (中)<input name="lb_name" type="text" id="lb_name" size="20" value="<%if key<>"" then%><%=lb_name%><%end if%>"> (英)<input name="lb_namee" type="text" id="lb_namee" size="20" value="<%if key<>"" then%><%=lb_namee%><%end if%>"> <%if key="" then%> <input type="submit" name="Submit" value="增加"> <%else%> <input name="pdid" type="hidden" id="pdid2" value="<%=key%>"> <input type="submit" name="Submit" value="修改"> <a href="sortname.asp">增加新类别</a> <%end if%> </div></td> </tr> <tr> <td height="20" class="tdbg"> </td> </tr> </form> </table> <br> <table width="500" height="19" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td align="center"> <%set rs=server.createobject("adodb.recordset") sql="select*from sortname" rs.open sql,conn,3,3%> <%if rs.eof or rs.bof then response.write "没有任何产品类别 :(" else%> <table cellpadding="2" cellspacing="1" border="0" width="500" class="border" align=center height="30"> <tr > <td colspan="3" height="26" style="background-image: url('../Images/topbg1.gif')"><font color="#FFFFFF">注意:点击"类别名称"进入下一级别操作;<br> 如果点击"删除"则删除这个类别及类别下面的全部内容</font></td> </tr> <tr> <td width="194" height="23" class="tdbg">类别名称</td> <td width="148" height="23" class="tdbg">建立时间</td> <td width="135" height="23" class="tdbg">操作</td> </tr> <%do while not rs.eof%> <tr> <td height="23" class="tdbg"><%=rs("sortname")%></td> <td class="tdbg"><%=rs("sj")%></td> <td class="tdbg"><a href="sortname.asp?id=<%=rs("id")%>">修改</a> <a href="sortname.asp?ID=<%=rs("ID")%>&Action=del" onclick="return ConfirmDel();">删除</a></td> </tr> <%rs.movenext loop%> </table> <%end if%> </td> </tr> </table> <% if request("Action")="del" then id=request("id") set rs=server.createobject("adodb.recordset") sql="delete from sortname where id="&id rs.open sql,conn,3,3 set rs=nothing response.redirect "sortname.asp" end if if request("Action")="edit" then if request("submit")="修改" then key=request("pdid") set rs=server.createobject("adodb.recordset") sql="select*from sortname where id="&key rs.open sql,conn,3,3 rs("sortname").value=lb_name rs.update response.redirect "sortname.asp" rs.close set rs=nothing end if end if if request("Action")="add" then if lb_name="" then%> <script language="JavaScript"> alert("『类别名称』不能为空,请返回填写!") history.back(1) </script> <%response.end end if if request("submit")="增加" then set rs=server.createobject("adodb.recordset") rs.open "select*from sortname",conn,3,3 rs.addnew rs("sortname")=lb_name rs.update response.redirect "sortname.asp" rs.close set rs=nothing end if end if %>