mdlstandard.bas

来自「这个是完整的数据库商品管理系统,有完整的源代码,本人测试过了,非常好用.里面还有」· BAS 代码 · 共 13 行

Attribute VB_Name = "mdlStandard"
Option Explicit

'改变用来保存当前的用户类型，其中0表示管理人员，1表示仓管人员，2表示销售人员
Public gnUserType As Integer

'表示当前的用户名称
Public gsUserName As String

'数据连接,在打开记录集和操作记录数据时使用.
Public gConn As ADODB.Connection