<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<%
titlename="信用评价"
 If shopnet("shopid")<>"" And Not isnumeric(shopnet("shopid"))  Then
	 response.redirect"/note.asp?errid=0"
End If

%>
<!--#include file="FHeadTitle.asp"-->
<!--#include file="FFunction.asp"-->
<style type="text/css" media="screen">
	@import url("css/v1.2.php@t=2006512.css");
	@import url("css/component.php@t=2006512.css");
</style>
</head>
<%isShowHotKey=false%>
<body class="<%= PageStyle %>">
<!--#include file="FHeadAll.asp"-->

<%
if shopnet("shopid")<>"" then
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "select * from shop where id="&shopnet("shopid")&""
rs1.open sql,conn,1,1
if rs1.eof and rs1.bof then
response.redirect "/note.asp?errid=5"
response.end
else
shopname=rs1("name")
end if
rs1.close:Set rs1=nothing
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from huiyuan where huiyuan='"&shopnet("huiyuan")&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.redirect "/note.asp?errid=5"
response.end
end if
huiyuan1=rs("huiyuan")
mail=rs("mail")
dz=rs("dz")
rz=rs("rz")
name=rs("name")
rs.close:Set rs=nothing
%>
<br>
<table width="762" height="342" border="0" align="center" cellpadding="2" cellspacing="1" bordercolor="efefef" style='BORDER-COLLAPSE: collapse;MARGIN: 3px'>
  <tr>
    <td colspan="2"><ul class="TabBarLevel1">
    	    		<li><a href="shop/1/myshop.asp?shopid=<%=shopnet("shopid")%>"><%=shopname%></a></li>
    	    	<li>
    		<a href="shop/1/myshopjs.asp?shopid=<%=shopnet("shopid")%>"> 店铺介绍 </a>
    	</li>
    	<li class="Selected"><a href="#">信用评价</a></li>
    </ul>
    <div class="HackBox"></div></td>
  </tr>
  <tr> 
    <td width="762" colspan="2"><table width="98%" border="0" align="center" cellpadding="0" cellspacing="3">
      <tr>
        <td width="25%" rowspan="14" valign="top"><table width="98%" border="0" cellpadding="3" cellspacing="2" bgcolor="efefef">
          <tr>
            <td bgcolor="efefef"><div align="center"><span style="font-weight: bold; color: #FF0000">会员信息</span></div></td>
          </tr>
          <tr>
            <td height="222" valign="top" bgcolor="#FFFFFF"><p><br>
              会员名：<%=huiyuan1%><br>
                邮箱：<%=mail%><br>
                地址：<%=dz%><br>
                站内信：
                <SCRIPT src="../jst/jst.asp?huiyuan=<%=huiyuan1%>"></SCRIPT>
                <br>
                认证：
                <%Select case rz
case "3"
Response.Write "&nbsp;<img src=image/yingyezhizhao.gif width=34 height=20 border=0 align=bottom alt=企业实名认证卖家>"
case "2"
Response.Write "&nbsp;<img src=image/shenfenzheng.gif width=34 height=20 border=0 align=bottom alt=个人实名认证卖家>"
case "1"
Response.Write "&nbsp;<img src=image/shenfenzheng.gif width=34 height=20 border=0 align=bottom alt=个人实名认证买家>"
case else
Response.Write "&nbsp;<img src=image/not_rz.gif width=34 height=20 border=0 align=bottom alt=未实名认证>"
End Select
%>
                <br>
                <%set rs1 = conn.execute("select * from shop where huiyuan='"&huiyuan1&"'")
