VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} login 
   Caption         =   "CMS Login"
   ClientHeight    =   2295
   ClientLeft      =   120
   ClientTop       =   465
   ClientWidth     =   2445
   OleObjectBlob   =   "login.frx":0000
   StartUpPosition =   1  'CenterOwner
End
Attribute VB_Name = "login"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False


Public proceed As Boolean



Private Sub cbCancel_Click()
    tbU.text = ""
    tbP.text = ""
    proceed = False
    Me.Hide
End Sub

Private Sub cbOK_Click()
    proceed = True
    Me.Hide
End Sub


Private Sub UserForm_Terminate()
    proceed = False
End Sub