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

📄 station.asp

📁 佛山的公交车查询系统
💻 ASP
字号:
<!-- #include file="inc/config.asp" -->
<%
station_char = request.QueryString("char")
if station_char="" then
  call ShowErr("请输入站点!","1")
end if
response.Write("<html>")
response.Write("<link type='text/css' href='css/index.css' rel='stylesheet'>")
response.Write("<script language='javascript' type='text/javascript' src='js/qm.js'></script>")
response.Write("<head>")
response.Write("<title>与字母"& station_char &"开头的公交站点列表</title>")
response.Write("</head>")
response.Write("<body>")
%>
<!-- #include file="top.asp" -->
<%
response.Write("<div id='div_1'>所有与字母"& station_char &"开头的公交站点列表</div>")
response.Write("<div id='div_2'>")
sql="select * from [Station] where qmstation_char='"& station_char &"'"
rs.open sql,conn,1,3
if rs.eof then
  response.Redirect("station_suggestion.asp?q="& station_char &"")
else
  While (Not rs.eof)
	Response.Write "<a href=""station_show.asp?q="&rs("qmstation_name")&""">"&rs("qmstation_name")&"</a>"
	rs.movenext
  Wend 
end if
rs.close
response.Write("</div>")
response.Write("</body>")
response.Write("</html>")
%>
<!-- #include file="bottom.asp" -->

⌨️ 快捷键说明

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