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

📄 me.asp

📁 个人网站系统,本人基于第三方源码进行更改!
💻 ASP
📖 第 1 页 / 共 2 页
字号:
							end if
		if len(rdsInfo("Topic")) > 21 then
			strTopic = left(rdsInfo("Topic"),21) &"..."
		else
			strTopic = rdsInfo("Topic")
		end if
                      %>
                        <tr> 
                          <td width="56%" height="20" class="F16"><%if rdsInfo("tj")=true then%>&nbsp;<img border="0" src="images/arrow.gif" alt="推荐信息"><%else%>&nbsp;<img border="0" src="images/tu33.gif" alt="一般信息"><%end if%>&nbsp;<font color="#478B47"><span style="font-size: 9pt"><% = strInfoClass%></span></font><span style="font-size: 9pt">&nbsp;</span><a href="View_Info.asp?Id=<% = rdsInfo("InfoKey")%>" target="_blank" class="a01"><span style="font-size: 9pt"><% = strTopic%></span></a></td>
                          <td width="10%" align="center"><%if rdsInfo("state")=1 then%><img border="0" src="images/unlock.gif" alt="开通" width="15" height="16"><%else%><font color="#FF0000"><img border="0" src="images/lock.gif" width="15" height="16" alt="关闭,请用固定电话拨打1603审请开通,您的信息ID为<% = rdsInfo("InfoKey")%>"><%end if%></font></td>
                          <td width="9%" align="center">
							<a href="javascript:edit_Info(<% = rdsInfo("InfoKey")%>)">
							<img border="0" src="images/view.gif" alt="编辑信息" width="15" height="16"></a></td>
                          <td width="6%" align="center"><a href="javascript:askdel_Info(<% = rdsInfo("InfoKey")%>)">
							<img border="0" src="images/del.gif" width="15" height="16" alt="删除此信息!" onclick="{if(confirm('确定删除选定的纪录吗?')){return true;}return false;}"></a></td>
                          <td width="8%" align="center"><% = rdsInfo("Hits")%>/<% = rdsInfo("hf")%></td>
                        </tr>
                        <tr>
						  <td width="100%" colspan="5" height="1" background="images/dotline.gif"></td>
						</tr>
<%
  		rdsInfo.MoveNext
	loop
else
%>
						<tr>
						  <td width="100%" colspan="5" height="25">&nbsp;<font color="#FF0000">对不起!本系统没有您的任何供求信息</font>...</td>
						</tr>
<%
end if
rdsInfo.Close
set rdsInfo = nothing

if intPage - 1 mod 10 = 0 then
	p = (intPage - 1) \ 10
else
	p = (intPage - 1) \ 10
