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

📄 pic.asp

📁 程序为自主开发ASP+SQL大型购物搜索网站,系统管理、商铺、会员三种会员唯一帐号管理。目前已有数据条商品数据与数万条商铺信息
💻 ASP
字号:
<!--#include file="../../../INC/conn.asp"-->
<%

Dim ProductNumberID,w
	w               = Request.QueryString("w")
	if w = "" or Not IsNumeric(w) Then
	w               = 760
	End if
	h               = w*1
    ProductNumberID = Trim(Request.QueryString("ID"))

Set Rs = Conn.Execute("Select * From Product Where ProductNumberID = '"& ProductNumberID &"'")

	IF Not Rs.eof Then
	
	LookCount   = Rs("LookCount")
	ProductPic  = Rs("ProductPic")
	ProductStr  = Rs("ProductPic")
	ProductName = Rs("ProductName")
	ClassStr    = Rs("Class")
	DateTime    = Rs("DateTime")
	
	End IF
	
	Rs.Close
	
Set Rs = Nothing 

Set Rs = Conn.Execute("Update Product Set LookCount = "& LookCount+1 &" Where ProductNumberID = '"& ProductNumberID &"'")

'=======================================分类
ClassName = "<a href=../../../Search/ class=none1 target=_blank>引擎首页</a>"
    IF Not Isnull(ClassStr) and ClassStr <> "" Then
N = len(ClassStr)/3
x = 0
	For i = 1 to N
x = x + 3
Set Rs = Conn.Execute("Select * From Class where NumberID = '"& Left(ClassStr,x) &"'")
		IF Not (rs.bof and rs.bof) Then
			IF x <= 6 Then
			ClassName = ClassName &" >>> <a href=../../../Search/C"& Left(ClassStr,x) &".Html target=_blank class=none1>"& Rs("Class") &"</a>"
			Else
			ClassName = ClassName &" >>> <a href=../../../Search/Search.asp?C="& Left(ClassStr,x) &" target=_blank class=none1>"& Rs("Class") &"</a>"
			End IF
		End if
	Next
	End IF

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=ProductName%>的商品图片-卖家:<%=ShopName%>-<%=ShopTitle%>-<%=WebName%>-<%=Title%></title>
<link href="../../../Search/images/search.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td align="center"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
                <td width="244" height="90" valign="top"><a href="../../../Search/"><img src="../../../Search/images/logo.gif" alt="消费引擎首页-互联之光消费引擎-享受生活·享受时尚" width="244" height="78" border="0"></a></td>
              <td height="90">
				<div align="center">
					<div align="right">
						<table border="0" width="100%" cellspacing="0" cellpadding="0" height="30">
							<tr>
								
                          <td align="right"><IFRAME frameBorder=0 id=top name=top src="./../../../Search/Top_1.asp" scrolling="no" style="HEIGHT: 30; VISIBILITY: inherit; WIDTH: 100%; Z-INDEX: 1"></IFRAME></td>
							</tr>
						</table>
					</div>
					<table border="0" width="100%" cellspacing="0" cellpadding="0">
					<form name="form" method="get" action="../../../Search/search.asp">
						<tr>
							<td align="center">
              <table width="100%" height="30"  border="0" cellpadding="0" cellspacing="0">
                              <tr> 
                                <td width="55%" align="center"> 
                                  <table width="100%" height="28"  border="0" cellpadding="0" cellspacing="0">
                                    <tr> 
                                      <td align="center"> 
                                        <input name="q" type="text" class="search_box_1" id="q" value="<%=Searchkey%>">
                                      </td>
                                      <td width="20%" align="center" valign="top"> 
									    <input name="S" type="hidden" value="消费搜索">
                                        <input name="" type="submit" class="search2" value="消费搜索"> 
                                      </td>
                                    </tr>
                                  </table>
                                </td>
                                <td width="30%" align="center"> <a href="../../../Search/iSearch.asp" class="link2">无敌引擎</a></td>
                              </tr>
                            </table>
					        <table border="0" width="100%" cellspacing="0" cellpadding="0" height="25">
                              <tr>
							    <td align="left">
								
						</td>
						</tr>
					</table>
							</td>
						</tr>
						</form>
					</table>
				</div>
				</td>
            </tr>
          </table>          
          </td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="1%" height="24"><img src="../../../Search/images/search_5.gif" width="10" height="24"></td>
          <td width="97%" align="center" valign="bottom" background="../../../Search/images/search_7.gif"><table width="82%" height="23"  border="0" cellpadding="0" cellspacing="0">
              <tr align="center"> 
					
                <td width="15%" bgcolor="#F16507" class="text_4"><span class="text_3"><a href="../../../Search/C.Html" class="link2"><span class="text_3">商品引擎</span></a></span></td>
                <td width="15%" class="text_4"><a href="../../../Search/S.Html" class="link2">卖家引擎</a></td>
                <td width="15%" class="text_4"><a href="http://www.sowww.com.cn" class="link2" title="搜网联盟(www.sowww.com.cn)" target="_blank">搜网中国</a></td>
                <td width="15%"> </td>
                <td width="220"></td>
              </tr>
            </table></td>
          <td width="1%" align="right"><img src="../../../Search/images/search_6.gif" width="10" height="24"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="4" bgcolor="#FF6600"></td>
        </tr>
      </table>
      
    </td>
  </tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="78%" height="40" align="left" valign="bottom">&nbsp; <%=ClassName%> </td>
    <td width="22%" align="right" valign="bottom"><a href="Pic.asp?w=760&ID=<%=ProductNumberID%>" class="none1">800×600</a> <a href="Pic.asp?w=980&ID=<%=ProductNumberID%>" class="none1">1024×768</a></td>
  </tr>
