www.gusucode.com > 盐城分类信息网asp源码程序 > admin/fenleiedit.asp
<!--#include file=conn.asp-->
<!--#include file=cookies.asp-->
<%
dim rs,sql,class1,paixu
if request("cnmai")="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 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改总分类</title>
<link href="inc_style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
background-color: #E7EEF5;
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style></head>
<body>
<center>
<form method="POST" action="fenleiedit.asp?cnmai=ok&id=<%=request("id")%>">
<table width="68%" border="1" align="center" cellpadding="3" cellspacing="0" bordercolorlight="#335078" bordercolordark="#FFFFFF" bgcolor="#C5D5E4" style="font-size:12px; letter-spacing:1px;">
<tr bgcolor="#B6EBC4">
<td width="322" bgColor="#C5D5E4" height="25">
<p align="center"><font color="#FF0000">大类修改</font></td>
</tr>
<tr>
<td bgcolor="#E6ECF2" >
大类名称：
<input name="class1" size="20" value="<%=class1%>"></td>
</tr>
<tr>
<td height="25" bgcolor="#E6ECF2">
排序数字：
<input value="<%=paixu%>" name="paixu" size="20"></td>
</tr>
<tr>
<td width="322" height="25" bgcolor="#E6ECF2">
<p align="center">
<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
%>