66hcfl.asp

3ani桑尼网络wap导航程序wap导航程序wap导航程序

<!--#include file="../66hc.asp"--><!--#include file="admin.asp"-->
<card id="main" title="分类管理" >
<p>
数字小的在前面<br/>
<%
id=request("id")
if id="" then id="0"
set rs=Server.CreateObject("ADODB.Recordset")
rsstr="select * from [66hc_class] where [66hc_id]="&id
rs.open rsstr,conn,1,2
if rs.eof then 
response.write("无此分类<br/>")
else
%>
分类名称<input name='name<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_name"))%>'/><br/>
排列顺序<input name='pid<%=minute(now)%><%=second(now)%>' format='*N' maxlength='6' value='<%=ubb(rs("66hc_pid"))%>' size='2' emptyok='false'/><br/>
是否换行<select name='br<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_br"))%>'>
<option value="0">无须换行</option>
<option value="1">自动换行</option>
</select><br/>
是否显示在上部<select name='xs<%=minute(now)%><%=second(now)%>' value='<%=ubb(rs("66hc_xs"))%>'>
<option value="0">显示在上部</option>
<option value="1">显示在下部</option>
</select><br/>
<anchor>[确定编辑]<go href='66hcflsz.asp' method='post' accept-charset='utf-8'>
<postfield name='name' value='$(name<%=minute(now)%><%=second(now)%>)'/>
<postfield name='pid' value='$(pid<%=minute(now)%><%=second(now)%>)'/>
<postfield name='br' value='$(br<%=minute(now)%><%=second(now)%>)'/>
<postfield name='xs' value='$(xs<%=minute(now)%><%=second(now)%>)'/>
<postfield name='id' value='<%=id%>'/>
<postfield name='sb' value='<%=sb%>'/>
</go></anchor>
<%
end if
'rsp.update
rs.close
set rs=nothing%>
<%
response.write "<br/>----------<br/><a href='tjfl.asp?sb="&sb&"'>增加分类</a><br/>"
%>
----------<br/>
<a href="66hc_fl.asp?sb=<%=sb%>">返回分类管理</a><br/>
<a href="d_i.asp?sb=<%=sb%>">返回管理首页</a><br/>
<a href="/?sb=<%=sb%>">返回网站首页</a><br/>
报时:<%=time%>
</p></card></wml>