📄 systemsmallclassmanage.asp
字号:
<td height="22" colspan="2" align="center" bgcolor="#FFFFFF" class="fonttitle"><strong>修改系统小类</strong></td>
</tr>
<tr>
<td width="30%" height="26" align="right" bgcolor="#E7E7DE">
<font color="#CC0000">*</font> 小类名称：</td>
<td width="70%" bgcolor="#FFFFFF"> <input name="T_SClassName" type="text" id="T_BClassName" size="40" value="<%=rs_edit("SClassName")%>"></td>
</tr>
<tr>
<td height="22" align="right" bgcolor="#E7E7DE">所属大类：</td>
<td bgcolor="#FFFFFF"> <select name="S_BigClassID">
<%set rs_class=server.CreateObject("adodb.recordset")
sql_class="select * from tSystemBigClass"
rs_class.open sql_class,conn,1,1
do while not rs_class.eof
if rs_edit("BigClassID")=rs_class("ID") then
response.write "<option value='"&rs_class("ID")&"' selected>"&rs_class("BClassName")&"</option>"
else
response.write "<option value='"&rs_class("ID")&"'>"&rs_class("BClassName")&"</option>"
end if
rs_class.movenext
loop
%>
</select></td>
</tr>
<tr>
<td height="22" align="right" bgcolor="#E7E7DE">添加时间：</td>
<td bgcolor="#FFFFFF"> <input name="T_AddTime" type="text" id="T_AddTime" value="<%=rs_edit("AddTime")%>"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="31" colspan="2" align="center"><input name="BigClassID" type="hidden" id="BigClassID" value="<%=request("BigClassID")%>">
<input name="PageNo" type="hidden" id="PageNo" value="<%=request("PageNo")%>">
<input name="EditID" type="hidden" id="EditID" value="<%=request("EditID")%>">
<input type="submit" name="Submit4" value="正确提交" onClick="return check_data(this.form)">
<input type="reset" name="Submit22" value="重新填写"> <input type="button" name="Submit32" value="返回" onClick="javascript:history.back();"></td>
</tr>
</form>
</table>
<%end if%> <table width="98%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="32" align="center"> <% set rs_BigClass=server.CreateObject("adodb.recordset")
sql_BigClass="select * from tSystemBigClass"
rs_BigClass.open sql_BigClass,conn,1,1
do while not rs_BigClass.eof
response.write "<a href='?BigClassID="&rs_BigClass("ID")&"'>"&rs_BigClass("BClassName")&"</a> "
rs_BigClass.movenext
loop
%> </td>
</tr>
</table>
<% PERPAGE =15
PageNo=request("PageNo")
set rs=server.createobject("ADODB.recordset")
if request("BigClassID")="" then
sql="select tSystemSmallClass.*,tSystemBigClass.BClassName from tSystemSmallClass,tSystemBigClass where tSystemSmallClass.BigClassID=tSystemBigClass.ID"
else
sql="select tSystemSmallClass.*,tSystemBigClass.BClassName from tSystemSmallClass,tSystemBigClass where tSystemSmallClass.BigClassID=tSystemBigClass.ID and BigClassID='"&request("BigClassID")&"'"
end if
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "暂时没有数据!"
else
if request("PageNo")="" then
curpage = 1
else
curpage = cint(request("PageNo"))
end if
rs.pagesize = PERPAGE
rs.absolutepage = curpage
%> <table width="98%" border="0" cellspacing="0" cellpadding="0">
<tr align="center">
<td colspan="2"><table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
<tr align="center" bgcolor="#FFFFFF">
<td width="14%" height="22">ID</td>
<td width="14%"><strong>类别名称</strong></td>
<td width="15%" height="22"><strong>所属种类</strong></td>
<td width="16%"><strong>添加时间</strong></td>
<td width="12%" height="22"><strong>功能操作</strong></td>
</tr>
<% for i = 1 to rs.pagesize %>
<tr align="center" bgcolor="#FFFFFF" onMouseOver="this.style.backgroundColor='#e7e7e7';" onMouseOut="this.style.backgroundColor='#ffffff'">
<td height="22"><%=rs("ID")%></td>
<td height="22"><%=rs("SClassName")%></td>
<td height="22"><%=rs("BClassName")%></td>
<td height="22"><%=rs("AddTime")%></td>
<td height="22"> <a href='?cur_action=edit&EditID=<%=rs("ID")%>&BigClassID=<%=request("BigClassID")%>&PageNo=<%=PageNo%>'>修改</a>|<a href='javascript:dele_check("<%=rs("ID")%>","<%=request("BigClassID")%>","<%=PageNo%>")'>删除</a></td>
</tr>
<% rs.movenext
if rs.eof then
i = i + 1
exit for
end if
next %>
</table></td>
</tr>
<tr>
<td height="8" colspan="2"></td>
</tr>
<tr>
<td width="33%"> 页次：<b><%=curpage%></b>/<b><%=rs.pagecount %></b>页 共<b><%=rs.recordcount %></b>条记录</td>
<td width="67%" align="right"> <%
if curpage = 1 then
response.write " 首页 | 上一页 | "
else
response.write "<a href='?PageNo=1&BigClassID="&request("BigClassID")&"'><b> 首页 </b></a> | <a href='?PageNo="&curpage-1&"&BigClassID="&request("BigClassID")&"'><b>上一页</b></a>| "
end if
if curpage = rs.pagecount then
response.write "后一页 | 尾页 "
else
response.write "<a href='?PageNo="&curpage+1&"&BigClassID="&request("BigClassID")&"'><b>后一页</b> </a>| <a href='?PageNo="&rs.pagecount&"&BigClassID="&request("BigClassID")&"'><b>尾页</b> </a>"
end if
%> 跳转到：
<select name="menu1" onChange="MM_jumpMenu('parent.frames[\'right\']',this,0)">
<% for i=1 to rs.pagecount
if curpage=i then
response.write "<option value='?PageNo="&i&"&BigClassID="&request("BigClassID")&"' selected>第"&i&"页"
else
response.write "<option value='?PageNo="&i&"&BigClassID="&request("BigClassID")&"'>第"&i&"页"
end if
next
%>
</select></td>
</tr>
</table>
<%end if%> <br> <br> <br> <br> </td>
<td width="10" background="images/midder2.gif"><img src="images/midder2.gif" width="2" height="3"></td>
</tr>
<tr>
<td valign="top"><img src="images/bottom1.gif" width="6" height="14"></td>
<td height="14" valign="top" background="images/bottom2.gif"><img src="images/bottom2.gif" width="2" height="14"></td>
<td valign="top"><img src="images/bottom3.gif" width="2" height="14"></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -