企业官网建设流程全解析

简介：这份资料包面向计算机专业毕业设计与课程实训场景，围绕ASP结合SQL Server开发旅游管理系统给出完整实现方案，适合需要从需求分析走到答辩演示的学生与初级开发者参考。压缩包共148个文件，约27.87MB，以asp动态页面源码、jpg与png界面素材、htm静态页、css样式为主，另含db与mdf、ldf数据库文件、doc论文与开题报告、ppt答辩幻灯片，可直接对照运行或改造。内容覆盖用户注册登录与Session状态维护、旅游线路展示、在线预订与订单状态跟踪、后台产品与反馈管理等模块，并涉及密码加密、防SQL注入及索引优化等要点。已有171人学习，可作为毕设选题与代码复用的实操范本。

1. 从“能跑起来”倒推：这套旅游管理系统到底适合谁

很多人一听到要做旅游管理系统，第一反应是换新框架，但真正到了要交完整毕设、要在机房旧环境里跑起来的时候，经典ASP+SQL Server反而是最稳的选择。这套旅游管理系统设计覆盖的是从线路展示、在线预订到后台维护的完整闭环，前台让游客能查线路、看详情、提交订单，后台让运营人员能维护线路、处理订单、管理用户。它适合两类人：一是需要交一份带源代码、论文、开题报告和答辩PPT的完整课程设计或毕业设计的学生；二是手头有旧ASP项目要维护、想参考一套能跑通的结构来改的从业者。整套方案不追求花哨，追求的是模块边界清楚、数据表能对上、部署到IIS上不报错。

2. 总体架构设计：ASP三层结构与SQL Server数据表怎么划

做毕业设计，最容易翻车的地方不是页面不好看，而是结构没划清，改一个功能牵动五个文件。我一般会把旅游管理系统拆成三块：前台展示、后台管理、公共数据访问。三块之间只通过数据表和少量公共函数通信，页面之间不互相包含业务逻辑。这样拆分的好处很直接——论文里的“系统功能模块图”能画出来，答辩老师问“你这个模块怎么划分的”，你能指着目录说清楚，而不是临时编。

2.1 系统分层与目录结构

经典ASP没有强制的MVC约束，但可以用“页面+公共包含文件”的方式模拟出三层。表示层就是.asp页面，负责接收请求、调用数据访问函数、输出HTML；业务逻辑层我习惯放在/includes目录下的独立.asp文件里，按模块拆成line_func.asp、order_func.asp、user_func.asp；数据访问层集中在一个conn.asp里，负责连接字符串和打开/关闭记录集。这种拆法不是学术上的标准三层，但足够让代码不糊成一团，也方便论文里写“系统采用三层架构思想”。

目录结构我一般按下面的方式组织：

/site /admin 后台页面：线路管理、订单管理、用户管理 /includes conn.asp、公共函数、公共头尾 /images 线路封面图 /css 样式 /js 前端脚本 /database 建库脚本 TravelDB.sql default.asp 首页 line_list.asp 线路列表 line_detail.asp 线路详情 order_submit.asp 订单提交 user_login.asp 前台登录

这样的好处是，后台要改线路查询逻辑，只需要动line_func.asp，前台列表页和后台列表页同时生效；要换数据库连接，只改conn.asp一处，不用全站搜索“Provider=SQLOLEDB”。我见过不少同学的代码，每个页面都写一遍连接字符串，最后换密码时改到崩溃，这种血泪经验在毕设里完全可以避免。

连接字符串配置集中放在conn.asp里：

<% ' conn.asp —— 全站唯一的数据库连接入口 Dim connStr, conn connStr = "Provider=SQLOLEDB;Data Source=.;Initial Catalog=TravelDB;User ID=sa;Password=******;" Set conn = Server.CreateObject("ADODB.Connection") conn.Open connStr Sub CloseConn() If IsObject(conn) Then If conn.State = 1 Then conn.Close Set conn = Nothing End If End Sub %>

Data Source=.表示本机默认实例，如果装的是Express版，要改成.\SQLEXPRESS；Initial Catalog填数据库名，建议单独建TravelDB，不要和系统库混用。页面的引用方式是在第一行加<!--#include file="includes/conn.asp"-->，然后页面只做三件事：取参数、调函数、渲染HTML。连接串里不要图省事写空密码，部署到IIS上很容易因为权限问题连不上，后面第5章会专门说这个。

2.2 核心数据表设计与字段说明

数据库设计是这套系统能不能讲清楚的关键。旅游管理系统的核心是“线路—订单—用户”三条主线，外加内容维护。我通常设计六张主表，字段够用就行，不要为了显得复杂而加一堆没人查的列。

线路表和订单表的建表脚本大概是这样的：

-- 线路表：Status做上下架控制，避免直接删数据 CREATE TABLE Lines ( LineID INT IDENTITY(1,1) PRIMARY KEY, Title NVARCHAR(100) NOT NULL, CategoryID INT NOT NULL DEFAULT 1, Price DECIMAL(10,2) NOT NULL DEFAULT 0, Days INT NOT NULL DEFAULT 1, CoverImg NVARCHAR(200), Content NTEXT, Status INT NOT NULL DEFAULT 1, -- 1上架 0下架 CreateTime DATETIME DEFAULT GETDATE() ); -- 订单表：OrderNo单独一列，对外展示用 CREATE TABLE Orders ( OrderID INT IDENTITY(1,1) PRIMARY KEY, OrderNo VARCHAR(32) NOT NULL UNIQUE, UserID INT NOT NULL, LineID INT NOT NULL, ContactName NVARCHAR(50) NOT NULL, Phone VARCHAR(20) NOT NULL, Num INT NOT NULL DEFAULT 1, TotalPrice DECIMAL(10,2) NOT NULL, OrderStatus INT NOT NULL DEFAULT 0, -- 0待确认 1已确认 2已完成 3已取消 CreateTime DATETIME DEFAULT GETDATE() );

这里有两个设计点值得在论文里写清楚。第一，OrderNo单独做一列，不要拿自增OrderID直接对外展示，自增编号会暴露订单量，也不方便后面加前缀；我一般用“日期+4位随机数”拼一个单号，长度控制在32位以内。第二，订单状态用整型枚举，不要直接往数据库里存“待确认”“已确认”这种中文，后面做筛选统计时WHERE OrderStatus=0比字符串匹配干净得多，也不容易因为编码问题出乱码。

逻辑关系上，Orders.UserID对应Users.UserID，Orders.LineID对应Lines.LineID，Lines.CategoryID对应分类表。物理外键在毕设里不是必须的，但论文的E-R图里要把关系画出来，答辩时老师很可能会问“订单和线路怎么关联的”。我的习惯是逻辑关联写清楚，物理外键不建，避免后台删除线路时被外键卡住，改成Status下架即可。

字段类型也有讲究。价格用DECIMAL(10,2)而不是FLOAT，避免计算总价时出现0.30000000000000004这种尾数；手机号用VARCHAR(20)，不要用INT，前导零和座机号都能存；内容字段用NTEXT或NVARCHAR(MAX)，经典ASP里NTEXT兼容性更好，但新版本SQL Server建议用NVARCHAR(MAX)。这些细节写进论文的“数据库设计”章节，比只贴一张表结构图更有说服力。

3. 核心业务模块实现：线路浏览、预订下单与订单状态流转

前台看起来页面多，真正有业务含量的就两条线：线路怎么被查到、订单怎么被创建。把这两条线写透，其余新闻列表、留言板都是同一套增删改查的变体。我带学生做的时候，一般要求先把线路列表和订单提交跑通，再补其他页面，这样进度可控，答辩演示也有主线。

3.1 前台线路列表与详情页的数据读取

线路列表的分页是第一个要解决的问题。经典ASP里常见的写法是用TOP加NOT IN做分页，兼容SQL Server 2000及以上，不需要依赖OFFSET FETCH。下面这段是列表页的核心查询：

<% ' line_list.asp —— 线路列表分页 Dim page, pageSize, totalCount, totalPage, rs, sql page = Request.QueryString("page") If page = "" Or Not IsNumeric(page) Then page = 1 page = CInt(page) If page < 1 Then page = 1 pageSize = 10 ' 统计上架线路总数 Set rs = conn.Execute("SELECT COUNT(*) AS c FROM Lines WHERE Status=1") totalCount = rs("c") rs.Close totalPage = Int((totalCount + pageSize - 1) / pageSize) ' 用TOP + NOT IN取当前页 sql = "SELECT TOP " & pageSize & " LineID,Title,Price,Days,CoverImg FROM Lines " & _ "WHERE Status=1 AND LineID NOT IN (" & _ "SELECT TOP " & (page-1)*pageSize & " LineID FROM Lines WHERE Status=1 ORDER BY LineID DESC" & _ ") ORDER BY LineID DESC" Set rs = conn.Execute(sql) %>

这段代码里有三个参数要盯住：pageSize控制每页条数，默认10条，改大以后列表页会变长，手机端体验会下降；page必须做IsNumeric和CInt双重校验，否则URL里传一个字母进来，SQL拼出来直接报错；Status=1保证下架线路不出现在前台，删除线路时只改状态不删记录，订单里的历史关联才不会断。分页公式(totalCount + pageSize - 1) / pageSize是向上取整的常用写法，比Int(totalCount/pageSize)+1稳，总数刚好整除时不会多出一页空页。

详情页的读取就简单了，按LineID取一条记录，然后绑定到HTML：

<% ' line_detail.asp —— 线路详情 Dim id, rs id = Request.QueryString("id") If id = "" Or Not IsNumeric(id) Then Response.Write "参数错误" Response.End End If Set rs = conn.Execute("SELECT * FROM Lines WHERE LineID=" & CInt(id) & " AND Status=1") If rs.EOF Then Response.Write "线路不存在或已下架" Response.End End If %> <h1><%=Server.HTMLEncode(rs("Title"))%></h1> <p>价格：<%=rs("Price")%> 元 / <%=rs("Days")%> 天</p> <div><%=rs("Content")%></div>

这里Server.HTMLEncode不能省，线路标题和内容来自后台输入，直接输出会把HTML标签渲染出来，严重的还可能被塞脚本。内容字段如果后台用了富文本编辑器，详情页就不能再编码，否则标签会原样显示；我的做法是标题一律编码，内容按后台是否富文本决定，论文里把这套规则写清楚，答辩时是个加分项。

3.2 预订下单与订单状态字段设计

订单提交是整套系统里最需要防并发和防重复的地方。用户点“立即预订”时，页面要带上LineID，后台要先校验线路是否上架、价格是否变化，再写订单。我一般用ADODB.Command做参数化插入，避免联系人姓名里带单引号把SQL拼坏：

<% ' order_submit.asp —— 提交订单（参数化插入） Dim cmd, orderNo, lineID, num, price, total, contact, phone lineID = Request.Form("lineID") num = Request.Form("num") contact = Request.Form("contactName") phone = Request.Form("phone") ' 基础校验 If Not IsNumeric(lineID) Or Not IsNumeric(num) Then Response.Write "参数不合法" Response.End End If num = CInt(num) If num < 1 Or num > 20 Then Response.Write "预订人数需在1到20之间" Response.End End If ' 取线路当前价格，防止前端篡改 Dim rsLine Set rsLine = conn.Execute("SELECT Price FROM Lines WHERE LineID=" & CInt(lineID) & " AND Status=1") If rsLine.EOF Then Response.Write "线路已下架" Response.End End If price = rsLine("Price") rsLine.Close total = price * num orderNo = "T" & Year(Now) & Month(Now) & Day(Now) & Right("0000" & Int(Rnd()*10000), 4) Set cmd = Server.CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandText = "INSERT INTO Orders (OrderNo,UserID,LineID,ContactName,Phone,Num,TotalPrice,OrderStatus) VALUES (?,?,?,?,?,?,?,0)" cmd.Parameters.Append cmd.CreateParameter("OrderNo", 200, 1, 32, orderNo) cmd.Parameters.Append cmd.CreateParameter("UserID", 3, 1, , Session("UserID")) cmd.Parameters.Append cmd.CreateParameter("LineID", 3, 1, , CInt(lineID)) cmd.Parameters.Append cmd.CreateParameter("ContactName", 202, 1, 50, contact) cmd.Parameters.Append cmd.CreateParameter("Phone", 200, 1, 20, phone) cmd.Parameters.Append cmd.CreateParameter("Num", 3, 1, , num) cmd.Parameters.Append cmd.CreateParameter("TotalPrice", 131, 1, , total) cmd.Execute %>

这段代码的关键不在插入语句本身，而在“价格从数据库重新取”这一步。前端传过来的价格一律不信，否则改一下表单里的隐藏字段就能一块钱买线路。订单状态OrderStatus默认写0（待确认），后台确认后改成1，完成改成2，取消改成3。状态流转不要用删除代替取消，订单记录要留着，否则后台统计和用户查历史订单都会断。

订单号生成用了日期加四位随机数，重复概率很低，但OrderNo列上加了UNIQUE约束，真撞了会报错而不是静默插入两条一样的单号。如果希望更稳，可以在插入前先查一次WHERE OrderNo=?，存在就重新生成，这个循环最多跑三次。订单表的数据量在毕设里不会太大，但习惯要养好，后面工作里订单表动辄百万行，没有唯一约束和状态字段会很麻烦。

前台还有“我的订单”页面，按Session("UserID")过滤：

SELECT OrderNo, ContactName, Num, TotalPrice, OrderStatus, CreateTime FROM Orders WHERE UserID = ? ORDER BY OrderID DESC

状态在前端做一层映射，0显示“待确认”、1显示“已确认”、2显示“已完成”、3显示“已取消”，不要直接把数字甩给用户看。这套映射放在公共函数里，后台订单列表也复用同一个函数，改文案时只改一处。

4. 后台管理模块实现：内容维护、用户管理与权限隔离

后台是答辩时最容易展示的部分，因为操作路径短、效果直观。我一般把后台拆成登录、线路管理、订单管理、用户管理四块，其中登录和权限校验是底座，线路管理是演示重点。后台页面不需要做得花哨，但要有基本的权限隔离，不能让未登录用户直接访问管理页面。

4.1 后台登录与权限校验

后台登录的常见错误是把密码明文存数据库。毕设里至少要做一次哈希，经典ASP没有内置MD5函数，可以自己写一个放在公共文件里，调用时传明文、返回密文。下面这段是登录校验的核心逻辑：

<% ' admin/login.asp —— 后台登录 Dim adminName, adminPwd, rs, cmd adminName = Trim(Request.Form("adminName")) adminPwd = Trim(Request.Form("adminPwd")) If adminName = "" Or adminPwd = "" Then Response.Write "用户名和密码不能为空" Response.End End If Set cmd = Server.CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandText = "SELECT AdminID,AdminName,Role FROM Admin WHERE AdminName=? AND Password=?" cmd.Parameters.Append cmd.CreateParameter("AdminName", 202, 1, 50, adminName) cmd.Parameters.Append cmd.CreateParameter("Password", 202, 1, 50, MD5(adminPwd)) Set rs = cmd.Execute If rs.EOF Then Response.Write "用户名或密码错误" Response.End End If Session("AdminID") = rs("AdminID") Session("AdminName") = rs("AdminName") Session("Role") = rs("Role") Response.Redirect "index.asp" %>

Session("Role")是用来做权限分级的，比如Role=1是超级管理员，可以管用户和线路；Role=2是内容编辑，只能管线路和新闻。每个后台页面顶部都要加一段校验：

<% ' admin/check_login.asp —— 后台页面统一入口校验 If Session("AdminID") = "" Then Response.Redirect "login.asp" Response.End End If If Session("Role") <> 1 And Request.ServerVariables("SCRIPT_NAME") Like "*user_manage*" Then Response.Write "没有权限" Response.End End If %>

这种基于Session的校验不是安全上的最优解，Session劫持、固定会话这些问题依然存在，但毕设层面够用，论文里也可以写“采用Session进行登录状态保持”。比不校验直接裸奔强太多——我见过有的后台页面把admin/路径藏着就当权限，换个浏览器直接输URL就进去了，答辩演示时被老师当场点出来很尴尬。

4.2 线路维护与图片上传的处理

线路管理是后台的核心功能，增删改查四个动作里，“增”和“改”都涉及图片上传。经典ASP上传文件通常用第三方组件，比如无组件上传类或者SA-FileUp。为了不增加部署依赖，我一般用一个纯ASP的无组件上传类，放在/includes目录下，调用方式大概是：

<% ' admin/line_save.asp —— 线路新增/编辑，含图片上传 Dim upload, file, savePath, lineID Set upload = New UpFile_Class ' 无组件上传类 upload.GetData 2 * 1024 * 1024 ' 限制2MB file = upload.File("coverImg") savePath = Server.MapPath("../images/") & "\" If file.FileSize > 0 Then ' 简单校验扩展名 Dim ext ext = LCase(Mid(file.FileName, InStrRev(file.FileName, ".") + 1)) If ext <> "jpg" And ext <> "png" And ext <> "gif" Then Response.Write "只允许jpg/png/gif" Response.End End If file.SaveToFile savePath & "line_" & lineID & "." & ext End If %>

上传这块最容易出两个问题。一个是路径，Server.MapPath("../images/")如果目录不存在，保存时会报错，部署前要确认images目录有写权限；另一个是文件名，直接用用户上传的原始文件名会覆盖同名文件，也容易带路径穿越，统一重命名成line_线路ID.扩展名最省事。文件大小限制也要在GetData里写死，不然有人传个几十兆的图，IIS直接超时。

线路编辑保存的SQL是典型的UPDATE：

UPDATE Lines SET Title = ?, Price = ?, Days = ?, Content = ?, Status = ? WHERE LineID = ?