end if
%>
                      </table>
				    </td>
                  </tr>
                </table>
                <table border="0" cellspacing="0" width="100%" cellpadding="0">
				  <tr>
					<td width="100%" height="30" align="center" valign="top">
	  <table border="0" width="98%" cellspacing="0" cellpadding="0" align="center">
	    <form method="post" action="Info.asp" name="Form2">
	    <input type="hidden" name="KeyWord" value="<% = strKeyWord%>">
	    <tr>
		  <td width="30%" height="30" valign="middle">页次:<b><%= intPage %></b>/<b><%= n %></b>页 每页<b><%= intInfoCot %></b>条 共<b><%= intTotalRec %></b>条</td>
		  <td width="70%" height="30" valign="middle"><div align="right">分页:
			<%
				if intPage = 1 then
					Response.Write "<font face=webdings>9</font>   "
				else
					Response.Write "<a href='?Page=1&KeyWord="& strKeyWord &"' title=首页><font face=webdings>9</font></a>   "
				end if
				if p * 10 > 0 then Response.Write "<a href='?Page="&Cstr(p*10)&"&KeyWord="& strKeyWord &"' title=上十页><font face=webdings>7</font></a>   "
				Response.Write "<b>"
				for ii = p * 10 + 1 to P * 10 + 10
					   if ii = intPage then
				          Response.Write "<font color=""#FF0000"">"+Cstr(ii)+"</font> "
					   else
					      Response.Write "<a href='?Page="&Cstr(ii)&"&KeyWord="& strKeyWord &"'>"+Cstr(ii)+"</a>   "
					   end if
					if ii = n then exit for
				next
				Response.Write "</b>"
				if ii < n then Response.Write "<a href='?Page="&Cstr(ii)&"&KeyWord="& strKeyWord &"' title=下十页><font face=webdings>8</font></a>   "
				if intPage=n then
					Response.Write "<font face=webdings>:</font>   "
				else
					Response.Write "<a href='?Page="&Cstr(n)&"&KeyWord="& strKeyWord &"' title=尾页><font face=webdings>:</font></a>   "
				end if
			%>
			转到:<input type="text" name="Page" size="2" maxlength="10" value="<%= intPage %>" class="face"> <input type="submit" value="Go" name="submit" class="button">
			</div></td>
		</tr>
		</form>
	  </table>
					</td>
				  </tr>
				</table>
               </td>
              </tr>
              </tbody></table></center></div>
    </td>
    <td vAlign="top" width="10"><img height="1" src="images/space.gif" width="10" border="0"></td>
    <td vAlign="top" width="1" background="images/space_01.gif"><img height="1" src="images/space_01.gif" width="1" border="0"></td>
    <td class="bg01" vAlign="top" width="157">
      <div align="center">
      <center>
      <table id="AutoNumber11" style="BORDER-COLLAPSE: collapse" borderColor="#111111" height="176" cellSpacing="0" cellPadding="0" width="157" border="0">
        <tbody>
        <tr>
          <td vAlign="top" height="35"><img height="35" src="images/pic_520_passport_01.gif" width="157" border="0"></td></tr>
        <tr>
          <td vAlign="top" background="images/pic_520_passport_02.gif" bgColor="#ffffff" height="120" align="center"><!--#include file="Common/Inc_Login.asp"--></td>
        </tr>
        <tr>
          <td vAlign="top" height="21"><img height="21" src="images/pic_520_passport_03.gif" width="157" border="0"></td></tr></tbody></table></center></div>
      <div align="center">
      <center>
      <table borderColor="#111111" cellSpacing="0" cellPadding="0" width="157" border="0">
        <tbody>
        <tr>
          <td vAlign="center" background="images/space_01.gif" height="25" width="155">&nbsp;&nbsp;<img src="images/arrow_02.gif" border="0">&nbsp;<b><font color="#FFFFFF">信息分类</font></b></td></tr>                                                                                   
        <tr>
          <td height="8" width="155"></td></tr>
        <tr>
          <td width="155" align="center" valign="top"><!--#INCLUDE FILE="Common/Inc_Catalog.asp"--></td>
        </tr>
        <tr>
          <td height="8" width="155" colspan="2"></td></tr></tbody></table></center></div>
      <div align="center">
      <center>
      <table borderColor="#111111" cellSpacing="0" cellPadding="0" width="157" border="0">
        <tbody>
        <tr>
          <td vAlign="center" background="images/space_01.gif" height="25">&nbsp;&nbsp;<img src="images/arrow_02.gif" border="0">&nbsp;<b><font color="#FFFFFF">合作伙伴</font></b></td></tr>
        <tr>
          <td height="8"></td>
        </tr>
        <tr>
          <td width="155" align="center" valign="top"><!--#INCLUDE FILE="Common/Inc_Cooperate.asp"--></td>
        </tr>
        <tr>
          <td height="8"></td>
        </tr>
        </tbody>
      </table>
      </center>
      </div>
      <div align="center">
      <center>
      <table borderColor="#111111" cellSpacing="0" cellPadding="0" width="157" border="0">
        <tbody>
        <tr>
          <td vAlign="center" background="images/space_01.gif" height="25">&nbsp;&nbsp;<img src="images/arrow_02.gif" border="0">&nbsp;<b><font color="#FFFFFF">友情链接</font></b></td></tr>
        <tr>
          <td height="8"></td>
        </tr>
        <tr>
          <td width="155" align="center" valign="top"><!--#INCLUDE FILE="Common/Inc_Link.asp"--></td>
        </tr>
        <tr>
          <td height="8"></td>
        </tr>
        </tbody>
      </table>
      </center>
      </div>
      </td>
    <td vAlign="top" width="1" background="images/space_01.gif"><img height="1" src="images/space_01.gif" width="1" border="0"></td></tr>
  <tr>
    <td vAlign="top" width="760" colSpan="7" height="14"><img height="14" src="images/pic_bottom_01.gif" width="760" border="0"></td></tr></tbody></table></div>
<!--#include file="End.asp"-->
</body>
</html>

⌨️ 快捷键说明

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