⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pictures.asp

📁 狼道公司源码下载
💻 ASP
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="Inc/Conn.asp" -->
<!--#include file="Inc/Function.asp" -->
<%
Center_Left="Center_Left.jpg"
%>
<HTML><HEAD><TITLE>精彩图片 <%=WebTitle%></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<META content="<%=WebKeyWord%>" name=description>
<META content="<%=WebKeyWord%>" name=keywords>
<META http-equiv=Pragma content=no-cache>
<LINK href="Images/common.css" type=text/css rel=STYLESHEET>
<LINK href="Images/style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.3790.2759" name=GENERATOR></HEAD>
<BODY leftMargin=0 background=Images/bg0.gif topMargin=0 marginwidth="0" marginheight="0">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD height="81" background=Images/bg_company.gif><!--#include file="Top.asp" --></TD>
  </TR>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width=830 border=0>
        <TBODY>
        <TR>
          <TD vAlign=top width=191>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top>
                  <DIV align=center><IMG height=62 src="Images/left_menu_jj.gif" width=191>
                  <TABLE cellSpacing=0 cellPadding=0 width="90%" align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=GeneralContentSinglePage1_bg align=left 
                      height=30><IMG src="Images/dian.gif" border=0>&nbsp;&nbsp;<A 
                        class=GeneralContentSinglePage1_a 
                        href="Company.asp">公司简介</A></TD>
                    </TR>
                    <TR>
                      <TD class=GeneralContentSinglePage1_bg align=left 
                      height=30><IMG src="Images/dian.gif" 
                        border=0>&nbsp;&nbsp;<A 
                        class=GeneralContentSinglePage1_a 
                        href="Pictures.asp">精彩图片</A></TD>
                    </TR></TBODY></TABLE></DIV></TD></TR></TBODY></TABLE></TD>
          <TD vAlign=top rowSpan=2>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD vAlign=top align=right height=25>
                  <TABLE cellSpacing=0 cellPadding=0 border=0>
                    <TBODY>
                    <TR>
                      <TD>&nbsp;</TD>
                      <TD width=5>&nbsp;</TD>
                      <TD vAlign=bottom>首页 &gt;&gt; 公司简介&nbsp;&nbsp;</TD>
                      <TD width=5>&nbsp;</TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD>
                  <TABLE cellSpacing=0 cellPadding=0 width=638 border=0>
                    <TBODY>
                    <TR>
                      <TD width=731><IMG height=26 
                        src="Images/compay01_title.gif" width=450></TD></TR>
                    <TR>
                      <TD><IMG height=3 src="Images/title_line0.gif" 
                        width=670></TD></TR>
                    <TR>
                      <TD vAlign=top>
                        <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
                          <TBODY>
                          <TR>
                            <TD></TD>
                          </TR></TBODY></TABLE>
                        <DIV align=center>
                        <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
                          <TBODY>
                          <TR vAlign=top>
                            <TD vAlign=top>
							<%
Page=Request("Page")
if Page="" then Page=1
if Not isnumeric(Page) then Page=1
if CInt(Page)<1 then Page=1
Page=Abs(Cint(Page))
PCount=0
RCount=0
PSize=16

   SQLStr="select * from Pictures order by OrderID" 
Set rs=server.CreateObject("adodb.recordset")


rs.open SQLStr,Conn,1,1
if not rs.eof then
  rs.pagesize=Psize
  RCount=rs.recordcount
  PCount=rs.PageCount
  if Cint(Page)>CInt(PCount) then Page=PCount
  rs.absolutepage=Page
end if
							%>
							<table width="100%" border="0" cellpadding="0" cellspacing="0">
                              <tr>
                                <%
i=0
do while not rs.eof  and i<CInt(PSize)
if i mod 4=0 and i<>0 then Response.Write("<tr>")
i=i+1
%>
                                <td width="25%"><table width="100%" border="0">
                                    <tr>
                                      <td align="center"><%=rs("Title")%></td>
                                    </tr>
                                    <tr>
                                      <td><div align="center"><a href="Pictures/<%=rs("Picture")%>" target="_blank"><img src="Pictures/<%=rs("Picture")%>" alt="<%=rs("Title")%>" width="160" height="100" border="0"></a></div></td>
                                    </tr>

                                </table></td>
                                <%
 rs.movenext
 loop
 rs.close
 set rs=nothing
 %>
                              </tr>
                            </table></TD>
                          </TR></TBODY></TABLE></DIV></TD></TR>
                    <TR>
                      <TD><div title="<BR>">
                        <table cellspacing=1 width='100%' border=0>
                          <form method=Post action=Pictures.asp>
                            <tr>
                              <td align=center> 共有图片 <font COLOR=#FF0000><B><%=RCount%></B></font> &nbsp;<a href="?Page=1">首 页</a>&nbsp;<a href="?Page=<%=Page-1%>">上一页</a>&nbsp;<a href="?Page=<%=Page+1%>">下一页</a>&nbsp;<a href="?Page=<%=PCount%>">尾 页</a> &nbsp;页次:<strong><font color=red><%=Page%></font>/<%=PCount%></strong>页 &nbsp;
                              </td>
                            </tr>
                          </FORM>
                        </table>
                      </div></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD vAlign=top><BR><IMG src="Images/bot2.gif" 
            width=191 height=240 border=0 usemap="#Map"></TD>
        </TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD><!--#include file="Bottom.htm" --></TD>
  </TR></TBODY></TABLE><!-- ? x p ?-->

<!-- AceCounter(Pro) Version 5.0 END -->

<map name="Map">
<area shape="rect" coords="103,6,189,51" href="Contact.asp">
<area shape="rect" coords="105,59,189,106" href="FeedBack.asp">
<area shape="rect" coords="106,117,188,164" href="News.asp">
<area shape="rect" coords="105,181,188,225" href="DownLoad.asp">
</map></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -