 <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="../head.asp"-->
  <!--#include file="../checkrole.asp"-->
 <%
     call checkuser("ly")
	 %>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
function suredel()
{
 var i=confirm("你确定要删除吗?");
if(i)
{
return true ;
}
else
{
return false;
}
 }
 </script>
 <style>
.tdc{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#F1EEEE, EndColorStr=#FFFFFF);
}.tdc2{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#E8F4FF, EndColorStr=#FFFFFF);
}
.tdc3{
 
	filter:	progid:DXImageTransform.Microsoft.Gradient(GradientType=1, StartColorStr=#FFFFFF, EndColorStr=#E8F4FF);
}

 </style>
<TABLE width=778 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
  <TR>
    <TD 
    style="BACKGROUND-POSITION: right 50%; BACKGROUND-IMAGE: url(i../mages/bg1.gif); BACKGROUND-REPEAT: repeat-y; BACKGROUND-COLOR: #ffffff" 
    vAlign=top align=middle>
      <TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
        <TBODY>
        <TR>
              <TD width="15%"><IMG height=32 src="../images/myoutbox.gif" 
            border=0></TD>
              <TD width="85%" background="../images/info_bg.gif">&nbsp;</TD>
        </TR></TBODY></TABLE>
      <%
 id=Replace_Text(request("id"))
 
sql="select Websen_getprice1.*,Websen_corporation.* from Websen_getprice1,Websen_corporation where Websen_getprice1.id="&id&" and Websen_corporation.id=Websen_getprice1.mycid  and Websen_corporation.flag=1"
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write "<p align='center'>对不起，没有您要查询的信息</p>" 
else
requestinfo=rs("requestinfo")
%>
         <TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
          <TBODY>
        <TR>
          <TD vAlign=top align=middle>
            <TABLE class=tdc width="100%" board="0">
          <TBODY>
            <TR> 
              <TD height="30"> <DIV id=nav><strong><font color="#CC3300">我发给</font>
 			 
              <%
						
						
	'--是否使用的名片页------------------------------------------------------------
	   set rsmp=server.CreateObject("adodb.recordset")
	   sqlmp="select * from Websen_vipgrade where roleid="&rs("gradeid")
	   rsmp.open sqlmp,conn,1,1
	   if not rsmp.eof  then 
 
	   if instr(rsmp("rolelist"),"qw")>0 then							
        if is2weburl=1 then
		%>
                        <a href="http://<%=rs("user")%>.<%=weburl1%>"  target="_blank"><font color="#666666"><%=rs("qymc")%></font></a>
                        <%else%>
                        <a href="<%=HOPE_InstallDir%>vipcom/<%=rs("user")%>/" target="_blank"><font color="#666666"><%=rs("qymc")%></font></a>
                        <%
	  end if 
	  else
	  %>
                        <a href="<%=HOPE_InstallDir%>Ptcom/<%=rs("user")%>.html" target="_blank"><font color="#666666"><%=rs("qymc")%></font></a>   
   <%
	  end if
	  
 	  rsmp.close
	  end if
	  %>
			 
			 
			 
 			  <font color="#CC3300">的留言 　</font></strong></DIV></TD>
            </TR>
          </TBODY>
        </TABLE>
            <TABLE width="100%" border=1 cellPadding=0 cellSpacing=0 bordercolor="#EBEBEB">
              <TBODY>
              <TR>
                <TD bgColor=#cccccc>
                  <TABLE cellSpacing=0 cellPadding=5 width="100%" align=center 
                  border=0>
                  <TBODY>
                    <TR> 
                      <TD height="30" class="tdc2"><B><font color="#CC3300">标题:</font> 
                        </B><%=rs("title")%></TD>
                      <TD align="right"  class="tdc3"><B><font color="#CC3300">时间:</font></B><%=rs("datetime")%></TD>
                    </TR>
					<tr><td height="2" bgcolor="#B9DDFE"  colspan="2"></td></tr>
                    <TR bgColor=#FFFFFF> 
                      <TD height="150"  colSpan=2 valign="top" bgcolor="#FDFDFD" class=C   style="LINE-HEIGHT: 150%;word-break:break-all"><font color="#666666" style="font-size:12px"><%=rs("content")%> 
                        <P>
						<%if requestinfo<>"" then response.write"我公司需要进一步了解的信息："&requestinfo&"。<BR><BR>"%>
				<%if rs("checkdate")=true then response.write"需对方公司在"&rs("limitedtime")&"日前答复！<BR><BR>"
						if rs("needtrust")=true then response.write"已要求对方公司提供会员档案<BR><BR>"
						if rs("sendcontact")=true then response.write"已发送了联系方式给对方公司"%></P>
						</font>
						</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                      <TD height="30" align=center class="tdc"><IMG height=13 
      src="../images/icon_go_gray.gif" width=17 align=absMiddle> <A  href="delsend.asp?id=<%=id%>"  onClick="return suredel()">删除</A>&nbsp;&nbsp;<a href="#" onClick="javascript:history.back(-1);">返回</a></TD>
                  </TR>
              <TR>
        <TD  width="100%"></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<%end if%></TABLE>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>