product.asp

西亚电子购物系统

<!--#include file="header.asp"-->
<!--#include file="ubb.asp"-->
<meta name="Abstract" content="The website was designed by xiya.net">
<meta name="Copyright" content="Copyright 2005-2008 xiya.cn all rights reserved">
<TABLE cellSpacing=0 cellPadding=0 width=778 align=center border=0>
  <TBODY>
    <TR> 
      <TD width=185 height="300" vAlign=top class="table-right"> 
        <!--#include file="left.asp" -->
        &nbsp; </TD>
      <TD width="100%" vAlign=top bgcolor="#FFFFFF"> <table width="100%" cellspacing="0" cellpadding="0">
          <tr>
            <td width="10">&nbsp;</td>
            <td>
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from sia_product where proid="&clng(request("proid"))&" order by proid DESC"
rs.open sql,conn,3,3
if rs.eof then
response.write "<br>暂无产品"
else 
	rs("hits")=rs("hits")+1
	rs.update 
end if%>
              <table width="550" cellpadding="5" cellspacing="0">
                <tr> 
                  <td width="150" height="18" align="center" valign="middle"><p><p>&nbsp;</p><img border="0" src="admin/<%=rs("smallpic")%>" width="80" height="80"> 
                      <br>
</p>
                    <p>&nbsp;</p>
                  </td>
                  <td width="400" height="37" rowspan="2" valign="top"> <p>编 号：<%=rs("code")%><br>
                    名 称：<%=rs("proname")%><br>
                    厂 商：
                    <% if rs("companyurl")<>"" then %>
                    <a href=<%=rs("companyurl")%> target=blank><%=rs("company")%></a>
                    <% else %>
                    <%=rs("company")%>
                    <%end if %>
                    <br>
                    产品人气：<%=rs("hits")%><br>
                    加入日期：<%=rs("adddata")%><br>
					<table width="282" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="66">&nbsp;</td>
                        <td width="110"><div align="center"><%=rs("proprice")%>元</div></td>
                        <td width="106"><div align="center"><%=rs("disprice")%>元</div></td>
                      </tr>
                      <tr>
                        <td>商品价格</td>
                        <td><div align="center"><img src="images/graph-2.gif" width="54" height="33"></div></td>
                        <td><div align="center"><img src="images/graph-3.gif" width="54" height="28"></div></td>
                      </tr>
                      <tr>
                        <td>&nbsp;</td>
                        <td> <div align="center"><img src="images/price.gif" width="40" height="12"> </div></td>
                        <td> <div align="center"><img src="images/pricelist.gif" width="40" height="12"> </div></td>
                      </tr>
                    </table>
                    <p><a href="add.asp?add=<%=rs("proname")%>" onFocus="this.blur()"><img src="images/buy.gif" width="100" height="36" border="0"></a> 
                  </p></td>
                </tr>
                <tr>
                  <td height="43" align="center" valign="middle">
                  <% if rs("bigpic")="" then Response.Write "" else Response.Write "<a href='admin/"&rs("bigpic")&"' target='blank'><img border=0 src='images/view.gif'></a>" %></td>
                </tr>
              </table>

              <table width="95%" cellpadding="5" cellspacing="0">
                <tr> 
                  <td> 
                    <hr align="left" color="#cccccc" width="100%" size="1" noshade>
                    <img src="images/description.gif" width="400" height="40"><br>
