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

📄 index.asp

📁 社区天地图文系统(核心:尘缘雅境图文系统) 版本: 1.0 本系统是ASP+ACCESS环境下开发成功
💻 ASP
📖 第 1 页 / 共 3 页
字号:
                  class=style1>| <a href="type.asp?typeID=19">最新下载 </a>| </SPAN>
				<a href="nwjl.asp">内务纪律</a> <SPAN 
                  class=style1>| </SPAN><a href="special.asp">社区专题</a></TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD height=956 vAlign=top width=379>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=379>
              <TBODY>
              <TR>
                <TD><map name="FPMap1">
				<area href="bigClassdeta.asp?typeid=14&BigClassid=31" shape="rect" coords="335, 18, 374, 24">
				</map>
				<IMG border=0 height=42 
                  src="imgs/news_title.jpg" 
                  useMap=#FPMap1 width=379></TD></TR>
              <TR>
                <TD 
                background="imgs/new_bg.jpg" 
                height=203 vAlign=top>
                  <div align="center">
                  <TABLE border=0 cellPadding=0 cellSpacing=0 
                  width="95%">
                    <TBODY>
                    <TR>
                      <TD height=5 vAlign=top></TD></TR>
                     <tr> 
          <td valign=top width=100% background="IMAGES/menu-zd.gif"> 
            <!--#include file=daodu.asp -->
          </td>
        </tr></TBODY></TABLE></div>
				</TD></TR>
              <TR>
                <TD bgColor=#82cefd height=4><IMG height=4 
                  src="imgs/new_bg01.jpg" 
                  width=9></TD></TR></TBODY></TABLE>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=379>
              <TBODY>
              <TR>
                <TD><map name="FPMap0">
				<area href="bigClassdeta.asp?typeid=14&BigClassid=43" shape="rect" coords="333, 17, 372, 23">
				</map>
				<IMG border=0 height=39 
                  src="imgs/shishi.jpg" 
                  useMap=#FPMap0 width=379></TD></TR>
              <TR>
                <TD 
                background="imgs/new_bg.jpg" 
                height=159 vAlign=top>
                  <TABLE align=center border=0 cellPadding=0 cellSpacing=0 
                  height=196 width="97%">
                    <TBODY>
                    <TR>
                      <TD height=5></TD></TR>
                    <tr>
                      <TD height=179 vAlign=top>
						<table border="0" width="99%" align="right">
							<script src=news.asp?bigclassid=43&title=22&shu=8&click=0></script>
						</table>
						</TD>
                      </tr>
					<tr>
                <TD bgColor=#82cefd height=4><IMG height=4 
                  src="imgs/new_bg01.jpg" 
                  width=9></TD>
					</tr>
                    <TR>
                      <TD height=1 vAlign=top></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=379>
              <TBODY>
              <TR>
                <TD>
				<IMG border=0 height=40 
                  src="imgs/faq_title.jpg" width=379></TD></TR>
              <TR>
                <TD 
                background="imgs/new_bg.jpg" 
                height=180 vAlign=top>
                  <TABLE align=center 
                  background="imgs/center_xqbg.jpg" 
                  border=0 cellPadding=0 cellSpacing=0 width="95%">
                    <TBODY>
                    <TR>
                      <TD height=191 width="99%">
						<p align="center">
			<table border="0" width="100%" height="100%">
							<tr>
								<td>
								<p align="center">
						<a href="jcsjread.asp"  onclick="return oo(this)" target="_blank">
						<IMG 
                        style="FILTER: revealTrans(duration=2,transition=20)" 
                        height=100% 
                        src="IMAGES/float.gif" 
                        width="355" border=0 name=bannerADrotator alt="第六届寝室文化节将于2005年11月8日开幕拉!"></a><SCRIPT language=JavaScript>nextAd()</SCRIPT></td>
							</tr>
						</table>
						</TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD bgColor=#82cefd height=4><IMG height=4 
                  src="imgs/new_bg01.jpg" 
                  width=9></TD></TR></TBODY></TABLE>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=379>
              <TBODY>
              <TR>
                <TD width=379>
				<map name="FPMap3">
				<area href="2smarket.asp" shape="rect" coords="334, 17, 371, 25">
				</map>
				<IMG border=0 height=39 
                  src="imgs/ershou_title.jpg" 
                  useMap=#FPMap3 width=379></TD></TR>
              <TR>
                <TD 
                background="imgs/new_bg.jpg" 
                height=145 vAlign=top>
                  <TABLE align=center 
                  background="imgs/center_xqbg.jpg" 
                  border=0 cellPadding=0 cellSpacing=0 width="95%" height="150">
                    <TBODY>
                    <TR>
                      <TD height=150 vAlign=top><table border="0" width="99%" align="right">