</table>
<table width="100%" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="1" bgcolor="#999999"></td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="30" valign="top"> <IFRAME frameBorder=0 id=top name=top src="./../../../Search/G.asp" scrolling="no" style="HEIGHT: 30; VISIBILITY: inherit; WIDTH: 100%; Z-INDEX: 1"></IFRAME></td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="50" align="center"><Span class="text_Title"><A href="../../../Product/<%=Year(DateTime)%>/<%=Month(DateTime)%>/<%=ProductNumberID%>.Html" title="单击返回<%=ProductName%>详情页" class="none1"><%=ProductName%>的商品图片</A></span></td>
  </tr>
</table>
<table width="100%" height="50%" border="0" align="center" cellpadding="5" cellspacing="0">
  <tr> 
    <td height="40" align="center" valign="middle">
<%
if ProductPic <> "" then

	set fso = CreateObject("Scripting.FileSystemObject")

	ProductPicFile   = Server.MapPath("../../../") &"\"& Trim(ProductPic)

		If not Fso.FileExists(ProductPicFile) then
		
		ProductPic = false
		
		end if
		
    Set fso = Nothing

else

	ProductPic = false

end if

if ProductPic = false then
%>
<font color="#999999">没有图片</font> 
<%
else
%>
<A href="../../../Product/<%=Year(DateTime)%>/<%=Month(DateTime)%>/<%=ProductNumberID%>.Html" title="单击返回<%=ProductName%>详情页"><img src="<%=ViewImageFile%>?w=<%=w%>&h=<%=h%>&picUrl=<%=ThenURLName%><%=ProductStr%>" alt="单击<%=ProductName%>的商品图片关闭窗口" name="ProductPic" border="0"></a> 
<%end if%>
	
	
	</td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="100" align="center">
<input type="button" name="Submit" value="点这里关闭<%=ProductName%>商品图片..." onClick="javascript:window.close()">
    </td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td height="2" bgcolor="#A2A2A2"></td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="5" cellspacing="0">
  <tr> 
    <td height="80" align="center" valign="middle" style="word-break:break-all"><span class="list_1">免责声明:商品信息由卖家自行提供,其真实性、准确性和合法性由信息发布人负责。本站不提供任何保证,并不承担任何法律责任。</span></td>
  </tr>
</table>
<!--#include file="Foot.asp"-->
</body>
</html>

⌨️ 快捷键说明

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