showneedinfo.asp

来自「招标代码」· ASP 代码 · 共 93 行

<!--#include file="const.asp"-->
<!--#include file="path.asp"-->
<!--#include file="IsUser.asp"-->
<%

set rs=conn.execute("select * from Topic where typeid="&request("NeedID")&" order by time desc")
			
%>

<HTML><HEAD><TITLE><%=WebTitle%></TITLE>


<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="styles.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0>

<TABLE cellSpacing=0 cellPadding=0 width="95%" align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=1 cellPadding=6 width="100%" bgColor=#BFD3EE 
        border=0><TBODY>
        <TR>
                <TD vAlign=center align=middle 
            bgColor=#BFD3EE><div align="center"><A 
            href="<%=CompanyLink%>"><%=CompanyName%></A>网上招标系统</div></TD>
              </TR>
        <TR>
          <TD vAlign=center bgColor=#ffffff>
            <DIV align=left></DIV>
                  <TABLE cellSpacing=0 cellPadding=5 align=center bgColor=#BFD3EE 
            border=0>
                    <!--DWLayoutTable-->
                    <TBODY>
                      <TR bgColor=#ffffff> 
                        <TD colSpan=2> <P>&nbsp;</P></TD>
                      </TR>
                      <TR bgColor=#BFD3EE> 
                        
                  <TD colSpan=2><b>查看信息</b></TD>
                      </TR>
				
                      <% i=1   '项目编号
					  while not (rs.bof or rs.eof) '循环开始
					  %>
					  <TR align="center" bgColor=#ffffff> 
                        
                  <TD height="26"  colSpan=2 
                style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid;BORDER-Bottom: #BFD3EE 1px solid"><font color=red><a href="ShowInfoContent.asp?NeedID=<%=rs("ID")%>" target='_blank' title="查看信息"  ><%=i%>.<%=rs("Topic")%>&nbsp;&nbsp;&nbsp;&nbsp;发布时间:&nbsp;<%=rs("time")%>&nbsp;&nbsp;
				<%if rs("PassID")>0 then  '如果有人中标%> 
					<%if rs("PassID")=User_ID then  '如果是你中标%>
					你已中标
					<%else  '否则%>
					已经有人中标
					<%end if%>
					<%end if%></a></font> 
               </TD>
                      </TR>
					  <%
							rs.movenext
							i=i+1  '编号自增1
							Wend  '循环结束
					  %>
					  
 
                     <TR bgColor=#ffffff> 
                        <TD 
                style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid" 
                colSpan=2><DIV align=center><a href="exit.asp">注销</a>  </div></TD>
                      </TR>
                      <TR> 
                        <TD width="250" bgColor=#BFD3EE>如有问题请与管理员联系：</TD>
                        <TD width="282"><A 
                  href="mailto:<%=AdminEmail%>"><%=AdminEmail%></A></TD>
                      </TR>
                      <TR bgColor=#ffffff> 
                        <TD colSpan=2>&nbsp;</TD>
                      </TR>
                    </TBODY>
                  </TABLE></TD></TR>
        <TR>
          <TD vAlign=center bgColor=#BFD3EE>
            <DIV align=center><A 
            href="
			<%=CompanyLink%>"><%=CompanyName%></A>版权所有</DIV></TD></TR>
        <TR>
          <TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<P>
<P></P></BODY></HTML>