if not rs1.eof then
userid=rs1("id")
Response.Write "店铺名称："&rs1("name")&"<br>"
else
Response.Write "店铺名称: 没有开设店铺<br>"
end if
rs1.close:Set rs1=nothing%>
                <br>
                信用纪录：没有任何纪录</p>              </td>
          </tr>
        </table>        
        <p align="center" style="font-weight: bold; color: #FF0000"><br>
          </p>          </td>
        <td colspan="5" bgcolor="efefef">&nbsp;</td>
        </tr>
		<%haoping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and username='"&name&"' and buyxinyong=1")(0)
		zhongping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and username='"&name&"' and buyxinyong=0")(0)
		chaping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and username='"&name&"' and buyxinyong=-1")(0)
		haoping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and username='"&name&"' and buyxinyong=1")(0)
		zhongping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and username='"&name&"' and buyxinyong=0")(0)
		chaping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and username='"&name&"' and buyxinyong=-1")(0)
		haoping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and username='"&name&"' and buyxinyong=1")(0)
		zhongping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and username='"&name&"' and buyxinyong=0")(0)
		chaping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and username='"&name&"' and buyxinyong=-1")(0)
		haoping=conn.execute("select sum(buyxinyong) from list where username='"&name&"' and buyxinyong=1")(0)
		zhongping=conn.execute("select sum(buyxinyong) from list where username='"&name&"' and buyxinyong=0")(0)
		chaping=conn.execute("select sum(buyxinyong) from list where username='"&name&"' and buyxinyong=-1")(0)
		
	if userid<>""then
		
		sellhaoping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and userid="&userid&" and sellxinyong=1")(0)
		sellzhongping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and userid="&userid&" and sellxinyong=0")(0)
		sellchaping7=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<7 and userid="&userid&" and sellxinyong=-1")(0)
		sellhaoping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and userid="&userid&" and sellxinyong=1")(0)
		sellzhongping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and userid="&userid&" and sellxinyong=0")(0)
		sellchaping30=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<30 and userid="&userid&" and sellxinyong=-1")(0)
		sellhaoping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and userid="&userid&" and sellxinyong=1")(0)
		sellzhongping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and userid="&userid&" and buyxinyong=0")(0)
		sellchaping180=conn.execute("select count(buyxinyong) from list where datediff('d',sj,now())<180 and userid="&userid&" and sellxinyong=-1")(0)
	    sellhaoping=conn.execute("select sum(sellxinyong) from list where userid="&userid&" and sellxinyong=1")(0)
		sellzhongping=conn.execute("select sum(sellxinyong) from list where userid="&userid&" and sellxinyong=0")(0)
		sellchaping=conn.execute("select sum(sellxinyong) from list where userid="&userid&" and sellxinyong=-1")(0)
	end if	
		%>
      <tr>
        <td width="15%" bgcolor="efefef"><div align="center"><span style="color: #FF9900; font-weight: bold">买家信用统计</span></div></td>
        <td width="15%" bgcolor="efefef"><div align="center">最近一周</div></td>
        <td width="15%" bgcolor="efefef"><div align="center">最近一个月</div></td>
        <td width="15%" bgcolor="efefef"><div align="center">最近六个月</div></td>
        <td width="15%" bgcolor="efefef"><div align="center">总计</div></td>
      </tr>
      <tr>
        <td valign="bottom" bgcolor="efefef"><div align="center"><img src="image/pj_040924_01.gif" width="14" height="16">好评</div></td>
        <td><div align="center"><%=haoping7%></div></td>
        <td><div align="center"><%=haoping30%></div></td>
        <td><div align="center"><%=haoping180%></div></td>
        <td><div align="center"><%=haoping%></div></td>
      </tr>
      <tr>
        <td valign="bottom" bgcolor="efefef"><div align="center"><img src="image/pj_040924_03.gif" width="14" height="16">中评</div></td>
        <td><div align="center"><%=zhongping7%></div></td>
        <td><div align="center"><%=zhongping30%></div></td>
        <td><div align="center"><%=zhongping180%></div></td>
        <td><div align="center">0</div></td>
      </tr>
      <tr>
        <td valign="bottom" bgcolor="efefef"><div align="center"><img src="image/pj_040924_02.gif" width="17" height="17">差评</div></td>
        <td><div align="center"><%=chaping7%></div></td>
        <td><div align="center"><%=chaping30%></div></td>
        <td><div align="center"><%=chaping180%></div></td>
        <td><div align="center"><%=chaping%></div></td>
      </tr>
      <tr>
        <td bgcolor="efefef"><div align="center">总计</div></td>
        <td><div align="center"><%=haoping7+chaping7+zhongping7%>人次</div></td>
        <td><div align="center"><%=haoping30+chaping30+zhongping30%>人次</div></td>
        <td><div align="center"><%=haoping180+chaping180+zhongping180%>人次</div></td>
        <td><div align="center"><%=haoping+chaping%>(信用)</div></td>
      </tr>
      <tr>
        <td colspan="5">&nbsp;</td>
      </tr>
      
      <tr>
        <td colspan="5">&nbsp;</td>
        </tr>
     <%if userid<>"" then%> <tr>
        <td bgcolor="efefef"><div align="center"><span style="font-weight: bold; color: #003399">卖家信用统计</span></div></td>
        <td bgcolor="efefef"><div align="center">最近一周</div></td>
        <td bgcolor="efefef"><div align="center">最近一个月</div></td>
        <td bgcolor="efefef"><div align="center">最近六个月</div></td>
        <td bgcolor="efefef"><div align="center">总计</div></td>
      </tr>
      <tr>
        <td bgcolor="efefef"><div align="center"><img src="image/pj_040924_01.gif" width="14" height="16">好评</div></td>
        <td><div align="center"><%=sellhaoping7%></div></td>
        <td><div align="center"><%=sellhaoping30%></div></td>
        <td><div align="center"><%=sellhaoping180%></div></td>
        <td><div align="center"><%=sellhaoping%></div></td>
      </tr>
      <tr>
        <td bgcolor="efefef"><div align="center"><img src="image/pj_040924_03.gif" width="14" height="16">中评</div></td>
        <td><div align="center"><%=sellzhongping7%></div></td>
        <td><div align="center"><%=sellzhongping30%></div></td>
        <td><div align="center"><%=sellzhongping180%></div></td>
        <td><div align="center">0</div></td>
      </tr>
      <tr>
        <td bgcolor="efefef"><div align="center"><img src="image/pj_040924_02.gif" width="17" height="17">差评</div></td>
        <td><div align="center"><%=sellchaping7%></div></td>
        <td><div align="center"><%=sellchaping30%></div></td>
        <td><div align="center"><%=sellchaping180%></div></td>
        <td><div align="center"><%=sellchaping%></div></td>
      </tr>
      <tr>
        <td bgcolor="efefef"><div align="center">总计</div></td>
        <td><div align="center"><%=sellhaoping7+sellchaping7+sellzhongping7%>人次</div></td>
        <td><div align="center"><%=sellhaoping30+sellchaping30+sellzhongping30%>人次</div></td>
        <td><div align="center"><%=sellhaoping180+sellchaping180+sellzhongping180%>人次</div></td>
        <td><div align="center"><%=sellhaoping+sellchaping%>(信用)</div></td>
      </tr><%end if%>
      <tr>
        <td colspan="5"><div align="left"></div>
          <div align="center"></div></td>
        </tr>
    </table></td>
  </tr>
</table>
<%
'商易仿淘宝4.0.1演示地址
'http://www.ftaobao.com
%>

<!--#include file="bottom.asp" -->
