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

📄 index.asp

📁 飞天论坛FTBBS PHP版 v4.1.ASP源代码
💻 ASP
📖 第 1 页 / 共 3 页
字号:
						i=i+1
						loop
						eatrs.close
						set eatrs=nothing
						eatdsnstr.close
						set eatdsnstr=nothing
						%>
                        <tr bgcolor="#FFFFFF"> 
                          <td height="2" colspan="4"><div align="right"><font color="#006699" face="Arial, Helvetica, sans-serif"><a href="hotel1.asp"><img src="images/a_but5.gif" width="62" height="40" border="0"></a></font></div></td>
                        </tr>
                      </table>
                      
                    </TD>
                    <TD background=images/h_bg_09.gif width=4><IMG 
                  height=1 src="images/_blank.gif" 
              width=1></TD>
                  </TR>
                </TBODY>
              </TABLE>
              <TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
                <TBODY>
                  <TR> 
                    <TD height=3 width=5><IMG height=3 
                  src="images/h_conner_02.gif" width=5></TD>
                    <TD background=images/h_bg_08.gif height=3><IMG 
                  height=1 src="images//_blank.gif" width=1></TD>
                    <TD height=3 width=5><IMG height=3 
                  src="images/h_conner_03.gif" 
              width=5></TD>
                  </TR>
                </TBODY>
              </TABLE>
            </div></td>
        </tr>
      </table> 
    </td>
    <td width="164" valign="top" bgcolor="#f5f5f5">
<table width="164" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="55" height="29" background="images/newdep11b.gif"><img src="images/jingcaituijian1.gif" width="130" height="29" border="0"></td>
          <td width="54" background="images/newdep11b.gif"><div align="right"></div>
          </td>
          <td width="55" background="images/newdep11b.gif"><div align="right"><a href="index_news1.asp"><img src="images/newdep11c.gif" width="25" height="29" border="0"></a></div>
          </td>
        </tr>
      </table>
      <table width="164" border="0" cellpadding="0" cellspacing="0" style="border-left:1px solid #cccccc;border-right:1px solid #cccccc">
        <tr>
          <td width="166" height="147" valign="top"><table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" style="table-layout:fixed;">
		  <%
			sql="select top 8 title,id from news order by id desc"
			rs.open sql,dsnstr,3,1
			k=0
			do while not rs.eof and not rs.bof
			k=k+1
			%>
			<tr>
              <td width="14%" height="22" valign="top"><div align="center"><img src=images/arrow.gif></div>
              </td>
                <td width="86%" height="22"><font color="#003366"><a href="index_news.asp?id=<%=rs("id")%>" target="_blank"><%=left(rs("title"),8)%></a></font></td>
            </tr>
		<%
		rs.movenext
		loop
		rs.close
		do while k<8
			response.write "<tr><td height=22></td><td></td></tr>"
			k=k+1
		loop
		%>
          </table>
            
          </td>
        </tr>
        <tr>
          <td height="28" valign="top"><div align="center"><img src="images/a_but07.gif" width="162" height="28" border="0" usemap="#Map4"></div>
          </td>
        </tr>
        <tr>
          <td valign="top"><table width="100%" height="208" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td height="190" valign="top">
				<table width="95%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td>  <font color="#FF6600">【</font> <a href="popshow_sj_lb.asp">寻找旅伴</a><font color="#FF6600">】</font></td>
                    </tr>
					<%
					sql="select top 3 id,title from pop_lvuyao order by id desc"
					rs.open sql,dsnstr,3,1
					do while not rs.eof and not rs.bof
					%>
                    <tr> 
                      <td>   <img src=images/arrow.gif> <a href="popshow_sj_lbx.asp?id=<%=rs("id")%>"><%=left(rs("title"),8)%></a></td>
                    </tr>
                    <%
					rs.movenext
					loop
					rs.close
					%>
                    <tr> 
                      <td><font color="#FF6600">  【</font> <a href="popshow_sj.asp">游者手记</a><font color="#FF6600">】</font></td>
                    </tr>
					<%
					sql="select top 3 id,title from pop_shangchuan where skey='上传文章' order by kit desc"
					rs.open sql,dsnstr,3,1
					do while not rs.eof and not rs.bof
					%>
                    <tr> 
                      <td>   <img src=images/arrow.gif> <a href="popshow_sj_x.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>
                    </tr>
                    <%
					rs.movenext
					loop
					rs.close
					%>
                  </table> 
                  <table width="91%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td><font color="#FF6600"> 【</font> <a href="popshow_sj.asp">旅游照片</a><font color="#FF6600">】</font></td>
                    </tr>
                    <%
					sql="select top 3 id,title from pop_shangchuan where skey='上传照片' order by kit desc"
					rs.open sql,dsnstr,3,1
					do while not rs.eof and not rs.bof
					%>
                    <tr> 
                      <td>   <img src=images/arrow.gif> <a href="popshow_zp_xx.asp?id=<%=rs("id")%>"><%=left(rs("title"),8)%></a></td>
                    </tr>
                    <%
					rs.movenext
					loop
					rs.close
					%>
                  </table>
                  <div align="center"><img src="images/jingnei.gif" width="162" height="28">
                  </div>
                  <TABLE width="162" border=0 cellPadding=0 cellSpacing=0 style="table-layout:fixed;">
                    <TBODY>
                      <%
		  			sql="select top 10 id,rname,company,pos,row from route where pos like '__1%' order by substring(row,3,1)"
					rs.open sql,dsnstr,3,1
					k=0
					do while not rs.eof and not rs.bof
					k=k+1
					%>
                      <TR> 
                        <TD width="25" height="18" align=middle> <div align="center"><font color="#4B4B36"><IMG height=8 
                              src="images/icon00.gif" 
                              width=7></font></div></TD>
                        <TD width="137"><a href="luxian/index_view.asp?id=<%=rs(0)%>"><%=server.HTMLEncode(trim(rs("rname")&" "))%></a></TD>
                      </TR>
                      <TR> 
                        <TD height="2" colSpan=2> <div align="center"><IMG height=2 
                              src="images/space.gif" 
                              width=5></div></TD>
                      </TR>
                      <%
					 rs.movenext
					 loop
					 rs.close
					 do while k<10
					 	response.write "<tr><td height=18></td></tr><tr><td height=2></td></tr>"
					 k=k+1
					 loop
					 %>

                    </TBODY>
                  </TABLE></td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td valign="top"><div align="center"><img src="images/chujing.gif" width="162" height="28"></div>
          </td>
        </tr>
        <tr>
          <td height="282" valign="top">
