title.asp

CityCN V2.1 是自主开发的基于ASP+Access的新型资讯信息系统。

<TABLE cellSpacing=0 cellPadding=0 width=760 border=0>
  <TR>
    <TD class="skin_shen" height="4"></TD>
  </TR>
  <TR>
    <TD class="skin_qian" height="4"></TD>
  </TR>
</TABLE>
<table cellpadding="0" style="border-collapse: collapse" width="760" border="0" cellspacing="10">
  <tr>
    <td width="170"><img border="0" src="images/logo.gif" width="161" height="64"></td>
    <td align="right" width="500"><img border="1" src="ad/citycn468.gif" width="467" height="59"></td>
    <td align="right" width="80" style="letter-spacing: 1.5">
	  <a href="add_info.asp">添加资讯</a><br>
	  <a href="add_city.asp">添加城市</a><br>
	  <a target="_blank" href="link.htm">联系我们</a><br></td>
  </tr>
</table>
<table cellpadding="0" style="border-collapse: collapse" width="760" border="0">
  <tr>
    <td height="30" align="right">
      <table border="0" cellpadding="0" style="border-collapse: collapse" height="30">
		<tr align="center" valign="top" style="padding-top: 6px; letter-spacing: 4pt;">
		  <td width="56" background="images/title_biao<%if mycity="" then response.write "_bold"%>.gif"><a href="index.asp" <%if mycity="" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="返回首页">首页</a></td>
		  <td width="56" background="images/title_biao<%if mycity="北京" then response.write "_bold"%>.gif"><a href="info.asp?ct=北京" <%if mycity="北京" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往北京">北京</a></td>
		  <td width="56" background="images/title_biao<%if mycity="上海" then response.write "_bold"%>.gif"><a href="info.asp?ct=上海" <%if mycity="上海" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往上海">上海</a></td>
		  <td width="56" background="images/title_biao<%if mycity="天津" then response.write "_bold"%>.gif"><a href="info.asp?ct=天津" <%if mycity="天津" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往天津">天津</a></td>
		  <td width="56" background="images/title_biao<%if mycity="重庆" then response.write "_bold"%>.gif"><a href="info.asp?ct=重庆" <%if mycity="重庆" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往重庆">重庆</a></td>
		  <td width="56" background="images/title_biao<%if mycity="广州" then response.write "_bold"%>.gif"><a href="info.asp?ct=广州" <%if mycity="广州" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往广州">广州</a></td>
		  <td width="56" background="images/title_biao<%if mycity="沈阳" then response.write "_bold"%>.gif"><a href="info.asp?ct=沈阳" <%if mycity="沈阳" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往沈阳">沈阳</a></td>
		  <td width="56" background="images/title_biao<%if mycity="长春" then response.write "_bold"%>.gif"><a href="info.asp?ct=长春" <%if mycity="长春" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往长春">长春</a></td>
		  <td width="56" background="images/title_biao<%if mycity="西安" then response.write "_bold"%>.gif"><a href="info.asp?ct=西安" <%if mycity="西安" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往西安">西安</a></td>
		  <td width="56" background="images/title_biao<%if mycity="武汉" then response.write "_bold"%>.gif"><a href="info.asp?ct=武汉" <%if mycity="武汉" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往武汉">武汉</a></td>
		  <td width="56" background="images/title_biao<%if mycity="成都" then response.write "_bold"%>.gif"><a href="info.asp?ct=成都" <%if mycity="成都" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往成都">成都</a></td>
		  <td width="56" background="images/title_biao<%if mycity="杭州" then response.write "_bold"%>.gif"><a href="info.asp?ct=杭州" <%if mycity="杭州" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往杭州">杭州</a></td>
		  <td width="56" background="images/title_biao<%if mycity="长沙" then response.write "_bold"%>.gif"><a href="info.asp?ct=长沙" <%if mycity="长沙" then response.write "style='color: #FFFFFF; font-weight: bold'"%> title="前往长沙">长沙</a></td>
		  <td width="15"></td>
		</tr>
	  </table>
    </td>
  </tr>
</table>
<table cellpadding="0" style="border-collapse: collapse" width="760" height="34" border="0">
  <tr bgcolor="#FF9000">
    <td background="images/title_bar_left.gif" width="5"></td>
    <td>　</td>
    <td align="right">
      <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse">
        <tr>
          <td class="title" width="75" align="center">
			<a style="color: #FFFFFF" target="_blank" href="map_city.asp">城市列表</a></td>
          <td class="title" width="70" align="right"><font color="#FFFFFF">更多城市：</font></td>
          <form method="GET" action="info.asp">
          <td width="120">
          <input type="text" name="ct" size="8" maxlength="4" value="城市名" onClick=javascript:this.value="">&nbsp;<input type="submit" value="提交" name="B1">
          </td>
          </form>
          <td width="120">
      <select name="city" size="1" onchange="if(this.options[this.selectedIndex].value!=''){window.open(this.options[this.selectedIndex].value,'_self');}">
        <option value=''>请选择城市</option>
        <option value=''>---------------------</option>
<%
dim rspov_tit,rscity_tit
set rspov_tit=server.CreateObject("adodb.recordset")
set rscity_tit=server.CreateObject("adodb.recordset") 
rspov_tit.open "select * from 省份 where 审核=1 order by 排名 asc",conn,1,1
  Do while not rspov_tit.bof and not rspov_tit.eof
    response.write "<option value='' class='blue'>-- " &rspov_tit("省份全称") & " --</option>"
    rscity_tit.open "select * from 城市 where 审核=1 and 省份='"& rspov_tit("省份") &"' order by 排名 asc",conn,1,1
    Do while not rscity_tit.bof and not rscity_tit.eof
      if rscity_tit("城市")=city(1) then
        response.write"<option value='info.asp?ct=" &rscity_tit("城市")& "' selected class='red'>--> "& rscity_tit("城市") &" （" & rscity_tit("区号") &"）</option>"
      else
        response.write"<option value='info.asp?ct=" &rscity_tit("城市")& "'>　　"& rscity_tit("城市") &" （" & rscity_tit("区号") &"）</option>"
      end if
      rscity_tit.movenext
    loop
    rscity_tit.close
    rspov_tit.movenext
  loop
  rspov_tit.close
set rspov_tit=nothing
set rscity_tit=nothing
%>
      </select></td>
        </tr>
      </table>
    </td>
    <td background="images/title_bar_right.gif" width="5"></td>
  </tr>
</table>
<table><tr><td height="5"></td></tr></table>