基于SQL Server 编写过磅查询客户端

田太孝　刘俊君　曹双　张绿叶　李涛

摘要：采用VB编写过磅系统网络查询系统，实现VPN拨号网络远程查询功能，根据多个条件实时查询及历史查询功能如：拼音模糊查询，发货单位，收货单位，车号等统计查询，解决了各个部门汇总问题，异地远程查询功能。

关键词：VPN远程访问；车号；拼音模糊查询；车数统计；净重统计

中图分类号：TP311 文献标识码：A 文章编号：1009-3044（2013）07-1471-05

水泥企业物质进出甚多，本公司过磅系统无客户查询系统，各部门无法查询到过磅数据。每天，每月需靠过磅员报表，人工归类统计，工作繁琐。每月客户结账需人工统计汇总，财务室工作量繁重，而却容易出错。若需查询过磅数据需要到过磅房查询极不方便，而却影响公司过磅人员工作。为此我采用VB编写过磅系统网络查询系统，并实现VPN拨号实现远程访问功能。解决上述问题，摆脱人工统计的历史问题，实现实时反应过磅系统数据，出差可以通过VPN随时随地查询汇总及报表。

系统设计思想：

1 网络规划

过磅远程查询系统主要由：SQL数据库服务器，华为2811路由器配置VPN，交换机等设备组成。系统硬件组成图1如下：

2 软件功能设计

过磅查询系统采用C/S架构设计，所有过磅系统数据库由windows2003+SQL server 2000存储管理，在供应部，财务部等部门设立网络客户端，软件客户端采用VB6.0编写，软件包括以下几个模块：

1）拼音模糊查询功能

在VB界面上拖拉出Combo，list，command等控件，并在Combo的Change事件中输入代码调用拼音类模块，查询数据库内数据与Combo内输入字母匹配显示在list内，部分代码及运行界面如下：

2）明细查询功能

能根据称重日期，车号，发货单位，收货单位，车号等任意条件查询显示在 MSHFlexGrid控件内并且能在下方文本框内显示车数累计，毛重汇总，净重汇总功能，明细查询代码及界面如下：

3 应用范围

给供应科，财务科等相关部门安装过磅客户端，数据与过磅房数据同步，供应科可随时查询物料进入情况，财务科会计可以使用车号，发货单位等统计车数，净重等数据，核对票据和方便结账。出差的相关部门领导笔记本电脑上安装客户端，然后通过VPN拨号連接到公司局域网，方便查询物质情况，实时掌握。

4 结论

过磅查询客户端有效的解决了供应部门及财务部门无法查询过磅数据，需过磅房汇总的历史问题，实现了实时查询功能，历史数据条件查询汇总统计车数，记录，净重等功能，提高了信息化管理水平。