<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/safe.asp"-->
<%
  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
%>
<%
if session("id")="" then 
session("geturl")=geturl
response.Redirect("../login/login1.asp")
response.end
end if

if Chkrequest(request("id")) then
id=request("id")
else
Response.Redirect ("../login/chklogin.asp?login=4")
end if
%>
<HTML><HEAD>
<title>商贸通指数</title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href="../member/images/css.css" rel="stylesheet" type="text/css">
<SCRIPT language=javascript>
function setSubjectText(){
    
	if(trim(document.form.role.value) == "") {
		    alert("请先选择评价身份");
			document.form.role.focus();
		    return false;
	} 
	if(trim(document.form.type.value) == "") {
		    alert("请先选择评价类型");
			document.form.type.focus();
		    return false;
	} 
	if(trim(document.form.content.value) == "") {
		    alert("请先填写评价内容");
			document.form.content.focus();
		    return false;
	} 
	

  //  return true;
	document.form.submit()
    }
function trim(inputString) {
	   
              if (typeof inputString != "string") { return inputString; }
              var retValue = inputString;
              var ch = retValue.substring(0, 1);
              while (ch == " ") { 
	          //检查字符串开始部分的空格
                  retValue = retValue.substring(1, retValue.length);
                  ch = retValue.substring(0, 1);
              }
              ch = retValue.substring(retValue.length-1, retValue.length);
              while (ch == " ") {
                 //检查字符串结束部分的空格
                 retValue = retValue.substring(0, retValue.length-1);
                 ch = retValue.substring(retValue.length-1, retValue.length);
              }
              while (retValue.indexOf("  ") != -1) { 
	         //将文字中间多个相连的空格变为一个空格
                 retValue = retValue.substring(0, retValue.indexOf("  ")) + retValue.substring(retValue.indexOf("  ")+1, retValue.length); 
              }
              return retValue;
           } 

</SCRIPT>
</HEAD>
<BODY style="BACKGROUND-REPEAT: no-repeat" text=#000000 bgColor=#ffff99 
background=images/bg.gif><BR><BR>
<TABLE cellSpacing=1 cellPadding=0 width=520 align=center bgColor=#ff9900 
border=0>
  <TBODY>
  <TR>
    <TD align=middle>
      <TABLE cellSpacing=0 cellPadding=10 width="100%" bgColor=#ffffff 
        border=0><TBODY>
        <TR>
          <TD align=middle>
            <TABLE cellSpacing=0 cellPadding=5 width="100%" align=center 
            border=0>
              <TBODY>
			
			  <TR>
                <TD class=lh13><div align="center"><SPAN 
                  class=M>以下是其他商贸通会员对该会员的评价：</FONT></SPAN><BR>
                  </div><br>  <%
			sql="select top 100 trustadv.*,corporation.name,corporation.trust_score from trustadv,corporation where trustadv.bprid="&id&" and corporation.id=trustadv.pjrid order by trustadv.id desc"
			Set rs= Server.CreateObject("ADODB.Recordset") 
            rs.open sql,conn,1,1
			if rs.eof then
			response.write"<tr><TD class=lh13 colSpan=2><div align='center'><SPAN class=M>暂无其他商贸通会员对该会员的评价</FONT></SPAN></div></td></tr>"
			else
			do while not rs.eof
			%>
                  <TABLE style="WORD-BREAK: break-all" cellSpacing=3 
                  cellPadding=0 width="100%" bgColor=#ffffff border=0>
                    <TBODY>
                    <TR>
                      <TD>
                        <TABLE style="WORD-BREAK: break-all" cellSpacing=3 
                        cellPadding=0 width="100%" bgColor=#f1f7fa border=0>
                          <TBODY>
                          <TR>
                            <TD>
                              <TABLE cellSpacing=1 cellPadding=5 width="100%" 
                              align=center bgColor=#cae0eb border=0>
                                <TBODY>
                                <TR>
                                <TD class=C width=250 
                                bgColor=#ffffe1>&nbsp;&nbsp;评价人：<%=rs("name")%></TD>
                                              <TD class=c align=middle 
                                bgColor=#ffffe1>商贸通指数：<FONT 
                                color=red><B><%=rs("trust_score")%></B></FONT></TD>
                                <TD class=c align=middle 
                                bgColor=#ffffe1>身份：<FONT 
                                color=red><B><%=rs("role")%></B></FONT></TD></TR>
                                <TR>
                                <TD class=c bgColor=#ffffe1>&nbsp;&nbsp;<B>评价性质：</B> <SPAN 
                                class=pj3><%=rs("type")%></SPAN> &nbsp; 
                              </TD>
                                <TD colspan="2" bgColor=#ffffe1 class=c>评价时间：(<%=FormatDate(rs("dateandtime"),1)%>）</TD>
                                </TR></TBODY></TABLE></TD></TR>
                          <TR>
                            <TD>
                              <TABLE cellSpacing=0 cellPadding=5 width="100%" 
                              align=center border=0>
                                <TBODY>
                                <TR vAlign=top>
                                <TD class=c 
                                width="27%">&nbsp;&nbsp;<B>评价内容：</B></TD>
                                <TD 
                                class=sg><%=rs("content")%> 
                                <BR><BR> 
                                </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
                    <TR>
                            </TR></TBODY></TABLE>
                  <div align="center"><br>
							    <%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
<a href="javascript:window.close()" class="C"><strong>关闭窗口</strong></a>					    </div></TD></TR>
</TBODY></TABLE></TD></TR></TBODY></TABLE></TR></TBODY></TABLE></BODY></HTML>