<%
set rst=server.createobject("adodb.recordset")
sql="select top 9 * from c2s order by id desc"
rst.open sql,conn,1,1
%> <%if Not(rst.bof and rst.eof) then
	for i=1 to 9
%>
<tr><td height=\"24\" style=\"BORDER-bottom: background="imgs/xp.bmp"><LINK href=news.css rel=stylesheet><img src="images/ICO.gif"> <font class=class><A class=class href="2s/look.asp?id=<%=rst("id")%>"  onclick="return mm(this)" title="<%=rst("c2szhu")%>" target="_blank">
[<%=rst("c2slei")%>]<%if len(rst("c2szhu"))>20then%>
                      <%=left(rst("c2szhu"),22)%>
                      <%else%>
                      <%=rst("c2szhu")%>
                      <%end if%>
</A><FONT color="#666666">[<%=(month(rst("c2stime")))%>-<%=(day(rst("c2stime")))%>]</FONT><%if date()-rst("c2stime")<2 then%><img src="images/news.gif"><%end if%></font></td></tr>


<%
rst.movenext
			   		if rst.eof then exit for
					next
else
	response.write "<tr><td colspan=13><marquee scrolldelay=120 behavior=alternate>没有人发布信息!!!</marquee></td></tr>"
end if	



Rst.Close
set Rst=nothing
%>
				
						</table></TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD bgColor=#82cefd height=16> </TD></TR></TBODY></TABLE></TD>
          <TD vAlign=top width=185>
            <TABLE border=0 cellPadding=0 cellSpacing=0 height=463 width=185>
              <TBODY>
              <TR>
                <TD height=76><IMG height=76 
                  src="imgs/right_01-1.jpg" 
                  width=185></TD></TR>
              <TR>
                <TD 
                background="imgs/right_01-2.jpg" 
                height=138 vAlign=top>
                  <TABLE border=0 cellPadding=0 cellSpacing=0 width=160 height="133">
                    <TBODY>
                    <TR>
                      <TD height=133 width=24> </TD>
                      <TD vAlign=top width=136>
                        <FORM action=admin/CHKLOGIN.ASP
                                               method=post>
                        <TABLE border=0 width="104%" height="119">
                          <TBODY>
                          <TR>
                            <TD height=30 style="FONT-SIZE: 10pt" 
                              width=55><FONT face=宋体 size=2 
                              style="FONT-SIZE: 10pt">用户名:</FONT></TD>
                            <TD height=30 style="FONT-SIZE: 10pt" 
                              width=76><FONT face=宋体 
                              style="FONT-SIZE: 10pt"><INPUT name=username 
                              size=10></FONT></TD></TR>
                          <TR>
                            <TD height=36 style="FONT-SIZE: 10pt" 
                              width=55><FONT face=宋体 size=2 
                              style="FONT-SIZE: 10pt">密&nbsp; 码:</FONT></TD>
                            <TD height=36 style="FONT-SIZE: 10pt" 
                              width=76><FONT face=宋体 
                              style="FONT-SIZE: 10pt">
							<INPUT name=Passwd 
                              size=10 type=password></FONT></TD></TR>
                          <tr>
                            <TD colSpan=2 height=23 style="FONT-SIZE: 10pt" 
                            width=134>
                              
<%dim num1,rndnum
Randomize
Do While Len(rndnum)<4
num1=CStr(Chr((57-48)*rnd+48))
rndnum=rndnum&num1
loop
session("verifycode")=rndnum
%>验证码:<input type="text" name="verifycode" size="6" font face="宋体" style="font-size: 9pt"><b><span style="background-color: #FFFFFF"><font color=#000000><%=session("verifycode")%></font></span></b>
</TD>
							</tr>
                          <TR>
                            <TD colSpan=2 height=20 style="FONT-SIZE: 10pt" 
                            width=134>
                              <P align=center><FONT face=宋体 size=2 
                              style="FONT-SIZE: 10pt">&nbsp;</FONT><FONT face=宋体 
                              style="FONT-SIZE: 10pt"><INPUT name=I2 type=submit value=提交></FONT><FONT 
                              face=宋体 size=2 
                              style="FONT-SIZE: 10pt">&nbsp;&nbsp;&nbsp;&nbsp;<FONT 
                              face=宋体 style="FONT-SIZE: 10pt"><INPUT name=B2 type=reset value=重置></FONT></FONT></P></TD></TR></TBODY></TABLE></FORM>
                        </TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD 
                background="imgs/right_01-3.jpg" 
                height=23>  </TD></TR>
              <TR>
                <TD align=middle bgColor=#64c2fd height=238  width="183" height="238" background="imgs/sqlj.gif">
				<table border="0" width="100%" height="190">
					<tr>
						<td height="7" width="24"></td>
						<td height="7"></td>
						<td height="7" width="19"></td>
					</tr>
					<tr>
						<td width="24"> </td>
						<td valign="top">
						<table border="0" width="100%" height="160">
							<tr>
								<td align="center">
								<br> 
                  <%if showlinkmap=1 then%>
                  <script language=JavaScript>marquee5();</script> 
                  <!--#include file=link_map.asp -->
                  <script language=JavaScript>marquee6();</script> 
                  <%end if%>
                  <%if showlink=1 then%>
                 <%end if%>
                 </td>
							</tr>
						</table>
						</td>
						<td width="19"> </td>
					</tr>
				</table>
				</TD></TR>
              </TBODY></TABLE>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=185 height="252">
              <TBODY>
              <TR>
                <TD height=51><IMG height=73 
                  src="imgs/right_02-1.jpg" 
                  width=184></TD></TR>
              <TR>
                <TD 
                background="imgs/right_01-2.jpg" 
                height=139 vAlign=top>
                  <TABLE align=center border=0 cellPadding=0 cellSpacing=0 
                  width="66%">
                    <TBODY>
                    <TR>
                      <TD><BR>
		  <%if showspecial=1 then%>
            <%set rs2=server.CreateObject("ADODB.RecordSet")  '专题