<%
title = rs("info")
title = Replace(title, chr(32), "&nbsp;")
title = Replace(title, vbCrLf, "<br>")
title=ubbcode(title)
Response.Write title
%>
                  </td>
                </tr>
              </table>
              
              <table width="100%" cellpadding="5" cellspacing="0">
                <tr> 
                  <td colspan="2" valign="top"> <hr align="left" color="#cccccc" width="98%" size="1" noshade><img src="images/vote.gif"></td>
                </tr>
                <tr><form name="form" method="post" action="vote.asp"> 
                    <td width="240" height="150" valign="top"> 您购买或使用本产品后，认为本产品：<br>
                      <% If request("page")="" Then %>&nbsp;&nbsp;<input type="radio" name="v" value="v1" onFocus="this.blur()">
                      很好，超出了我的需求期望；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v2" onFocus="this.blur()">
                      好，可以满足我的需求；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v3" onFocus="this.blur()">
                      一般，基本满足我的需求；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v4" onFocus="this.blur()">
                      差，与我的需求期望有一定距离；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v5" onFocus="this.blur()">
                      很差，不能满足我的需求；<br>
                      &nbsp;&nbsp;&nbsp;&nbsp; 
                      <input name="Submit2" type="submit" class="textbox-1" value="投票" onFocus="this.blur()">
                      <input name="proid" type="hidden" id="proid" value="<%=rs("proid")%>"><% Else %>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v1" disabled onFocus="this.blur()">
                      很好，超出了我的需求期望；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v2" disabled onFocus="this.blur()">
                      好，可以满足我的需求；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v3" disabled onFocus="this.blur()">
                      一般，基本满足我的需求；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v4" disabled onFocus="this.blur()">
                      差，与我的需求期望有一定距离；<br>
                      &nbsp;&nbsp;<input type="radio" name="v" value="v5" disabled onFocus="this.blur()">
                      很差，不能满足我的需求；<br>
                      &nbsp;&nbsp;&gt;&gt;您已经对该产品进行了投票 
                      <% End If %>
                    </td>
                  </form>
                  <td width="310" height="150" valign="middle"> 
                    <% zs=rs("v1")+rs("v2")+rs("v3")+rs("v4")+rs("v5")
if zs<=0 then
%>
                    <table width="310" align="center">
                      <tr bgcolor="#f1f1f1"> 
                        <td colspan="3"><font color="#FF3333">&gt;&gt;本产品会员投票结果</font></td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">很好</td>
                        <td width="50" align="center">0</td>
                        <td width="220"><img src="images/i-10.gif" width="0" height="10">&nbsp;0%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">好</td>
                        <td width="50" align="center">0</td>
                        <td width="220"><img src="images/i-10.gif" width="0" height="10">&nbsp;0%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">一般</td>
                        <td width="50" align="center">0</td>
                        <td width="220"><img src="images/i-10.gif" width="0" height="10">&nbsp;0%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">差</td>
                        <td width="50" align="center">0</td>
                        <td width="220"><img src="images/i-10.gif" width="0" height="10">&nbsp;0%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">很差</td>
                        <td width="50" align="center">0</td>
                        <td width="220"><img src="images/i-10.gif" width="0" height="10">&nbsp;0%</td>
                      </tr>
                    </table><%Else 
img1=Round((rs("v1")/zs)*100,2)
img2=Round((rs("v2")/zs)*100,2)
img3=Round((rs("v3")/zs)*100,2)
img4=Round((rs("v4")/zs)*100,2)
img5=Round((rs("v5")/zs)*100,2)%>
                    <table width="310" align="center">
                      <tr bgcolor="#eeeeee"> 
                        <td colspan="3"><font color="#FF3333">&gt;&gt;本产品会员投票结果</font></td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">很好</td>
                        <td width="50" align="center"><%=rs("v1")%></td>
                        <td width="210"><img src="images/i-10.gif" width="<%= img1*2 %>" height="10">&nbsp;<%= img1 %>%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">好</td>
                        <td width="50" align="center"><%=rs("v2")%></td>
                        <td width="210"><img src="images/i-10.gif" width="<%= img2*2 %>" height="10">&nbsp;<%= img2 %>%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">一般</td>
                        <td width="50" align="center"><%=rs("v3")%></td>
                        <td width="210"><img src="images/i-10.gif" width="<%= img3*2 %>" height="10">&nbsp;<%= img3 %>%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">差</td>
                        <td width="50" align="center"><%=rs("v4")%></td>
                        <td width="210"><img src="images/i-10.gif" width="<%= img4*2 %>" height="10">&nbsp;<%= img4 %>%</td>
                      </tr>
                      <tr valign="middle" bgcolor="#f7f7f7"> 
                        <td width="40" align="center">很差</td>
                        <td width="50" align="center"><%=rs("v5")%></td>
                        <td width="210"><img src="images/i-10.gif" width="<%= img5*2 %>" height="10">&nbsp;<%= img5 %>%</td>
                      </tr>
                    </table>
                    <% end if %>
                  </td>
                </tr>
              </table></td>
          </tr>
      </table></TD>
    </TR>
  </TBODY>
</TABLE><!--#include file="footer.asp"-->