productsdetail.asp

请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。

<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<%
if cint(anysale.asGroups(4))=0 then call anysale.asNote("权限出错","你所在的用户组没有浏览产品的权限!") end if

dim ID,rs
if request("ID")="" or not isnumeric(request("ID")) then
	call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
else
	ID=request("ID")
end if
set rs=conn.execute("select * from as_products where productsID="&ID)
if rs.eof or rs.bof then
	call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
else
	conn.execute("update as_products set views=views+1 where productsID="&ID)
	
	call anysale.header("products",rs("title") &" - "& anysale.nav("class",rs("classID"),2,"")&"找产品",rs("title")&","&rs("tags"),anysale.cutStr(anysale.clearHTML(rs("detail")),100))
%>
<%=anysale.ad(25,"class=""banner padT5""")%>

<div class="line5"></div>
<div class="bodyer">
 <!--4-->
 <div class="tab" style="width:948px;">
  <div class="tabList">
   <ul><li class="line30">&nbsp;&nbsp;<strong>您的位置:</strong>&nbsp;<a href="index.asp">首页</a>&raquo;<a href="products.asp">找产品</a><%=anysale.nav("class",rs("classID"),0,"productslist.asp?")%>&raquo;<%=rs("title")%></li></ul>
  </div>  

  <div style="padding:20px;">
   <!--content-->
   <div class="left" style="width:302px;margin:0 20px 0 0;">
    <!--image-->
    <ul>
     <li>
	 <%if rs("image")="" then
	 	if anysale.ad(26,"")<>"" then
			response.write anysale.ad(26,"class=""left border"" style=""width:300px;height:250px;""")
		else
	%>
		<img src="images/noimage.gif" style="padding:125px;" class="border whitebg" alt="<%=rs("title")%>" />
	 <%
	 	end if
	 else%>
		<img src="<%=rs("image")%>" class="border" width="300" alt="<%=rs("title")%>" />
	 <%end if%>
	 </li>
    </ul>
	<!--image.end-->
   </div>
   
   <div class="left" style="width:270px;height:320px;padding:0 20px 0 0;margin:0 20px 0 0;border-right: 1px solid #b9cfec;">
    <!--parameter-->
    <h1><%=rs("title")%></h1>
	<ul>
	 <li>&nbsp;</li>
	 <%if rs("price")>0 then%>
	 <li>当前价格：<span class="red"><%=rs("price")%></span> 元/<%=rs("unit")%></li>
	 <%end if%>
	 <li>最小起订：<span class="red"><%=rs("number")%></span> <%=rs("unit")%></li>
	 <li>供货总量：<span class="red"><%=rs("storage")%></span> <%=rs("unit")%></li>
	 <li>&nbsp;</li>
	 <li>
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=askPrice&amp;username=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;unit=<%=server.urlEncode(rs("unit"))%>');">点此询价</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	 <li class="clear">&nbsp;</li>
	 <li>所在地区：<%=anysale.nav("area",rs("areaID"),3,"")%></li>
	 <li>发布时间：<%=anysale.formatDate(rs("addtime"),5)%></li>
	 <li>&nbsp;</li>
	 <li class="f12">
	 <img src="images/iStar.gif" alt="收藏" width="13" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=favorite&amp;groups=2&amp;title=<%=server.urlEncode(rs("title"))%>&amp;image=<%=server.urlEncode(rs("image"))%>&amp;link=<%=server.urlEncode("businessdetail.asp?ID="&ID)%>');">收藏此信息</a>&nbsp;&nbsp;&nbsp;
	 <img src="images/iMail.gif" alt="推荐" width="13" height="13" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=email&amp;title=<%=server.urlEncode(rs("title"))%>&amp;detail=<%=server.urlEncode("老朋友好久不见，我是“"&anysale.nickname&"”. 我在 "&anysale.asInfo(1)&" 上发现一产品,也许你会感兴趣，看一下？ 详细信息请参看："&anysale.asInfo(1)&"productsdetail.asp?ID="&ID)%>');">推荐给朋友</a>&nbsp;&nbsp;&nbsp;
	 <img src="images/iNote.gif" alt="举报" width="12" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=message&amp;username=admin&amp;title=<%=server.urlEncode("举报："&rs("title"))%>&amp;detail=<%=server.urlEncode(anysale.asInfo(1)&"productsdetail.asp?ID="&ID)%>');">举报此信息</a></li>
	</ul>
	<!--parameter.end-->
   </div>
   
   <div class="left" style="width:275px;">
    <!--contact-->
	<%
	dim rsUser,contact,business2,logo
	set rsUser=conn.execute("select userID,username,email,title,logo,business,money,istrust,trustStartTime,classID,areaID,[level],regdate,capital from as_user where islock=0 and username='"&rs("username")&"'")
	if not(rsUser.eof and rsUser.bof) then
	business2=split(rsUser("business"),"|||")
	logo=split(rsUser("logo"),"|||")
	%>
    <h2 class="line28"><%=rsUser("title")%></h2>
	<ul class="left" style="width:135px;">
	 <li><%if logo(0)="images/nologo.gif" then%><img src="images/nologo.gif" style="padding:10px 20px;" class="border whitebg" alt="<%=rsUser("title")%>" /><%else%><img src="<%=logo(0)%>" alt="<%=rsUser("title")%>" width="<%=logo(1)%>" height="<%=logo(2)%>" class="border" /><%end if%></li>
	 <li><img src="<%=anysale.getValue("as_groups","levelpic","groupsID="&rsUser("level"))%>" alt="财富等级：<%=anysale.getValue("as_groups","groupsName","groupsID="&rsUser("level"))%>" /></li>
	</ul>
	<ul class="left">
	 <li class="clear">
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=addFriend&amp;friend=<%=rs("username")%>&amp;readme=<%=server.urlEncode(rsUser("title"))%>');">加为好友</a></li><li class="linkR">&nbsp;</li></ul>
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=contact&amp;username=<%=rs("username")%>');">联系方式</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	 <li class="clear" style="padding:2px 0 0 0;">
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onClick="getPage('windows.asp?action=message&amp;username=<%=rs("username")%>');">发送留言</a></li><li class="linkR">&nbsp;</li></ul>
	  <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="companydetail.asp?u=<%=rs("username")%>" target="_blank">公司信息</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	</ul>
	<ul class="clear">
	 <li class="line5">&nbsp;</li>
	 <li>
	  <%if rsUser("istrust")=1 then%><p>诚信会员：第<%=year(now())-year(rsUser("trustStartTime"))+1%>年</p><%end if%>
	  <p>成立时间：<%=rsUser("regdate")%> 年</p>
	  <p>注册资金：<%=rsUser("capital")%> 万元</p>
	  <p>金钱财富：<%=rsUser("money")%></p>
	 </li>
	 <li>
	  <p>主营行业：<%=anysale.getValue("as_class","className","classID="&rsUser("classID"))%></p>
	  <p>经营模式：<%=business2(2)%></p>
	  <p class="line5">&nbsp;</p>
	  <p>产品或服务：<%=business2(6)%></p>
	 </li>
	</ul>
	<%
	else
		response.write"该用户已被锁定或被删除!"
	end if
	rsUser.close
	set rsUser=nothing
	%>
	<!--contact.end-->
   </div>

   <div class="detail" style="width:908px;overflow:hidden;word-wrap:break-word;word-break:normal;">
   <!--detail-->
    <div class="xline clear">&nbsp;</div>
   <br />
	<%=anysale.ad(27,"class=""right border"" style=""width:300px;height:250px;margin:0 0 10px 10px;""")%>
	<%=anysale.chkBadWords(rs("detail"))%>
   <!--detail.end-->
   </div>
   <div class="line5">&nbsp;</div>
   <!--content.end-->
  </div>
 </div>
 <!--4.end-->