rs2.Source="select Top " & top_sp & " * from Special  order by SpecialID DESC "
rs2.Open rs2.Source,conn,1,1
if not rs2.EOF then
while not rs2.EOF

TrString="&nbsp;√&nbsp;<a class=class href='Special_News.asp?SpecialID=" & rs2("SpecialID") &"'>" & trim(left(rs2("SpecialName"),8)) & "</a><br>"
Response.Write TrString

rs2.MoveNext
wend
%>
            &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a class=class href=special.asp>更多专题...</a> 
            <%
else
Response.Write "<tr><td width=100% align=center height=18 >暂无专题</td></tr>"
end if
rs2.Close
set rs2=nothing

  
%>
            <%end if%>
          </TD></TR></TBODY></TABLE></TD></TR>
              <TR>
                <TD 
                background="imgs/right_02-3.jpg" 
                height=24>  </TD></TR>
              <TR>
                <TD bgColor=#64c2fd height=16></TD></TR></TBODY></TABLE>
            <TABLE border=0 cellPadding=0 cellSpacing=0 width=185>
              <TBODY>
              <TR>
                <TD><IMG height=75 
                  src="imgs/right_03-1.jpg" 
                  width=185></TD></TR>
              <TR>
                <TD 
                background="imgs/right_01-2.jpg" 
                height=130 vAlign=top>
                  <TABLE align=center border=0 cellPadding=0 cellSpacing=0 
                  width="68%">
                    <TBODY>
                    <TR>
                      <TD height=32>
						<p align="right">社区办公室主任电话:<font color="#008000">86891278</font></TD></TR>
                    <tr>
                      <TD height=32>
						<p align="right">社区办公室电话:<font color="#008000">86891000</font></TD>
					</tr>
                    <TR>
                      <TD height=32>
						<p align="right">信息中心工作室电话:<font color="#008000">86804516</font></TD></TR>
                    <TR>
                      <TD>
						<p align="center">
						<a target="_blank" href="addfk.asp" onclick="return mm(this)" >
						<img border="0" id="img1" src="IMAGES/buttonA6.gif" height="24" width="120" alt="意见箱" onmouseover="FP_swapImg(1,0,/*id*/'img1',/*url*/'IMAGES/buttonA7.gif')" onmouseout="FP_swapImg(0,0,/*id*/'img1',/*url*/'IMAGES/buttonA6.gif')" onmousedown="FP_swapImg(1,0,/*id*/'img1',/*url*/'IMAGES/buttonA8.gif')" onmouseup="FP_swapImg(0,0,/*id*/'img1',/*url*/'IMAGES/buttonA7.gif')" fp-style="fp-btn: Embossed Rectangle 2; fp-font; fp-font-color-normal: #000080; fp-font-color-hover: #00FFFF; fp-font-color-press: #64C2FD; fp-transparent: 1" fp-title="意见箱"></a></TD></TR>
                    </TBODY></TABLE></TD></TR>
              <TR>
                <TD 
                background="imgs/right_02-3.jpg" 
                height=24>  </TD></TR>
              </TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
    <TD background="imgs/right_bg.jpg" 
    vAlign=top width=15> </TD></TR></TBODY></TABLE>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=773>
  <TBODY>
  <TR>
    <TD background="imgs/under.jpg" 
    height=118 vAlign=top>
      <!--#include file=bot.asp -->
      
      </TD></TR></TBODY></TABLE><TD height="23"> </TD> 
</BODY></HTML>

⌨️ 快捷键说明

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