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

📄 product_admin.asp

📁 商会 商会 商会 商会 商会 商会 商会 商会 商会 商会 商会 商会 商会
💻 ASP
📖 第 1 页 / 共 2 页
字号:
				<td width="35" align="center"><%=rs("sortnum")%></td>
				<td align=left><a href="<%=addhtml%>&prono=<%=rs("prono")%>&pageno=<%=pageno%>">
					<%Response.Write Server.HTMLEncode(trim(rs("title")))%></a>
				</td>
				<td width="60" align="center">
				<%Select Case trim(rs("state"))
					case "0"
						Response.Write("<font color=ff0000>不显示</font>")
					case "1"
						Response.Write("<font color=000000>正常</font>")
				 end select		
				%>
				</td>
				<%if mid(qxflag,1,1)="1" then%>
				<td width="60" align="center">
				<%Select Case trim(rs("nomflag"))
					case "0"
						Response.Write("<font color=000000>不推荐</font>")
					case "1"
						Response.Write("<font color=800000>新品推荐</font>")
					case "2"
						Response.Write("<font color=ff4500>新品推荐</font>")
				 end select		
				%>
				</td>
				<%end if%>
				<td width=40 align="right" height=20><%=rs("querycount")%></td>
				<td width=70 align="center" height=20>
					<a href="Javascript:editimage('<%=rs("prono")%>')">小图</a>
					<%if rs("picflag")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>																				
				<%if mid(qxflag,2,1)="1" then%>
				<td width=76 align="center" height=20>
					<a href="Javascript:editimage2('<%=rs("prono")%>')">放大图</a>
					<%if rs("picflag2")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>
				<%end if%>
				<%if mid(qxflag,4,1)="1" then%>
				<td width=76 align="center" height=20>
					<a href="Javascript:editimage3('<%=rs("prono")%>')">推荐图</a>
					<%if rs("picflag3")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>
				<%end if%>
				
				<%if mid(qxflag,6,1)="1" then%>
				<td width=70 align="center" height=20>
					<a href="Javascript:editimage4('<%=rs("prono")%>')">大图1</a>
					<%if rs("spicflag4")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>
				<%end if%>

				<%if mid(qxflag,7,1)="1" then%>
				<td width=70 align="center" height=20>
					<a href="Javascript:editimage5('<%=rs("prono")%>')">大图2</a>
					<%if rs("spicflag5")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>
				<%end if%>

				<%if mid(qxflag,8,1)="1" then%>
				<td width=70 align="center" height=20>
					<a href="Javascript:editimage6('<%=rs("prono")%>')">大图3</a>
					<%if rs("spicflag6")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>	
				<%end if%>
				
				<%if mid(qxflag,5,1)="1" then%>
				<td width=70 align="center" height=20>
					<a href="Javascript:editfile('<%=rs("prono")%>')">文档</a>
					<%if rs("fileflag")="1" then Response.Write("<font color=red style='font-size:12px'>(有)</font>") else Response.Write("<font color=navy style='font-size:12px'>(无)</font>")%>
				</td>
				<%end if%>
				
				<%if mid(qxflag,3,1)="1" then%>
				<td width=70 align="center" height=20>
					<a href="product_info.asp?classcode=<%=classcode%>&pageno=<%=pageno%>&prono=<%=rs("prono")%>">图文</a>
					<%
					if rs("infocount")>0 then
						Response.Write ("<font color=ff6600>("&rs("infocount")&")</font>")
					end if	
					%>
				</td>
				<%end if%>
			</tr>
		<%	
			i=i+1
			rs.MoveNext
		loop
		%>
	 	 	<input type=hidden value="<%=i-1%>" name=rectot>
		 </form> 	
		 </table>
	</td></tr>
	<tr><td valign=top height=30>
		<table width="100%" border="0" cellspacing="0" cellpadding="0">
			<tr><td colspan=2 bgcolor="696969" height=1></td></tr>
			<tr><td>
			</td><td align=right height=30>
			[第<font color=ff6600><b><%=pageno%></font></b>页, 共<b><font color=ff6600><%=rs.PageCount%></font></b>页<b><font color=ff6600><%=rs.RecordCount%></font></b>条记录]			
			<%if pageno>1 then%>
				<a class=r1 href="<%=htmlname%>&pageno=1">[首页]</a>              
				<a class=r1 href="<%=htmlname%>&pageno=<%=pageno-1%>">[上页]</a>              
			<%end if              
			if pageno<rs.PageCount then%>              
				<a class=r1 href="<%=htmlname%>&pageno=<%=pageno+1%>">[下页]</a>              
				<a class=r1 href="<%=htmlname%>&pageno=<%=rs.PageCount%>">[末页]</a>              
			<%end if%>              
			</td></tr>              

		</table>
		
		<%
		rs.Close
		%>
	</td></tr>
</table>
</body>
</html>

<!-- #include file="sysfunc.inc.asp" -->

<script language="Javascript">

	function checkall(form)
	 {
		  for (var i=0;i<form.elements.length;i++)
		    {
			    var obj = form.elements[i];
			    var objname=obj.name;
			   
			    if(objname.substring(0,9)=="checksele")
					{
					 obj.checked=form.seleall.checked	
					}
		    }
	  }

	function delmsg(form)
	{
		var flag=false;
		var i,rectot,obj1
		rectot=form.rectot.value;
		for(i=1;i<=rectot;i++)				
		{
			obj1=eval("form.checksele"+i);
			if (obj1.checked) flag=true;	
		}

		if (flag){
			if (confirm('确认删除选择的记录吗?')==true) form.submit();
		}else alert("请先选择要删除的记录!");	
	}

	function editfile(keyno)
	{
		var str
		str="../files/file_upload.asp?" ;
		str=str+"keyno="+keyno+"&tablename=product&code=product&keyword=prono&strflag=0&flagfield=fileflag&filefield=filename"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}

	function editfile2(keyno)
	{
		var str
		str="../files/file_upload.asp?" ;
		str=str+"keyno="+keyno+"&tablename=miscell&keyword=keyno&strflag=0&code=miscellb&flagfield=picflag2&filefield=picfile2"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")
	}

	function editimage(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")
	}

	function editimage2(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0&flagfield=picflag2&code=product2"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}

	function editimage3(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0&flagfield=picflag3&code=product3"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}
	
	function editimage4(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0&flagfield=spicflag4&code=product4"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}
	
	function editimage5(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0&flagfield=spicflag5&code=product5"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}	
	function editimage6(keyno)
	{
		var str
		str="../admin/pic_upload.asp?keyno="+keyno+"&tablename=product&keyword=prono&strflag=0&flagfield=spicflag6&code=product6"
		window.open(str,"mywin","toolbar=no,location=no,directories=no,status=no,resizable=no,menubar=no,scrollbars=yes,width=550,height=400,left=120,top=70")		
	}	
	
</script>

⌨️ 快捷键说明

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