简介库存管理系统AspAccess源码由工控老马出品是一套可直接运行并支持二次开发的完整程序面向需要学习经典AspAccess架构或快速落地库存管理场景的开发者尤其适合新手及有一定经验的编程人员上手门槛适中。源码覆盖商品信息维护、入库出库登记、库存查询与统计等常见业务逻辑关键代码均配有注释能够帮助读者理解前端页面与Access数据库之间的交互方式并便于按需调整字段与流程。资源包为zip压缩格式大小约4.85MB主要包含Asp页面源码、Access数据库文件及注释说明文件结构直观易于检索学习。目前已有168人浏览学习。以该项目为蓝本开发者可将其应用于课程设计、毕业设计甚至小型商业系统的原型改造具有较高的实用价值与参考意义。1. 库存管理系统 aspaccess 源码别再用 Excel 管库存了这份老项目依然能打做小工厂和贸易公司的信息化最怕的不是没预算而是上一套 ERP 把自己绑死。这几年我在工控现场见过太多例子——仓库账目还在靠 Excel 多人传阅一个零件编号改三次月底盘库对不上账老板问起来谁都说不清。这套库存管理系统 aspaccess 源码就是给这种场景兜底的老伙计。它用经典 ASP 写业务逻辑Access 做数据库代码完整带注释能二次开发新手拿来练手、熟手拿去改造成内部小工具都合适。我拆过不少号称“企业级”的管理系统很多都是套壳后台真正能落地的没几个这套源码至少把入库、出库、库存查询和报表这几条主链路串得明明白白。接下来我会从环境搭建开始一路讲到代码改造和防坑你照着做就能把它跑起来。2. 运行环境与部署准备IIS 配置、Access 驱动和第一个 Hello World2.1 经典 ASP 与 Access 组合为什么还没过时很多人一听 ASP 就觉得是上古技术但在 Windows 服务器和局域网内部系统里ASPAccess 的组合依然有它的位置。它不需要额外安装运行时IIS 自带 ASP 支持Access 数据库是单文件复制粘贴就能备份迁移对小数据量十万行以内的业务性能完全够用。这套库存管理系统走的就是这条路——不需要昂贵的数据库授权不需要复杂的部署脚本拿到代码改一下连接字符串就能跑。在开始配置之前你要先确认自己的 Windows 版本。Win7 和 Win10/11 的 IIS 管理方式略有不同但核心步骤差不多。我一般会在部署前先检查三个东西IIS 是否安装、ASP 功能是否启用、Access 数据库引擎是否可用。这三个缺一个后面都会报出让人摸不着头脑的错误。2.2 Win11/Win10 启用 IIS 与 ASP 功能的完整步骤在 Win11 上配置 IIS 和 ASP 是第一个大坑很多人装完 IIS 发现 ASP 文件直接下载而不是执行这就是没勾选 ASP 功能的典型症状。操作路径是控制面板 → 程序 → 启用或关闭 Windows 功能然后依次勾选Internet Information Services └── 万维网服务 ├── 应用程序开发功能 │ ├── ASP必须勾选 │ └── ISAPI 扩展 └── 常见 HTTP 功能 └── 静态内容勾选完成后打开浏览器访问 http://localhost如果能看到 IIS 默认欢迎页说明 Web 服务器起来了。接着在 IIS 管理器中选中「处理程序映射」确认 ASP 的脚本处理器状态是「已启用」。这一步做完你的机器才有能力解析 .asp 后缀的文件否则代码写得再好也白搭。2.3 64 位系统下 Access 驱动的选择与配置Win11 默认是 64 位系统而经典 ASP 在 64 位 IIS 上跑 32 位 Access 驱动会遇到“Microsoft.Jet.OLEDB.4.0 未注册”的错误。这个问题的根源是系统里没有 32 位的 OLEDB 驱动或者 IIS 应用程序池没有开启 32 位兼容模式。解决办法是打开 IIS 管理器找到对应的应用程序池右键进入「高级设置」把「启用 32 位应用程序」设为 True。如果你用的是 Access 2010 以上的版本建议直接在系统里安装 Microsoft Access Database Engine 2010 Redistributable这样连接字符串可以改用 ACE.OLEDB.12.0 驱动稳定性更好。连接字符串是这套系统的命脉库存管理里所有的数据库操作都靠它。默认源码里写的是相对路径我建议改造成绝对路径避免因为目录层级变化导致找不到数据库% Dim conn, dbPath dbPath Server.MapPath(data/stock.mdb) Set conn Server.CreateObject(ADODB.Connection) conn.Open ProviderMicrosoft.Jet.OLEDB.4.0;Data Source dbPath %这段代码先用 Server.MapPath 把虚拟路径转成物理路径再用 ADODB.Connection 打开 Access 数据库。注意 Provider 是 Jet.OLEDB.4.0对应 32 位驱动。如果你是按我上面说的装了 ACE 驱动可以把 Provider 换成 Microsoft.ACE.OLEDB.12.0二者选其一即可。参数上不需要设置用户名密码Access 默认是空密码这在实际内网环境里够用但如果你要放到公网得先解决安全问题。2.4 权限配置给 IIS 用户开数据库目录的写权限Access 和 SQL Server 最大的不同在于它是以文件方式存储的IIS 进程要能读能写这个 .mdb 文件才能执行 INSERT、UPDATE 操作。很多新手部署完页面能打开但一点「入库」就报错“Microsoft JET Database Engine 错误 80004005”十有八九是写权限没开。在资源管理器里找到数据库文件所在的文件夹右键属性 → 安全 → 编辑添加 IIS 进程用户Win11 上通常是 IIS_IUSRS 组并勾选「修改」和「写入」权限。如果你用的是应用程序池自定义身份AppPoolIdentity就添加“IIS AppPool\默认应用程序池名”这个账户。这一步做完才算是把运行环境真正打通了。部署完成后我建议先写一个探针页面用 Response.Write(conn.State) 输出连接状态等于先做一个连通性测试再接业务。这套库存源码本身带了基础页面但探针页仍然值得你保留后续改代码排查问题的时候它会帮你精准定位是数据库问题还是代码问题。3. 库存模块与代码结构拆解看懂入出库逻辑就能自己改3.1 源码目录与文件功能对照拿到源码包先别急着打开页面乱点我习惯先把目录结构过一遍。一般的 ASPAccess 库存系统文件组织大致是登录页、管理员页、入库页、出库页、库存查询页和数据库文件外加公共的 conn.asp 或 config.asp 存放连接字符串。这套源码的注释做得还算完整每个页面的头部都有功能说明适合对照学习。我拆过的 ASP 项目里最常见的分法是两层页面层和公共层。页面层负责接收表单参数和输出 HTML公共层放数据库连接、函数封装和权限校验。你在改代码的时候优先看公共层因为页面里的业务逻辑大都是在调用公共层的函数。比如库存查询十有八九会调一个 GetStockList 之类的函数你只要改函数的 SQL 语句就能控制前端展示的数据范围。3.2 登录模块与验证码实现细节登录是入口也是安全的第一道闸门。这套源码的登录逻辑用的是 Session 存用户状态密码校验在服务端完成。关键的代码逻辑通常是这样的% Dim username, password username Trim(Request.Form(username)) password Trim(Request.Form(password)) If username Or password Then Response.Redirect login.asp?err1 End If Set rs conn.Execute(SELECT * FROM admin WHERE username username ) If rs.EOF Then Response.Redirect login.asp?err2 Else If rs(password) password Then Session(admin) username Response.Redirect index.asp Else Response.Redirect login.asp?err3 End If End If %这段代码的问题很明显——SQL 字符串拼接、明文密码比对。新手学习这套源码第一个要学的就是这里为什么不能直接拼接用户输入因为 OR 11这类注入字符串会直接把查询条件变成恒真。后面我会专门讲怎么改成参数化查询。密码比对这里源码只做了等值判断实际生产环境至少应该做 MD5 或 SHA1 哈希后再比对。ASP 里可以用MD5(password)函数但源码包不一定自带这个函数封装你需要从公共函数库引入。验证码部分如果你在登录页看到一个数字图片验证码那通常是调用了某个 Captcha 组件或 ASP 代码生成的。没有验证码的版本在内网问题不大但放在公网会被暴力破解。我的建议是新手先别折腾验证码但如果要上公网至少加个连续失败锁定的逻辑用 Application 变量记录 IP 的失败次数超过五次就锁十五分钟。3.3 入库单与出库单的数据流从表单提交到库存表更新入出库是整个系统的核心业务。入库的典型流程是填写商品编号、数量、单价、供应商 → 提交到入库处理页 → 插入入库流水表 → 更新库存表的现有数量。出库是反过来库存减少。这个双表结构流水表和汇总表是很多库存系统的标准设计好处是每一笔操作都有据可查坏处是如果更新库存表的语句写错了会出现“流水有记录但库存对不上”的情况。% Dim productId, quantity, price productId Request.Form(productId) quantity CInt(Request.Form(quantity)) price CDbl(Request.Form(price)) 插入入库流水 conn.Execute INSERT INTO stock_in (product_id, quantity, price, in_date) VALUES ( productId , quantity , price , NOW()) 更新库存表 conn.Execute UPDATE products SET stock_qty stock_qty quantity WHERE id productId %这段代码的关键参数有三个productId 是商品主键quantity 是本次入库数量price 是入库单价。注意 UPDATE 语句用的是stock_qty stock_qty quantity这种写法能保证即使同一商品被多次并发入库也不会丢增量。但如果两个管理员同时操作Access 的并发处理能力会有限制这是后面要讲的坑。另外如果入库数量填的是负数上面这段代码就能把库存“改成负数”所以表单校验必不可少。出库逻辑跟入库对称只是 UPDATE 语句从加号变成减号。但这里要额外考虑一个问题库存不够怎么办合格的出库页面应该在提交前做一次库存充足性检查SELECT 出当前库存量再和出库数量比较。这套源码里如果是简化版可能没做这层检查你拿到手后第一件事就是补上。3.4 库存查询与分页SQL 语句与前端数据绑定库存查询页面通常要支持按商品名模糊搜索和按分类筛选。ASP 里最笨但最有效的做法是拼接 SQL WHERE 子句然后把结果集绑到表格上循环输出。分页是新手最容易写错的环节因为 Access 没有 SQL Server 里的 ROW_NUMBER只能靠 ADODB.Recordset 的 AbsolutePage 属性来做分页% Dim rs, page, pageSize pageSize 20 page CInt(Request(page)) If page 1 Then page 1 Set rs Server.CreateObject(ADODB.Recordset) rs.CursorLocation 3 adUseClient rs.Open SELECT * FROM products ORDER BY id, conn, 1, 3 rs.PageSize pageSize rs.AbsolutePage page Response.Write 共 rs.PageCount 页当前第 page 页 Do While Not rs.EOF And i pageSize Response.Write rs(product_name) - 库存 rs(stock_qty) br i i 1 rs.MoveNext Loop %这段代码里rs.CursorLocation3 是启用客户端游标rs.PageSize 定义每页记录数rs.AbsolutePage 指定跳转到第几页。Do While 循环里必须要做i pageSize限制否则最后一页会多输出记录。这套源码如果自带分页函数建议你把 pageSize 改成可配置的比如放在 conn.asp 里统一管理以后要调每页行数只改一处就行。分页还有个细节是排序字段要唯一如果你用 ORDER BY stock_qty同数量下记录顺序不稳定翻页时可能跳记录改成 ORDER BY id 或加一个唯一字段作次级排序就能根治。3.5 报表统计模块用 SQL 聚合函数做月度出入库汇总库存系统除了记录流水还要能回答“这个月进了多少货、出了多少货、还压了多少资金”这样问题。报表模块用的是 Access 的聚合函数典型语句是 Group By 加 Sum% Set rs conn.Execute(SELECT product_id, SUM(quantity) AS total_in FROM stock_in WHERE in_date BETWEEN #2024-01-01# AND #2024-01-31# GROUP BY product_id) Do While Not rs.EOF Response.Write 商品ID: rs(product_id) 入库总量: rs(total_in) br rs.MoveNext Loop %Access 的日期参数要用 # 号括起来这是它和 SQL Server 的一个重要差异。如果你在 Access 里写了in_date BETWEEN 2024-01-01 AND 2024-01-31大概率会查出空结果甚至报数据类型不匹配。另外这里我直接填了日期值实际开发中应该用参数对象传入避免拼接。报表页面的输出建议不要直接 Response.Write 拼 HTML你可以在 ASP 代码里先循环拼出一个二维数组再统一在前端渲染。这样代码可读性好很多后面接 ECharts 或 Highcharts 之类的图表库也方便。这套源码的报表如果是简单的表格输出你可以自行扩展成柱状图或折线图用 JavaScript 解析 JSON 数据即可。4. 权限控制与 Session 处理管理员和普通用户怎么区分4.1 Session 会话管理和登录态校验的正确姿势登录之后系统必须保证每个受保护页面都不能被未登录用户直接访问。经典的 ASP 做法是在每个页面的顶部 include 一个 check.asp 文件里面写% If Session(admin) Then Response.Redirect login.asp?msgtimeout Response.End End If %每个受保护页面第一行写!--#include filecheck.asp--就能完成登录校验。这套源码如果每个页面都有这个 include说明作者的基础功是到位的。如果某些页面漏了你可以自己加这是二次开发的第一步。Session 的超时时间默认是 20 分钟很多库存管理场景觉得太短干活干到一半被踢出去重新登录很烦。在 IIS 里可以调长但更常见是在 conn.asp 或 global.asa 里设置 Session.Timeout 60单位是分钟。如果你的库房里录入一张入库单要折腾十分钟建议直接设成 60 或 120。4.2 多用户角色管理员与操作员的权限区分方法这套源码如果只有一个 admin 表那大概率是单管理员模式。如果要加操作员角色最简单的做法是在 admin 表加一个 role 字段存“admin”或“operator”然后 check.asp 里根据页面需要的角色做二次判断。比如入库出库页面要求登录即可而删除流水、修改商品信息的页面要求 roleadmin% If Session(role) admin Then Response.Redirect error.asp?code403 Response.End End If %这种静态角色的好处是简单直观坏处是不灵活——如果同一个操作员既要能入库又要能看报表但不能删数据你就得设计更细的权限矩阵。对这套源码的定位来说两到三个角色已经够用不建议一上来就搞 RBAC。从实践来看小企业里最常用的角色就三个老板看报表、仓管录入单、管理员管基础数据别过度设计。4.3 防止 Session 失效导致操作中断AJAX 请求的会话保持技巧不少 ASP 库存系统接了 AJAX 之后会出现“明明登录着但 AJAX 请求返回登录页”的怪现象。原因在于 AJAX 请求默认不带 Cookie或者 jQuery 封装的时候把 Session 弄丢了。解决方法是让 AJAX 请求把当前页面的 Cookie 带全或者在 AJAX 请求前先做一次 keepalive 轮询。我一般会在库存列表页加一个 10 分钟一次的隐秘心跳请求访问 keepalive.asp里面就一行 Response.Write(ok)。这样 Session 的过期时间被不断刷新管理员在做长报表的间隙回来也不会被踢。这个技巧在 ASP 时代很流行放在现在依然管用特别是 IE 内核浏览器打开老系统的时候。4.4 登录日志与操作留痕加一张日志表记录关键动作如果想回溯“这个入库单是谁录的”就需要在入出库提交时顺带写一条日志。最简单的是加一张 op_log 表字段包括 admin_name、action、target_id、op_time。在入出库代码里加一行% conn.Execute INSERT INTO op_log (admin_name, action, target_id, op_time) VALUES ( Session(admin) , stock_in, productId , NOW()) %这种操作留痕对工厂管理很重要尤其是月底盘库出现差异时部门之间扯皮的时候日志表就是裁决依据。你拿到这套源码后建议优先加这张表改动量不大但价值很高。注意日志表本身也会膨胀你可以按月做一次归档把两个月前的数据导出后删除。5. 避坑指南部署与二次开发中的常见问题排查5.1 翻车现场一Access 数据库被锁定数据库正被另一个用户使用现象执行入库操作时页面卡死或报“Microsoft JET Database Engine 错误 80004005无法启动应用程序。工作进程无法初始化同时查看其它用户是否错误地启动了该应用程序。”原因Access 对并发写入支持很差当有另一个连接持有写锁时当前操作就会等待甚至直接报错。最常见的是有人的页面执行了长时间事务没提交或者上一页面的 Connection 对象没有 Close。解决代码里所有 conn 用完必须 Close 并 Set Nothing把 Connection 的 Mode 属性设为 adModeReadWrite但操作完后立刻释放。如果公司规模大于十个人同时录入建议迁移到 SQL Server Express或者至少把 Access 拆分成主库和日志库减少锁冲突。5.2 翻车现场二记录集打开出错提示找不到对象现象运行库存查询页时报错“ADODB.Recordset 错误 800a0e7d无法找到该网页”但登录页正常。原因SQL 语句引用了一个不存在的表名或字段名可能是源码里用了英文表名而数据库实际是中文表名或者你二次开发时改了字段名没同步改查询语句。解决在代码里临时加一行 Response.Write(sql) 把组装出来的 SQL 打出来复制到 Access 的查询设计器里直接执行看到底是哪段报错。这种排查方法比盯着代码猜要快得多。也可以写一个通用的 debug.asp把 SQL 和错误信息同时显示到页面上。5.3 翻车现场三中文乱码问题编码混用现象页面显示中文全部变成问号或淇℃嫄数据库里存的中文重新读出来是乱码。原因ASP 页面文件本身的编码和 Response.CodePage 不匹配。比如文件是 UTF-8 保存的但页面没有声明 charsetutf-8IIS 就会按默认的 GB2312 输出。解决在 conn.asp 或每个页面头部统一加% LanguageVBScript CodePage65001 %和meta charsetutf-8。如果你在 Windows 记事本里另存过源码记得把编码选成“UTF-8”而不是“ANSI”否则文件头加了 BOM 会导致页面输出空行。另外注意 Access 数据库里字段排序规则如果设成了“中文”读出来的顺序可能会和英文字段不一样但不影响存取值。5.4 翻车现场四Win11 上 IIS 无法启动或 500.19 错误现象配置完 IIS 后访问页面报 500.19错误代码 0x80070005页面显示“无法读取配置节”之类的文字。原因IIS 安装不完整或权限设置不对最常见是安装了 IIS 但没有安装“ASP”模块或者应用池的标识账户没有读取网站目录的权限。解决先回「启用或关闭 Windows 功能」检查 ASP、ISAPI 扩展、IIS 管理控制台这三项是否都勾选。然后确认网站物理路径的「Authenticated Users」有读取权限。如果还是不行打开 IIS 管理器 → 网站 → 右侧「基本设置」→ 连接为 → 设为“当前用户”临时放开权限做验证确认能跑后再改回 AppPoolIdentity 的严格模式。5.5 翻车现场五Win11 32 位 Access 驱动不兼容现象打开连接时报“Microsoft.Jet.OLEDB.4.0”未注册或者 0x80004005 且提示“找不到可安装的 ISAM”。原因64 位 IIS 默认进程不加载 32 位驱动Jet.OLEDB 是 32 位组件。解决应用池高级设置里启用 32 位应用程序或将连接字符串改成 ACE.OLEDB.12.0 并安装 AccessDatabaseEngine_x64.exe。两个驱动二选一不要混用。改完记得 iisreset 重启 IIS 让配置生效。6. 二次开发与安全加固把库存管理系统改成能上生产环境的工具6.1 SQL 注入修复从字符串拼接到 ADODB.Command 参数化这套源码里的 INSERT、UPDATE、SELECT 语句大都是字符串拼接这是 ASP 老代码的通病。把它改成参数化查询是二次开发里性价比最高的一步。具体做法是把 conn.Execute(sql) 改成 ADODB.Command 对象逐个传参% Set cmd Server.CreateObject(ADODB.Command) cmd.ActiveConnection conn cmd.CommandText SELECT * FROM admin WHERE username? AND password? cmd.Parameters.Append cmd.CreateParameter(u, 200, 1, 50, username) cmd.Parameters.Append cmd.CreateParameter(p, 200, 1, 50, password) Set rs cmd.Execute %这里?是 Access 的占位符CreateParameter 的第一个参数是名称第二个是数据类型200 表示 adVarChar第三个是方向1 表示 adParamInput第四个是长度第五个是值。参数化之后任何包含单引号和分号的恶意输入都只会被当成字符串值不会改变 SQL 结构。这套源码如果你要接公网这一步必须做没有商量余地。6.2 密码存储从明文改成 MD5 加盐老源码里的 admin 表密码通常就是明文这是内网系统最常见的隐患。改造方案分两步第一步写一个初始化脚本把所有现有密码批量改成 MD5 值第二步修改登录验证代码把用户输入的密码先 MD5 再比对。ASP 里没有内置 MD5 函数网上有免费的 md5.asp 文件下载后 include 进来就能用。加盐做法是MD5(username | password)或者在用户表里增加一个 salt 字段存随机字符串验证时把 salt 拼到密码后面。加盐的好处是两个人密码相同最后存储的哈希值不同防止彩虹表直接反查。对库存系统来说这个改动大概半小时能完成。我还建议你在登录页加一个失败次数限制连续五次失败锁定该用户名十五分钟这样能挡住绝大多数暴力破解脚本。6.3 表单级校验让入库数量不能为负数我之前提到入库数量填负数会把库存变成负数这个问题既可以在 ASP 代码里拦也可以在 JavaScript 里拦。最稳妥的做法是两层都做前端 JS 提示输入不合法后端 ASP 再校验一次因为请求可以绕过表单直接构造。后端校验代码很简单% quantity CInt(Request.Form(quantity)) If quantity 0 Then Response.Redirect stock_in.asp?errnegative_qty Response.End End If %同时前端 JS 里把input typenumber min1属性加上。虽然这个属性可以被浏览器绕过但至少拦住了大多数误操作。引导用户输入合理数量的体验比报错重来的体验好得多。6.4 数据库备份策略复制粘贴要有延时意识Access 数据库的备份是最容易做也最容易出错的环节——很多人直接在网站运行时复制 .mdb 文件结果备份出来的文件是损坏的。正确做法是通过代码备份思路是先连接数据库执行一次压缩修复再用 FileCopy 复制到备份目录% Dim dbPath, backupPath dbPath Server.MapPath(data/stock.mdb) backupPath Server.MapPath(backup/stock_ Year(Now) Month(Now) Day(Now) _ Hour(Now) Minute(Now) .mdb) FileCopy dbPath, backupPath Response.Write 备份成功 backupPath %这套源码如果没带备份页面我强烈建议你加上。备份文件不要放在网站根目录下否则别人可以直接下载数据库。正确做法是在站点根目录外建 backup 目录或至少用 IIS 的请求筛选器把 .mdb 后缀全部拦截。备份策略上每天自动备份一次保留最近三十天对中小型工厂完全够用。6.5 性能与并发Access 数据库在什么规模下会吃力这套系统在数据量小于五万行、并发用户数小于十五人时表现是稳定的。超过这个规模页面会出现卡顿月底报表可能跑几十秒这时候就该考虑两个低成本优化方案。第一个方案是把 Access 数据库中的业务表拆分成主数据表和流水表主数据常驻内存流水表按季度归档第二个方案是把 ASP 的 Session 状态从进程内改成数据库存储减少 IIS 进程回收造成的登录失效。如果你不想改架构至少把数据库定期做压缩和修复方法是在 Access 里打开数据库工具 → 压缩和修复数据库。这个操作能显著减少文件碎片导致的查询变慢。所以你看这套 ASPAccess 库存管理系统的价值不在于技术新而在于它足够简单、足够透明你能看到每一行 SQL 的来龙去脉。从那以后我每次接手这类老源码项目都会强制走一遍连接字符串检查、权限核对、SQL 注入扫描和备份脚本的部署流程——四个步骤做完系统才敢真正交给仓库管理员用。希望这套源码的改造经验能帮到你让你在二次开发的时候少走几步弯路。本文还有配套的精品资源点击获取
