query.asp

来自「投资管理系统, asp+ mssql server」· ASP 代码 · 共 325 行 · 第 1/2 页

                    <a href="query.asp?typet=<%=typet%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&SearchText=<%=SearchText%>&absolutepage=<%=absolutepage-1%>">上页</a> 
                    <% else %>
                    <font color=#888888>上页</font>
                    <% end if %>
                    <% if cint(absolutepage)<cint(pagecount) then %>
                    <a href="query.asp?typet=<%=typet%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&SearchText=<%=SearchText%>&absolutepage=<%=absolutepage+1%>">下页</a> 
                    <% else %>
                    <font color=#888888>下页</font>
                    <% end if %>
					<% if cint(absolutepage)<cint(pagecount) then %>
                    <a href="query.asp?typet=<%=typet%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&SearchText=<%=SearchText%>&absolutepage=<%=pagecount%>">最后一页</a>
					<% else %>
					<font color=#888888>最后一页</font>
					<% end if %></TD>
          </TR>
          <TR> 
            <TD vAlign=top align=center width="100%"> 
              <TABLE cellSpacing=0 cellPadding=0 width="740" border=0 style="border-left:1 solid #CC9933;border-top:1 solid #CC9933">
			   <TR> 
                  <TD class=tdby width=10>&nbsp;</TD>
				  <td class=tdby align=left width=380>&nbsp;<b>项目名称</b></td>
				  <td class=tdby align=center width=70><b>建设性质</b></td>
				  <td class=tdby align=center width=90><b>总投资(万元)</b></td>
				  <td class=tdby align=center width=200><b>项目业主</b></td>
                </TR>
				<%
				if not rs.eof then
					for i=1 to 20
						if not rs.eof then
							Att=trim(rs("Attribute"))
							rsy.open "select * from tblYezhu where ProjectID="&rs("ID"),conn,1,1
							if not rsy.eof then
								Yezhu_Unit=trim(rsy("Yezhu_Unit"))
							else
								Yezhu_Unit="&nbsp;"
							end if
							rsy.close
							if Yezhu_Unit="" then
								Yezhu_Unit="&nbsp;"
							end if
							SearAtt="(1:"
							%>
							<!--#include file="../inc/SearAtt2.asp"-->
							<%
							if SearEDAtt="" then
								SearEDAtt="&nbsp;"
							else
								set rsa=server.createobject("adodb.recordset")
								rsa.open "select Attribute from tblAttribute2 where AttributeID=1 and daihao="&int(SearEDAtt),conn,1,1
								if not rsa.eof then
									SearEDAtt=trim(rsa("Attribute"))
								end if
								rsa.close
								set rsa=nothing
							end if
							if SearEDAtt="" or SearEDAtt="0" then
								SearEDAtt="&nbsp;"
							end if

							if rs("Money")="" then
								Money="&nbsp;"
							else
								Money=rs("Money")
							end if
							num=num+1
				%>
                <TR <%if (num mod 2)<>0 then%>bgcolor="FFCC33"<%end if%>> 
                  <TD class=tdby width=10 align=center><font color=red><%=num%></font></td>
				  <td class=tdby align=left width=380>&nbsp;<a href="Content.asp?typet=<%=typet%>&ID=<%=rs("ID")%>" target="_blank"><%=trim(rs("Name"))%></a></TD>
				  <td class=tdby align=center width=70><%=SearEDAtt%></td>
				  <td class=tdby align=center width=90><%=Money%></td>
				  <td class=tdby align=center width=200><%=Yezhu_Unit%></td>
                </TR>
				<%
							rs.movenext
						else
							exit for
						end if
					next
				end if
				%>
              </TABLE>
            </TD>
          </TR>
		  <%if total=0 then%>
		  <tr>
		   <td height=160 align=center valign=top><br>没有录入项目</td>
		  </tr>
		  <%end if%>
          <TR>
            <TD width="100%" align="center">共<%=rs.recordcount%>条/<%=rs.pagecount%>页  每页<%=rs.pagesize%>条，第<%=absolutepage%>页　
					<% if cint(absolutepage)>1 then %>
					<a href="query.asp?typet=<%=typet%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&SearchText=<%=SearchText%>&absolutepage=1">第一页</a>
					<% else %>
					<font color=#888888>第一页</font>
					<% end if %>
					<% if cint(absolutepage)>1 then %>
                    <a href="query.asp?typet=<%=typet%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&SearchText=<%=SearchText%>&absolutepage=<%=absolutepage-1%>">上页</a> 
                    <% else %>
                    <font color=#888888>上页</font>
                    <% end if %>
                    <% if cint(absolutepage)<cint(pagecount) then %>
                    <a href="query.asp?typet=<%=typet%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&SearchText=<%=SearchText%>&absolutepage=<%=absolutepage+1%>">下页</a> 
                    <% else %>
                    <font color=#888888>下页</font>
                    <% end if %>
					<% if cint(absolutepage)<cint(pagecount) then %>
                    <a href="query.asp?typet=<%=typet%>&Attribute=<%=Attribute%>&Attribute2=<%=Attribute2%>&TMoney1=<%=TMoney1%>&TMoney2=<%=TMoney2%>&SearchText=<%=SearchText%>&absolutepage=<%=pagecount%>">最后一页</a>
					<% else %>
					<font color=#888888>最后一页</font>
					<% end if 
					rs.close
					set rsy=nothing%></TD>
          </TR>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TR> 
            <TD bgcolor="#996600">&nbsp; </TD>
          </TR>
        </TABLE>
    </TD>
   </TR>
</TABLE>
</BODY>
</HTML>
<script language="JavaScript">
function Show(){
	if(document.all("ProjectClass").value=="贷款"){	
		document.all("Class12").style.display="";
		document.all("Class13").style.display="none";
	}
	else{
		if(document.all("ProjectClass").value=="利用外资"){
			document.all("Class12").style.display="none";
			document.all("Class13").style.display="";
		}
		else{
			document.all("Class12").style.display="none";
			document.all("Class13").style.display="none";
		}
	}
}

function Show2(){
	if(document.all("ProjectClass2").value=="贷款"){	
		document.all("Class22").style.display="";
		document.all("Class23").style.display="none";
	}
	else{
		if(document.all("ProjectClass2").value=="利用外资"){
			document.all("Class22").style.display="none";
			document.all("Class23").style.display="";
		}
		else{
			document.all("Class22").style.display="none";
			document.all("Class23").style.display="none";
		}
	}
}
</script>
<!--#include file="../manage/inc/SearchAtt.asp"-->
<!-- #include file="../inc/close.asp" -->