⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 fenleiedit.asp

📁 信息管理系统 管理页面:admin/index.asp 用户和密码都是admin
💻 ASP
字号:
<!--#include file=conn.asp-->
<!--#include file=cookies.asp-->
<%
dim rs,sql,class1,paixu
if request("ijob")="ok" then
call ok()
response.end
end if
set rs = Server.CreateObject("ADODB.RecordSet")
sql="select * from [class1] where id="&cstr(request("id"))
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write "<li>参数错误!"
response.end
end if
class1=rs("class1")
paixu=rs("paixu")
rs.close
set rs=nothing
%>
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改总分类</title>
<link rel="stylesheet" type="text/css" href="../1.CSS">
</head>

<body topmargin="0" leftmargin="0">

<center>
<form method="POST" action="fenleiedit.asp?ijob=ok&id=<%=request("id")%>">
<table style="border-collapse: collapse" borderColor="#cccccc" height="68" cellSpacing="0" cellPadding="0" width="322" border="1">
  <tr>
    <td width="322" bgColor="#FFCC00" height="25">
    <p align="center"><font color="#FF0000">大类修改</font></td>
  </tr>
  <tr>
    <td style="border-bottom: medium none" align="middle" width="322" height="21">
    大类名称:<input name="class1" size="20" value="<%=class1%>"></td>
  </tr>
  <tr>
    <td style="border-top: medium none; border-bottom: medium none" align="middle" width="322" height="25">
    排序数字:<input value="<%=paixu%>" name="paixu" size="20"></td>
  </tr>
  <tr>
    <td style="border-top: medium none" width="322" height="25">
    <p align="center">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    <input style="color: #000000; border: 0px solid #000000; background-color: #FFCC00" type="submit" value="提交" name="B1"></td>
  </tr>
</table>
</form>
</center>
</body>
</html>
<%
sub ok()
set rs = Server.CreateObject("ADODB.RecordSet")
sql="select * from [class1] where id="&cstr(request("id"))
rs.open sql,conn,1,3
rs("class1")=request("class1")
rs("paixu")=request("paixu")
rs.update
rs.close
set rs=nothing
response.write "<li>修改大类成功!<br>"
response.write "<li>刷新后可以看到结果!"%>
<body onLoad="setTimeout(window.close, 3000)">
<%
end sub
closedb
%>

⌨️ 快捷键说明

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