</div>

<%=anysale.ad(28,"class=""banner padT5 clear""")%>

<div class="bodyer">
 <!--4-->
 <div class="tab marT5" style="width:948px;">
  <!--images-->
  <div class="tabList">
   <ul class="linkN" onmouseover="this.className='linkH'" onmouseout="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="productslist.asp?classID=<%=rs("classID")%>">更多</a></li><li class="linkR">&nbsp;</li></ul>
   <ul class="tabH"><li class="tabL">&nbsp;</li><li class="tabM">产品展厅</li><li class="tabR">&nbsp;</li></ul>
  </div>
  <div class="images" style="padding:9px 0 0 9px;">
   <ul>
    <%
	dim rsImage,n
	set rsImage=conn.execute("select top 28 productsID,title,preview from as_products where userID="&rs("userID")&" and islock=0 order by productsID desc")
	if not rsImage.eof or not rsImage.bof then
	n=1
	do while not rsImage.eof and n<=28
    %><li><a href="productsdetail.asp?ID=<%=rsImage(0)%>"><%if rsImage(2)="" then%><img src="images/noimage.gif" style="padding:25px;" class="border whitebg" alt="<%=rsImage(1)%>" /><%else%><img src="<%=rsImage(2)%>" alt="<%=rsImage(1)%>" width="100" height="100" /><%end if%></a><br /><%=rsImage(1)%></li>
    <%
	rsImage.movenext
	n=n+1
	loop
	end if
	rsImage.close
	set rsImage=nothing
    %>
   </ul>
  </div>
  <!--iamges.end-->
 </div>
 <!--4.end-->
</div>
<%
anysale.footer
end if
rs.close
set rs=nothing
call closeConn()
%>