企业官网建设流程全解析

简介：一份基于ASP和Access的库存管理系统源码，面向需要掌握Web开发基础或搭建中小型库存应用的学习者与开发者。系统以VBScript编写服务端逻辑，负责接收用户请求、处理添加修改删除库存数据，Access数据库则存储商品名称、数量、入库日期、出库日期等关键字段。核心功能完整覆盖商品管理、库存查询、入库出库操作、库存预警及报表统计，支持按型号、颜色、尺寸分类，实时查看库存数量并生成出入库单，还会在低库存时触发补货提醒。同时带有权限控制与角色管理机制，不同级别用户只能访问相应功能，代码具备二次开发能力，可扩展供应商或订单模块。压缩包大小约4.65MB，包含ASP页面脚本与Access数据文件，整体结构直观。已有485人学习下载，无论是初学者用于理解动态网站与数据库交互，还是有经验者作为项目起点，都能获得清晰参考。

1. 库存管理系统源码(asp+access)到底在解决谁的什么问题

你手里很可能刚拿到一个这样的压缩包：里面一堆.asp页面、一个.mdb数据库文件，标题写着“库存管理系统源码(asp+access)”。这不是什么新潮项目，它代表了 2000 年代前后中小企业和学校课设里最常见的动态网站组合——ASP 负责页面逻辑，Access 负责数据存储。今天还在找它的，要么是被要求维护一套仍在运行的老库存系统，要么是在课程设计里想用最少的成本把“入库、出库、查询库存”这套闭环跑通。它的优点是部署简单、成本几乎为零，缺点是并发能力弱、技术栈老旧。看完这篇文章，你会知道这套源码怎么在本地跑起来、核心代码怎么改、哪些位置一定会踩坑，以及它到底值不值得你继续投入。

2. 先把源码跑起来：IIS、Access 与最小连接串的搭配

拿到源码包的第一步不是看业务代码，而是先把运行环境搭出来。ASP 不是编译型语言，它靠 IIS 在服务器端逐行解释执行；Access 也不是服务型数据库，它就是一个带密码的二进制文件，靠 OLEDB 驱动读写。所以整套东西要跑起来，只需要三个要素：IIS、Access 数据库引擎、一个能连接 mdb 文件的 ADODB 连接串。

2.1 环境准备：IIS 启用 ASP、装 Access 驱动、应用池 32 位

Windows 10 和 Windows 11 默认自带 IIS，但 ASP 功能默认没开。你需要打开“启用或关闭 Windows 功能”，勾选“Internet Information Services”，然后往下展开“万维网服务 -> 应用程序开发功能”，把 ASP 勾上。如果机器上有老系统用的 ISAPI 扩展，也一并勾上，避免某些页面依赖的组件无法加载。

用管理员 PowerShell 执行下面的命令，可以一次装好 IIS 和 ASP：

Enable-WindowsOptionalFeature -Online -FeatureName IIS-WebServerRole Enable-WindowsOptionalFeature -Online -FeatureName IIS-ASP

第一条命令安装 IIS 基础服务，第二条命令加入 ASP 解释器。执行完打开浏览器访问http://localhost/，能看到 IIS 默认页面就说明服务起来了。不过这里说的还只是 ASP 运行的第一步，真正的麻烦往往在数据库连接上。

现在打开 IIS 管理器，找到你站点的应用程序池，在“高级设置”里把“启用 32 位应用程序”设为 True。这一步十个人里有九个人会漏。原因很简单：老库存系统里的 mdb 文件默认使用 Microsoft.Jet.OLEDB.4.0 驱动，这个驱动只有 32 位版本；IIS 默认使用 64 位进程，64 位进程里加载不了 32 位驱动，页面会直接报“未找到提供程序”或者“80004005”错误。如果拿到的是 accdb 结尾的新格式数据库，需要先安装 Access 数据库引擎，再改用 Microsoft.ACE.OLEDB.12.0 驱动。

数据库引擎方面，Microsoft.Jet.OLEDB.4.0在大多数 Windows 系统里还保留着，但别指望它处理 accdb。如果源码包里数据库后缀明确是.mdb，通常不需要另装驱动，只要把 32 位开关打开就能用。如果源码是新一点的 accdb，就去微软官网下载 Access 数据库引擎，安装时注意选择“同架构”，也就是 32 位版本，否则还是连不上。

2.2 最小连接串与一个 hello 级查询页面

连接串是整个库存系统源码的命门。老源码里最常见的做法是把连接串写在一个conn.asp文件里，然后每个页面用<!--#include file="conn.asp"-->引入。这个文件你要第一个看，因为里面的路径、数据库版本、密码直接决定后续所有页面能不能连上数据库。

下面是一个最小可用的 ASP 页面，作用是连接 mdb 并读取商品表前五行：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Option Explicit Dim conn, rs Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data/Inventory.mdb") & ";User ID=Admin;Password=;" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "SELECT TOP 5 ProductCode, ProductName, StockQty FROM Products ORDER BY ProductCode", conn %> <table border="1"> <tr><td>商品编码</td><td>商品名称</td><td>库存数量</td></tr> <% Do While Not rs.EOF %> <tr> <td><%= rs("ProductCode") %></td> <td><%= rs("ProductName") %></td> <td><%= rs("StockQty") %></td> </tr> <% rs.MoveNext Loop %> </table> <% rs.Close Set rs = Nothing conn.Close Set conn = Nothing %>

这段代码的逻辑很直接：先用Server.CreateObject创建 ADODB.Connection 实例，然后通过conn.Open打开数据库连接。Data Source是数据库文件的物理路径，这里用了Server.MapPath("data/Inventory.mdb")，它会根据当前站点的虚拟路径自动算出真实路径，这样整个站点换目录部署时不需要改连接串。接下来创建 Recordset 对象，执行一条带TOP 5的查询，取出商品表中前五条记录，循环输出到表格里。

代码最后的关闭顺序是记准的：先关 Recordset，再关 Connection，最后用Set ... = Nothing释放对象。很多老源码在页面里把连接对象当成全局变量一直留着不关，Access 就会在磁盘上留下.ldb锁文件，后来越攒越多，数据库被锁住，这就是后面要说的坑。

如果你的 mdb 设置了数据库密码，连接串要追加一段Jet OLEDB:Database Password=你的密码。这个密码不是 Access 文件打开时输入的密码，而是通过“工具 -> 安全 -> 设置数据库密码”生成的密码，区分大小写，漏掉任何一个字符都会报“无法启动应用程序”之类的错误。

2.3 拿到源码包后的目录解读顺序

很多新手拿到源码包后第一件事就是把整个文件夹拖进 wwwroot，然后直接访问 index.asp，结果往往是一串报错。我建议先别急着运行，先做一次“文件侦察”。典型库存系统的目录结构大概是这样：

先打开 conn.asp，确认数据库路径指向哪里。有些源码包把数据库放在根目录，有些放在 data 子目录，还有的放了两个 mdb，一个是结构空库，另一个才是真正的数据文件。后面页面能不能跑通，都取决于这个路径是不是真的存在。

再看Global.asa，它会在站点启动时执行一次，有些老源码在里面定义 Application 级连接对象或者 Session 超时时间。这里最容易出问题的是Session.Timeout，如果被设置得很短，用户登录后几分钟就掉线，看起来像权限系统坏了。

最后强调一件很多人忽略的事：不要直接双击 mdb 文件编辑。Access 在 Windows 下打开 mdb 后会生成锁文件，如果 IIS 正在使用这个数据库，你强行修改或另存，会导致正在运行的库存系统写入失败。要改表结构，先复制一份到桌面，在副本上操作。

3. 数据库结构设计：库存账为什么不能只靠一张表

运行环境搭好之后，接下来要做的事情是看懂数据库。库存管理系统源码看起来页面很多，但账目准不准，全在数据库结构里。很多人把商品信息和库存数量放在同一张表里，出入库时直接改商品表的库存字段，这个设计在数据量小的时候看不出来毛病，一旦出现退货、换货、多仓，账很快就对不上了。

3.1 四张表模型：商品、库存、入库单、出库单

一个能长期用的库存系统，核心结构至少要拆成四张表：商品表Products、库存表Inventory、入库单表InStock、出库单表OutStock。商品表只存商品本身的静态信息，库存表存每个商品在每个仓库的库存数量，入库单和出库单则记录每一次数量变动的原始凭证。这样任何一笔库存数量都能追溯回一张单据，而不是凭空出现在商品字段里。

下面是用 Access SQL 创建这四张表的示例：

CREATE TABLE Products ( ProductID AUTOINCREMENT PRIMARY KEY, ProductCode TEXT(50) NOT NULL, ProductName TEXT(100) NOT NULL, Spec TEXT(50), Unit TEXT(10), Category TEXT(50), BuyPrice CURRENCY, SalePrice CURRENCY ); CREATE TABLE Inventory ( ProductID INTEGER NOT NULL, WarehouseID INTEGER NOT NULL, StockQty INTEGER DEFAULT 0, LastUpdate DATETIME, PRIMARY KEY (ProductID, WarehouseID) ); CREATE TABLE InStock ( InID AUTOINCREMENT PRIMARY KEY, DocNo TEXT(30) NOT NULL, ProductID INTEGER NOT NULL, WarehouseID INTEGER NOT NULL, Quantity INTEGER NOT NULL, UnitPrice CURRENCY, Supplier TEXT(100), InDate DATETIME, Operator TEXT(50), Remark TEXT(255) ); CREATE TABLE OutStock ( OutID AUTOINCREMENT PRIMARY KEY, DocNo TEXT(30) NOT NULL, ProductID INTEGER NOT NULL, WarehouseID INTEGER NOT NULL, Quantity INTEGER NOT NULL, Customer TEXT(100), OutDate DATETIME, Operator TEXT(50), Remark TEXT(255) );

Products表里ProductID是自动编号主键，它只在系统内部做关联用，绝不要展示给用户。对外应该使用ProductCode，也就是商品编码字段。Inventory表用ProductID和WarehouseID做联合主键，含义是一个商品在一个仓库只能有一条库存记录。LastUpdate字段记录最后一次变动时间，出现异常时能知道这条库存是什么时候被动的。

为什么不能把StockQty直接放在Products表里？因为一旦存在多个仓库，你在商品表上不知道该放哪个仓库的数量。拆出Inventory后，查询总库存只要对库存表求和即可，增加新仓库也不改表结构。

另外，上表中的Quantity用了长整型，适合按件、按箱管理的库存。回看很多老源码用双精度存数量，结果累计几次后出现 19.999999 这样的尾差，盘点时很痛苦。数量能用整数就不用小数，必须用小数时请仔细看下节。

3.2 数量与金额字段的类型选择：用整型还是双精度

Access 的字段类型选择，直接决定账目算不算得平。这里有三条经验：

第一，库存数量默认用长整型LONG，适合大多数按个数管理的商品。像钢材、布料这类按吨、按米计量的，Access 里要用“小数”类型，Access 2007 及以后版本里这类字段对应DECIMAL(18,3)，并且要在表设计界面里把“字段大小”改成 18、小数位数设 3。不要图省事选双精度，双精度是浮点数，两个小数计算时会产生微小的二进制误差，账目金额累计多了就会出现一分钱不平。

第二，金额字段统一用CURRENCY。Access 的货币类型是定点小数，精确到四位小数，计算时自动四舍五入，不会出现浮点误差。价格、金额、单价全部用货币，不要用双精度。

第三，日期字段必须用DATETIME，不要用文本。用文本存日期的问题在于排序是按照字符串顺序排的，2025-6-10会被排在2025-6-2前面，月份和日期的数字位数不一致时全乱。只有 DATETIME 类型才支持 Access 里日期范围的查询和排序。

3.3 单据编号、自动编号和日期字段的三组坑

Access 的AUTOINCREMENT字段是一条自增的记录号，它只适合做内部主键，不适合当业务单据号。原因很简单：自动编号完全由数据库分配，你没法控制它的格式，也没法在删除记录后让它不跳号。真正的单据号应该是“入库单号 IN20250610-001”这种带业务含义的编号。

常见做法是写一个 ASP 函数生成当日流水号：

Function MakeDocNo(prefix) Dim y, m, d, seq, sql y = Year(Date) m = Month(Date) d = Day(Date) sql = "SELECT COUNT(*) FROM InStock WHERE DocNo LIKE '" & prefix & _ "-" & y & Right("0" & m, 2) & Right("0" & d, 2) & "-%'" seq = conn.Execute(sql)(0) + 1 MakeDocNo = prefix & "-" & y & Right("0" & m, 2) & Right("0" & d, 2) & "-" & Right("000" & seq, 3) End Function

这段函数先拼出当天日期的前缀，比如IN-20250610-，然后查询入库单表里当天已有多少单据，序号加一后补足三位。Right("0" & m, 2)的作用是把月份补成两位数，1 月会变成 01，避免做字符串比较时错序。

这个函数有两个限制要提前知道：一是并发时可能生成相同单据号，两个用户同时访问时查到的 COUNT 一样，编号就重复。老系统保底的做法是给DocNo字段建唯一索引，一旦重复再次写入数据库就报错；二是如果你的系统已经把自动编号暴露给了 Excel 报表，后期导出时单据和自动编号的对应关系会错位，所以设计源头就要坚持“自动编号只做内部键、业务编号单独生成”的原则。

4. 核心模块的 ASP 实现：登录、入库、出库与分页

看懂数据库以后，下面这些代码就是库存系统里一定会出现的基础模块。不管源码包的页面有多少，剥开以后落到代码层面无非就是登录、写单据、改库存、查列表这四件事。

4.1 登录与 Session：用参数化查询防 Access 注入

很多老的 ASP 源码登录逻辑都是拼接字符串，比如WHERE LoginName='" + Request.Form("LoginName") + "'"，这是典型的黑匣子式写法，看着能用，但遇到 Access 注入就翻车。曾经有人靠在用户名框里输入' Or '1'='1直接绕过登录，整个后台就暴露了。

常见的对抗写法是参数化查询：

<% Response.CodePage = 65001 Response.Charset = "utf-8" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then Dim uname, upass, cmd, p1, p2, rs uname = Trim(Request.Form("LoginName")) upass = md5(Trim(Request.Form("LoginPass"))) Set cmd = Server.CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandText = "SELECT UserID, RoleID, RealName FROM Users WHERE LoginName=? AND UserPass=?" cmd.Parameters.Append cmd.CreateParameter("p1", 200, 1, 50, uname) cmd.Parameters.Append cmd.CreateParameter("p2", 200, 1, 32, upass) Set rs = cmd.Execute If rs.EOF Then Response.Write "<script>alert('用户名或密码不对');history.back()</script>" Else Session("UserID") = rs("UserID") Session("RoleID") = rs("RoleID") Session("RealName") = rs("RealName") Response.Redirect "index.asp" End If End If %>

这段代码先判断请求方法是 POST，避免直接通过 URL 参数触发登录。然后用 ADODB.Command 的?占位符替代直接拼接，CreateParameter的 200 代表adVarChar文本参数，50 和 32 分别是两个字段的最大长度。传入密码前先做md5处理，数据库里存的也是哈希后的密文，防止明文泄露。

登录之后每个受限页面都要在代码开头加一段权限判断：

If Session("UserID") = "" Then Response.Redirect "login.asp" End If If Session("RoleID") <> 1 Then Response.Write "无权访问后台" Response.End End If

Session("UserID")为空代表没有登录，直接跳回登录页；RoleID是角色编号，通常 1 为管理员，其他角色只能看不能改。这段判断不要只写在页面顶部，最好做成一个公共包含文件，例如inc/check.asp，每个需要权限的页面都引入它，避免漏掉。

4.2 入库单：事务里同时写单据和加库存

入库不是一个写操作，而是两个写操作：先插入一张入库单，再把库存数量加上。如果只做了第一个操作而第二个失败，商品实际入库了，但账上库存没变。为了解决这种“部分成功”，ASP 里用的是BeginTrans和CommitTrans事务。

下面是入库操作的简化版代码：

<% On Error Resume Next conn.BeginTrans ' 1. 写入库单 conn.Execute "INSERT INTO InStock(DocNo, ProductID, WarehouseID, Quantity, UnitPrice, Supplier, InDate, Operator) VALUES('" & docNo & "'," & pid & "," & wid & "," & qty & "," & price & ",'" & sup & "',Now(),'" & Session("RealName") & "')" ' 2. 更新库存，如果库存表没有该商品该仓库的记录，则插入 conn.Execute "UPDATE Inventory SET StockQty = StockQty + " & qty & ", LastUpdate=Now() WHERE ProductID=" & pid & " AND WarehouseID=" & wid Dim affected affected = conn.Execute("SELECT COUNT(*) FROM Inventory WHERE ProductID=" & pid & " AND WarehouseID=" & wid)(0) If CLng(affected) = 0 Then conn.Execute "INSERT INTO Inventory(ProductID, WarehouseID, StockQty, LastUpdate) VALUES(" & pid & "," & wid & "," & qty & ",Now())" End If If Err.Number = 0 Then conn.CommitTrans Response.Write "入库成功" Else conn.RollbackTrans Response.Write "入库失败：" & Err.Description End If %>

代码逻辑分三层：先开启事务，然后依次执行插入入库单和更新库存，最后根据Err.Number判断整体成功还是失败。BeginTrans之后的所有数据库操作要么全部提交，要么全部回滚。Err.Number每个命令执行后会被当前命令的结果覆盖，所以要在所有写操作结束后统一判断，不能在中间插入其他语句。

注意conn.Execute执行 UPDATE 后无法直接知道有没有更新到行，这里用了SELECT COUNT(*)去查库存表是否存在记录。如果存在，上面的 UPDATE 已经加了数量；如果不存在，需要 INSERT 一条新库存记录。两条操作都在同一个事务里，不会出现只插了单据但没建库存的情况。

Now()是 ASP 的当前日期时间函数，这里写进InDate字段。如果你的系统需要区分不同时区，这个函数取的是服务器本地时间，不要指望它精确记录客户端用户的时间。

4.3 出库单：先查库存再扣减，并留意同时更新

出库比入库多一个条件：库存必须足够。最简单直观的做法是先查询当前库存，判断是否足够，再执行扣减。但这段代码有一个并发隐患需要注意。

<% Dim rsOut Set rsOut = Server.CreateObject("ADODB.Recordset") rsOut.Open "SELECT StockQty FROM Inventory WHERE ProductID=" & pid & " AND WarehouseID=" & wid, conn, 2, 2 If rsOut.EOF Then Response.Write "该商品没有库存记录" Else If CLng(rsOut("StockQty")) >= CLng(qty) Then rsOut("StockQty") = rsOut("StockQty") - qty rsOut.Update conn.Execute "INSERT INTO OutStock(DocNo, ProductID, WarehouseID, Quantity, Customer, OutDate, Operator) VALUES('" & docNo & "'," & pid & "," & wid & "," & qty & ",'" & cust & "',Now(),'" & Session("RealName") & "')" Response.Write "出库成功" Else Response.Write "库存不足，当前库存" & rsOut("StockQty") End If End If rsOut.Close Set rsOut = Nothing %>

rsOut.Open后面的第三、第四个参数分别是游标类型和锁定类型。这里的2, 2表示动态游标加悲观锁。悲观锁的意思是当记录集打开时，这条库存记录就被数据库锁定，直到执行Update或关闭记录集，其他连接在这一段时间内不能修改这条库存。这保证了“先判断库存再扣减”这个动作在事务期间不会被其他请求打断。

实际部署中，Access 的悲观锁在并发稍高时会直接报错，因为一个用户锁着记录，另一个用户修改同一记录时可能遭遇“因为另一个用户正在使用，导致锁冲突”。所以老系统里另一个保底方案是直接用一条 UPDATE 语句完成判断和扣减：

conn.Execute "UPDATE Inventory SET StockQty = StockQty - " & qty & ", LastUpdate=Now() WHERE ProductID=" & pid & " AND WarehouseID=" & wid & " AND StockQty >= " & qty

这条 UPDATE 在StockQty >= qty不成立时不会更新任何记录。你可以随后通过检查受影响的记录数来判断是否扣减成功，如果是零就说明库存不足。这个方式并发时不容易超卖，代价是少了事务内的单据写入，所以单号和扣库存还是要放进同一事务里。

补上affected的写法：conn.Execute(sql, recordsAffected)，在 ASP 里第二个参数传入一个变量，执行后可以从这个变量里拿到影响行数。注意 Access OLEDB 驱动不一定在所有环境下都返回准确数字，所以很多老代码宁可重新SELECT COUNT(*)检查状态，也不依赖这个返回值。

4.4 库存明细分页：Recordset 的 PageSize 与 AbsolutePage

库存列表经常会达到几千行，一次全部输出会让页面卡住，所以 ASP 的老式分页技巧是所有源码里必有的。Recordset 自带分页属性：PageSize设置每页记录数，AbsolutePage跳转到指定页。

<% Dim rsPage, page, pageSize, i Set rsPage = Server.CreateObject("ADODB.Recordset") rsPage.Open "SELECT p.ProductCode, p.ProductName, i.WarehouseID, i.StockQty FROM Inventory i INNER JOIN Products p ON i.ProductID=p.ProductID ORDER BY p.ProductCode", conn pageSize = 20 If IsNumeric(Request.QueryString("Page")) Then page = CInt(Request.QueryString("Page")) Else page = 1 End If rsPage.PageSize = pageSize If page > rsPage.PageCount Then page = rsPage.PageCount If page < 1 Then page = 1 rsPage.AbsolutePage = page For i = 1 To rsPage.PageSize If rsPage.EOF Then Exit For Response.Write rsPage("ProductCode") & " " & rsPage("ProductName") & " 库存: " & rsPage("StockQty") & "<br/>" rsPage.MoveNext Next Response.Write "共 " & rsPage.PageCount & " 页，第 " & page & " 页" rsPage.Close Set rsPage = Nothing %>

这段分页代码有几个参数要理解：PageCount是总页数，RecordCount是总记录数，AbsolutePage跳转的页码从 1 开始。先判断 URL 里的Page参数是否数字，防止有人直接输入非数字内容让脚本报错；再限制页码不超过最大页数，访问超出范围的页码时会自动落到最后一页。

分页查询的大前提是 SQL 里有明确的ORDER BY。如果没有 ORDER BY，Access 一下返回无序记录，AbsolutePage跳页后会出现重复或缺失。另外，这种游标分页在数据量超过几万行后效率明显下降，因为它要先把所有结果加载到客户端再截取一页。库存系统 SKU 数量通常几千个，这个写法完全可以接受，不用过早优化。

4.5 盘点、报损、调拨的通用套路

入库和出库写完，盘点、报损、调拨其实都基于同一个套路：一张单据加一次库存变动。盘点单的实际操作是拿盘点系统的实盘数和账面库存比较，差额大于某个值时生成一张盘盈或盘亏单；报损单就是一次特殊出库，客户字段换成原因说明。调拨则是同一时间在 A 仓库扣减、在 B 仓库增加，两次库存变动必须放在同一个事务里。

老源码经常为每种单据复制一套页面，页面多但逻辑重复。遇到这种情况，建议把“入账”、“出账”、“更新库存”这三个动作封装成公共子过程，后面新增单据类型时只需要传入单据类型编号，不用再复制几十行代码。这不只是代码洁癖，如果同一套系统里有几套单据逻辑互相不统一，采购、销售、调拨各写一套判断，改一个库存规则时只改一半，账目就会慢慢对不上。

5. 常见问题与避坑盘点：Access 系统老出问题的五个位置

ASP 加 Access 的组合在老系统里跑了快二十年，出的问题大同小异。下面的五个场景不是偶然故障，而是换一台机器、换一个部署方式就会出现的典型坑，每条按现象、原因、解决顺序写。

5.1 IIS 返回 500/500.19：先查 32 位应用池和数据库磁盘权限

现象：页面打开直接白屏，IIS 日志里看到 HTTP 500 或 500.19，有的页面提示 500 内部服务器错误，怎么刷新都一样。

原因：最常见的是应用池没有启用 32 位，导致无法加载 32 位 Access 驱动。另外站点目录的 NTFS 权限不足，IIS 进程用户 IUSR 读不到页面文件，也会报 500。

解决：先在 IIS 管理器的应用程序池高级设置里把“启用 32 位应用程序”改成 True，然后重启站点。如果还报 500，在站点物理目录上右键属性，给 IUSR 用户添加读取权限；数据库文件所在目录除了读取还要给写入权限，否则页面打开正常，一旦保存入库单就会报“对象或数据库只读”。

一个能减少返工的命令是：

icacls C:\inetpub\wwwroot\store /grant IUSR:(OI)(CI)RX /grant IIS_USERS:(OI)(CI)RX /T

icacls是 Windows 自带的权限命令，(OI)表示继承到文件和子目录，RX表示读取和执行权限。数据库目录最后单独再给一次写入，因为库存系统运行时会动态生成锁文件。

5.2 数据库被锁定，写入报错：并发是 Access 的最大软肋

现象：上午用着正常，入库单保存到一半页面报错，提示“Could not use file; file already in use”或者“数据库已被锁定”。

原因：Access 数据库写入时会创建.ldb（mdb 格式）或.laccdb（accdb 格式）锁文件，Jet 引擎同时只允许少数连接写数据。多个用户同时操作出入库，或者某个页面打开的连接没有关闭，锁文件一直存在，其他连接就无法写入。

解决：第一，所有页面用后即关，这个前两节已经反复强调。第二，把数据库文件放在单独的目录，不要和页面文件混在一起，方便排查是不是被别的程序占用。第三，事务时间要短，入库、出库的两个写操作尽快提交，不要在事务里做耗时的页面渲染。第四，这条是真正的血泪经验：Access 从设计上就不适合公网或高并发的库存系统，如果使用者超过十个人同时录入，就要换掉数据库了，这不是调参数能解决的。

5.3 中文乱码：页面编码、站点编码和库表编码要一致

现象：页面其他文字正常，但从数据库读出来的中文名显示成一串问号或乱码；或者反过来，页面是乱码，数据库里正常。

原因：老 ASP 源码普遍使用 GB2312 编码，页面顶部写的是CODEPAGE=936。而现在 IIS 默认按 UTF-8 解析页面，浏览器也优先按 UTF-8 解码，两边编码不一致，中文就花了。

解决：在页面最顶部加上：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

如果页面里还有Response.Charset，也要统一：

Response.CodePage = 65001 Response.Charset = "utf-8"

注意CodePage和Charset是一对，只在页面里设置一个，另一个还保持旧值，照样乱。数据库 mdb 里的文本字段本身不存编码信息，所以关键在于页面输出时用哪种编码解释这些字节，页面编码和站点配置一致就能正常显示。

5.4 单据号重复和主键冲突：自动编号导致账目错乱

现象：把旧库里的数据导入新电脑后，生成的入库单号和出库单号重叠，或者商品库存记录关联到了错误的商品上。

原因：很多老系统把 Access 的自动编号直接当作单据号展示，数据库迁移时，自动编号重新从 1 开始，新的入库单号自然和旧单据冲突。

解决：内部主键继续用自动编号，但所有的业务单据、报表、Excel 导出里只显示业务编号，比如入库单号IN-20250610-001、出库单号OUT-20250610-001。迁移时如果已经做错了，就只能先导出旧单据的完整信息，清空数据库后再按业务编号重新导入，过程比较痛苦。这个教训我记了很久，任何一个库存系统，自动编号暴露到业务层就是后勤灾难。

5.5 Server.MapPath 与路径分隔符：换机器跑不起来的常见原因

现象：源码在原来那台 Windows 2003 上跑得好好的，拷到 Windows 10 上，页面要么找不到包含文件，要么提示路径不对。

原因：老的 ASP 源码喜欢写死绝对路径，比如C:\Inetpub\wwwroot\data\Inventory.mdb，换了目录直接废掉。另一个原因是源码里用了../上级目录的相对路径，而 IIS 的 ASP 功能默认关闭父路径，上级目录访问被拒绝。

解决：连接串统一用Server.MapPath取物理路径，目录变更时不用改代码。使用父路径的话，在 IIS 里站点“ASP - 启用父路径”设为 True：

%windir%\system32\inetsrv\appcmd set config "Default Web Site" /section:system.webServer/asp /enableParentPaths:true

路径分隔符统一用正斜杠/，因为 ASP 里反斜杠有时会被当成转义符处理。新旧机器之间最稳妥的迁移方式是：先在新机器上跑通一个只连接数据库的测试页，再逐步打开业务页面，不要一上来就整个站点部署，否则后面每个页面报错都很难判断是路径问题还是代码兼容问题。

6. 进阶：用循环盘点验证库存账，再决定是否迁移新架构

跑通代码、理清结构之后，最有意义的动作是验证这套库存系统里的账到底是真是假。库存系统的价值不在于页面多漂亮，而在于账面库存和仓库里实际货物的数量对得上。这里有一个不需要停机、适合中小体量的验证方法：循环盘点。

所谓循环盘点，就是每天挑一小批商品做全数盘点，而不是等年底一次性全线停工点货。每天盘 10 到 20 个 SKU，库存表里的账面数去对比实际数，差异马上暴露。

要支持这个流程，需要一张盘点明细记录表：

CREATE TABLE StockCheckDetails ( CheckID INTEGER NOT NULL, ProductID INTEGER NOT NULL, WarehouseID INTEGER NOT NULL, CheckQty INTEGER NOT NULL, CheckDate DATETIME NOT NULL, Checker TEXT(50) );

有了这张表，对账查询就能算出差异：

SELECT i.ProductID, i.StockQty AS 账面数, t.CheckQty AS 实盘数, i.StockQty - t.CheckQty AS 差异 FROM Inventory i LEFT JOIN ( SELECT ProductID, Sum(CheckQty) AS CheckQty FROM StockCheckDetails WHERE CheckDate = #2025-06-10# GROUP BY ProductID ) t ON i.ProductID = t.ProductID WHERE Abs(i.StockQty - Nz(t.CheckQty, 0)) > 0;

Access 里的日期参数要用#包裹，SQL 语句里直接写#2025-06-10#就是筛选当天的盘点记录。Nz(t.CheckQty, 0)是 Access 的空值处理函数，当天没有盘点记录的商品会被当成 0，简单而实用。

验证账实一致之后，如果你意识到这套 ASP 加 Access 的源码已经撑不住业务增长，迁移是迟早的事。迁移不需要全盘推翻，常见做法是保留现有的业务逻辑和表结构，先把 Access 里的数据抽取出来，放入 SQLite 或 MySQL，再把 ASP 页面的命令逐层替换成新数据库的驱动连接。技术上，C# 连接 Access 的 OLEDB 连接串和 ASP 里几乎一样，Python 也可以用 pyodbc 读取 mdb，但这些只是换壳，Access 并发的根本问题还在。

真正该迁移的点是数据模型和并发能力：从“库存字段直接改”变成“库存日志 + 单据流水”，从“磁盘 mdb 文件”变成“独立数据库服务”。现在网上能搜到不少 php 源码、python 源码的库存管理系统，但照搬前端的意义不大，账目模型才是库存系统的灵魂。一个库存系统值不值得投入，就看它每一笔数量变动能不能追回原始单据，能不能在盘点差异出现时找到责任人。在这个问题上，ASP 和 Access 的组合有它自己的边界，也有它二十年来累积下来的成熟做法。

我维护过一套 2006 年建成的 Access 库存系统，当时因为偷懒，把自动编号当业务编码用，后来在对账时怎么也对不上，连续翻了几个通宵的数据库备份才找到源头。这件事之后，我在任何库存项目里都养成一个习惯：先保证每一笔库存变动都有单据号，再做界面和报表。希望帮到你。

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