Attribute VB_Name = "Module1"
Option Explicit
Public flag As Integer                  '添加记录标记
Public userID As String                 '标记当前用户ID
Public usertype As Integer              '标记当前用户类型
Public ingid As Recordset               '定义全局变量
Public iflag As Integer



