|
SQL可用于所有用户的DB活动模型，包括系统管理员、数据库管理员、应用程序员、决策支持系统人员及许多其它类型的终端用户。基本的SQL 命令只需很少时间就能学会，最高级的命令在几天内便可掌握。 SQL为许多任务提供了命令，包括： 内容来自www.paper51.com ● 查询数据 paper51.com ● 在表中插入、修改和删除记录 paper51.com ● 建立、修改和删除数据对象 copyright paper51.com ● 控制对数据和数据对象的存取 内容来自www.paper51.com
● 保证数据库一致性和完整性 copyright paper51.com 以前的数据库管理系统为上述各类操作提供单独的语言，而SQL 将全部任务统一在一种语言中。 内容来自论文无忧网 www.paper51.com (3) 是所有关系数据库的公共语言 内容来自论文无忧网 www.paper51.com 由于所有主要的关系数据库管理系统都支持SQL语言，用户可将使用SQL的技能从一个RDBMS转到另一个。所有用SQL编写的程序都是可以移植的。 内容来自www.paper51.com
四、公交查询系统应用程序设计 http://www.paper51.com
（一）查询模块部分 paper51.com
1、车次查询 http://www.paper51.com
用户通过主页上的车次查询，可以通过查询车次名称，可在返回页面上获得该线路的首末车时间及各个停靠站的名称。 内容来自www.paper51.com 具体查询代码如下： copyright paper51.com
<% http://www.paper51.com ifrequest.Form("select")="" then 内容来自论文无忧网 www.paper51.com sql = "select * from [bus]" paper51.com
else 内容来自www.paper51.com line=request.form ("select") copyright paper51.com
sql="select * from [bus] where[line] = "&line ‘查询所选择的线路 内容来自www.paper51.com 'response.Write sql copyright paper51.com 'response.end() paper51.com end if http://www.paper51.com setrs=server.createobject("adodb.recordset") 内容来自论文无忧网 www.paper51.com rs.open sql,conn,1,1 copyright paper51.com %> http://www.paper51.com <% 内容来自www.paper51.com do while not rs.eof http://www.paper51.com %> copyright paper51.com <tr> copyright paper51.com <td align="center"valign="middle"><%=rs("line")%></td> http://www.paper51.com <td align="center"valign="middle"><%=rs("time")%></td> paper51.com <tdvalign="middle"><%=rs("station")%></td> 内容来自论文无忧网 www.paper51.com </tr> http://www.paper51.com
<% copyright paper51.com rs.movenext copyright paper51.com loop paper51.com rs.close copyright paper51.com %> http://www.paper51.com
2、车站查询 http://www.paper51.com 用户通过主页上的车站查询，通过查询车站名称，可在返回页面上获得经过该车站所有线路的车次、首末车时间及各个停靠站的名称。 copyright paper51.com 具体查询代码如下： 内容来自论文无忧网 www.paper51.com <% http://www.paper51.com station1=request.form("text2") paper51.com
sql="select * from [bus] where[station] like '%"&station1&"%'" ‘查询经过所输入车站的所有车次 paper51.com setrs=server.createobject("adodb.recordset") copyright paper51.com rs.open sql,conn,1,1 copyright paper51.com %> paper51.com
<% 内容来自论文无忧网 www.paper51.com do while not rs.eof 内容来自www.paper51.com
%> copyright paper51.com <tr> http://www.paper51.com
<td align="center"valign="middle"><%=rs("line")%></td> 内容来自论文无忧网 www.paper51.com
<td align="center"valign="middle"><%=rs("time")%></td> copyright paper51.com
<tdvalign="middle"><%=rs("station")%></td> 内容来自论文无忧网 www.paper51.com </tr> http://www.paper51.com
<% 内容来自论文无忧网 www.paper51.com rs.movenext http://www.paper51.com loop 内容来自论文无忧网 www.paper51.com rs.close 内容来自www.paper51.com %> http://www.paper51.com
3、站-站查询 http://www.paper51.com 用户通过主页上的站-站查询，通过查询用户所在车站及目的地车站名称，在返回页面上获得车站所有满足查询条件的车次、首末车时间及各个停靠站的名称。 http://www.paper51.com 具体查询代码如下： copyright paper51.com
<% http://www.paper51.com sql="select * from [bus] where[station] like '%"&station1&"%'and '%"&station2&"%'"‘查询所有经过所在车站 copyright paper51.com
及目的车站的车次 paper51.com setrs=server.createobject("adodb.recordset") paper51.com rs.open sql,conn,1,1 内容来自www.paper51.com %> paper51.com
<% paper51.com do while not rs.eof http://www.paper51.com %> 内容来自www.paper51.com <tr> copyright paper51.com <td align="center"valign="middle"><%=rs("line")%></td> copyright paper51.com <td align="center" valign="middle"><%=rs("time")%></td> paper51.com
<tdvalign="middle"><%=rs("station")%></td> paper51.com </tr> 内容来自论文无忧网 www.paper51.com <% 内容来自论文无忧网 www.paper51.com rs.movenext http://www.paper51.com loop http://www.paper51.com
rs.close 内容来自www.paper51.com %> http://www.paper51.com （二）管理员模块部分 paper51.com 1、添加线路 内容来自www.paper51.com 管理员通过该功能，添加新的线路，保持本系统的更新。 内容来自www.paper51.com 具体代码如下： 内容来自www.paper51.com <% http://www.paper51.com title1=request("T1") copyright paper51.com title2=request("T2") http://www.paper51.com title3=request("T3") 内容来自www.paper51.com 'session("t1")=title1 copyright paper51.com
if title1="" then paper51.com response.write"<scriptlanguage=javascript>"&chr(13)&"alert('请输入线路!');history.back()</script>" paper51.com Response.End copyright paper51.com end if ‘如果“线路”为空，系统将提示输入 内容来自论文无忧网 www.paper51.com if title2="" then 内容来自www.paper51.com response.write"<scriptlanguage=javascript>"&chr(13)&"alert('请输入首末车时间!');history.back()</script>" 内容来自www.paper51.com Response.End 内容来自www.paper51.com
end if ‘如果“首末车时间”为空，系统将提示输入 paper51.com if title3="" then paper51.com response.write"<scriptlanguage=javascript>"&chr(13)&"alert('请输入停靠站!');history.back()</script>" copyright paper51.com Response.End paper51.com end if ‘如果“停靠站”为空，系统将提示输入 paper51.com Set add=Server.CreateObject("Adodb.Recordset") 内容来自www.paper51.com Sql="Select * From [bus] Where[ID] is Null" copyright paper51.com add.Open Sql,Conn,1,3 内容来自www.paper51.com
add.addnew paper51.com add("line")=title1 http://www.paper51.com
add("time")=title2 paper51.com add("station")=title3 内容来自www.paper51.com add.Update copyright paper51.com add.Close http://www.paper51.com Set add=Nothing 内容来自论文无忧网 www.paper51.com Update http://www.paper51.com Response.Redirect"admin_dele.asp" 内容来自www.paper51.com
%> ‘添加新的线路 paper51.com
2、修改线路 http://www.paper51.com 管理员通过该功能修改已存在的线路，保持本系统的更新。可单独修改车次、首末车时间及停靠站，操作方便，节省时间。 内容来自www.paper51.com 具体代码如下： 内容来自论文无忧网 www.paper51.com
<% http://www.paper51.com title1=request("T1") copyright paper51.com title2=request("T2") paper51.com
title3=request("T3") 内容来自www.paper51.com if title1="" then copyright paper51.com response.write"<script language=javascript>"&chr(13)&"alert('请输入线路!');history.back()</script>" paper51.com
Response.End http://www.paper51.com end if ‘如果“线路”为空，系统将提示输入 copyright paper51.com if title2="" then copyright paper51.com
response.write"<script language=javascript>"&chr(13)&"alert('请输入首末车时间!');history.back()</script>" http://www.paper51.com Response.End http://www.paper51.com end if ‘如果“首末车时间”为空，系统将提示输入 内容来自www.paper51.com if title3="" then 内容来自论文无忧网 www.paper51.com response.write"<script language=javascript>"&chr(13)&"alert('请输入停靠站!');history.back()</script>" paper51.com Response.End 内容来自论文无忧网 www.paper51.com end if ‘如果“停靠站”为空，系统将提示输入 http://www.paper51.com sql ="select * from buswhere id= "& request("id") &"" http://www.paper51.com setrs=server.CreateObject("adodb.recordset") 内容来自论文无忧网 www.paper51.com rs.open sql,conn,1,3 paper51.com rs("line")=title1 内容来自论文无忧网 www.paper51.com
rs("time")=title2 内容来自www.paper51.com rs("station")=title3 copyright paper51.com rs.update http://www.paper51.com rs.close paper51.com set rs=nothing paper51.com conn.close 内容来自www.paper51.com
set conn=nothing paper51.com
Response.Redirect"admin_dele.asp" %> ‘修改已存在的线路 http://www.paper51.com
3、删除线路 copyright paper51.com 管理员通过该功能删除已存在的线路，该功能支持多条线路同时删除功能。 copyright paper51.com 具体代码如下： 内容来自论文无忧网 www.paper51.com <% 内容来自www.paper51.com sql="delete from buswhere id in("&request("answer")&")" copyright paper51.com
conn.execute(sql) copyright paper51.com
response.redirect"admin_dele.asp" ‘ 删除所选的线路 paper51.com %> 内容来自www.paper51.com
|