参数顺序和CreateParameter的顺序要一一对应，这块没有编译期检查，全靠人眼对，写的时候建议把SQL和参数列表并排放，改一个改两个。后台列表页的分页复用前台的TOP NOT IN写法，只是把Status=1去掉，让下架线路也能被管理员看到。

用户管理相对简单，列表、禁用、重置密码三个动作。禁用不是删除，把Users表加一个Status字段，登录时校验Status=1即可。重置密码也不要直接显示原密码，生成一个随机密码或者统一重置成固定值后强制修改，论文里可以写“管理员可重置用户密码”，比“能看到用户密码”专业得多。

5. 部署与调试避坑：五类最容易翻车的问题

代码写完只是第一步，部署到IIS上能跑、换台机器能跑、演示时不报错，才算交付。我带过的项目里，十有八九的“运行不起来”不是逻辑问题，而是环境、权限、编码这些边角料。下面五类问题按出现频率从高到低排，每条都按“现象—原因—解决”写，照着排查能省不少时间。

5.1 环境配置与数据库连接类问题

现象一：打开首页报“ADODB.Connection 错误 ‘800a0e7a’ 未找到提供程序”。原因：IIS的应用池位数和SQL Server客户端驱动不匹配，或者连接字符串里的Provider写错了。经典ASP项目常跑在32位模式下，而服务器装的是64位驱动。 解决：在IIS管理器里找到对应应用池，把“启用32位应用程序”设为True；连接字符串统一用Provider=SQLOLEDB，不要混用SQLNCLI。改完应用池要回收一次。

现象二：本机能连数据库，部署到服务器上提示“用户 ‘sa’ 登录失败”。原因：SQL Server默认只允许Windows身份验证，或者sa账户被禁用；也有可能是连接字符串里没写Initial Catalog，连到了master库。 解决：在SQL Server Management Studio里把实例改为“SQL Server和Windows身份验证模式”，启用sa并设密码；连接串补上Initial Catalog=TravelDB。更稳妥的做法是建一个专用登录名，只给TravelDB的db_owner权限，不要全站用sa。

现象三：页面能打开，但中文全是乱码。原因：ASP页面的CodePage和数据库排序规则不一致。经典ASP默认按系统编码解析，数据库如果用的是Chinese_PRC_CI_AS，页面没声明代码页就会乱。 解决：在每个ASP文件顶部加<%@ Language="VBScript" CodePage="936"%>，HTML的head里加<meta charset="utf-8">或gb2312，两者保持一致。建库时排序规则选Chinese_PRC_CI_AS最省事，别等到数据写进去再改。

5.2 数据写入与页面渲染类问题

现象四：订单提交成功，但“我的订单”里查不到。原因：插入时UserID取了Session("UserID")，但前台登录后没赋值，或者Session过期了，插进去的是0或空值。 解决：在订单提交页开头加一次登录校验，Session("UserID")为空就跳登录页；插入前再判断一次，不要只依赖前端。另外检查Orders表的UserID字段是否允许NULL，如果允许，空值插进去不会报错，问题会藏很久。

现象五：后台删除线路后，前台订单详情页报“至少一个参数没有被指定值”。原因：订单表里存了LineID，线路被物理删除后，关联查询查不到记录，rs("Title")就报错。 解决：线路不要物理删除，改成Status=0下架；详情页和订单页取线路信息时加If rs.EOF Then兜底，显示“线路已下架”而不是让页面崩掉。这个坑很典型，本质是把“删除”当成了“下架”，数据表设计阶段就该定好规则。

提示：每改一次连接字符串或应用池设置，先回收应用池再刷新页面，IIS的缓存会让旧配置多活几分钟，别急着改代码。

5.3 上传与文件权限类问题

现象六：后台上传图片提示“Permission denied”。原因：IIS的匿名用户账户对images目录没有写权限，或者目录根本不存在的。 解决：在文件夹属性—安全里给IUSR或应用程序池账户加“写入”权限，不要图省事给Everyone。上传目录也不要和代码目录混在一起，单独放/upload或/images，方便备份和限权。

6. 答辩演示与验收：把“能跑”讲成“设计合理”

答辩现场最怕的不是系统有bug，而是演示到一半找不到入口。我的习惯是提前把演示路径写成一张顺序表，从登录开始，按“线路浏览—下单—后台确认—前台查状态”走一遍，每条路径标注对应的页面文件和预期结果。下面这张表是我一般会准备的：

| 演示步骤 | 操作 | 预期结果 |

本文还有配套的精品资源，点击获取