<table width="100%" height="245" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td height="245" valign="top"> 
                  <TABLE width="162" border=0 cellPadding=0 cellSpacing=0 style="table-layout:fixed;">
                    <TBODY>
                      <%
		  			sql="select top 10 id,rname,company,pos,row from route where pos like '___1%' order by substring(row,4,1)"
					rs.open sql,dsnstr,3,1
					k=0
					do while not rs.eof and not rs.bof
					k=k+1
					%>
                      <TR> 
                        <TD width="25" height="18" align=middle> <div align="center"><font color="#4B4B36"><IMG height=8 
                              src="images/icon00.gif" 
                              width=7></font></div></TD>
                        <TD width="137"><a href="luxian/index_view.asp?id=<%=rs(0)%>"><%=server.HTMLEncode(trim(rs("rname")&" "))%></a></TD>
                      </TR>
                      <TR> 
                        <TD height="2" colSpan=2> <div align="center"><IMG height=2 
                              src="images/space.gif" 
                              width=5></div></TD>
                      </TR>
                      <%
					 rs.movenext
					 loop
					 rs.close
					 set rs=nothing
					 dsnstr.close
set dsnstr=nothing
					 do while k<10
					 	response.write "<tr><td height=18></td></tr><tr><td height=2></td></tr>"
					 k=k+1
					 loop
					 response.Write(err.number&err.description)
					 %>
                    <TBODY>
                    </TBODY>
                  </TABLE>
                </td>
            </tr>
          </table></td>
        </tr>
      </table>
      
    </td>
  </tr>
</table>
	<!--#include file="../kingstone/configseting/inc/copyright.asp"-->
<map name="Map">
<area shape="rect" coords="124,3,159,23" href="air/weather.asp">
</map>
<%error=request.querystring("question")
if error="" then error="0"
if error="wrong" then error="1"%>
<script language="JavaScript">
<!--
function checkInput() {
	if (document.all.user_name.value == "") {
		alert("请填写用户名!");
		document.all.user_name.focus();
		return false;
	}
	if (document.all.user_pwd.value == "") {
		alert("请填写密码!");
		document.all.user_pwd.focus();
		return false;
	}
}
-->
</script>
<SCRIPT language=javascript>          
<!--              
  
var error=<%=error%>           
if (error=="1") alert("会员登录失败!用户名或密码错误!");              
         
//-->          
</SCRIPT>
<map name="Map3">
  <area shape="rect" coords="143,4,183,22" href="hotel/index.asp">
</map>
<map name="Map2">
  <area shape="rect" coords="147,4,190,22" href="route/index.asp">
</map>
<map name="Map4">
  <area shape="rect" coords="31,4,91,24" href="popshow.asp">
</map>
<map name="Map5">
  <area shape="rect" coords="145,3,204,24" href="luxian/indexa.asp">
</map>
</body>
</html>

⌨️ 快捷键说明

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