admin.vb

Beginning VB.NET DatabasesAll_Code.rar

        Me.btnCut.ImageIndex = 1
        Me.btnCut.Tag = "Cut"
        Me.btnCut.ToolTipText = "Cut"
        '
        'btnCopy
        '
        Me.btnCopy.ImageIndex = 2
        Me.btnCopy.Tag = "Copy"
        Me.btnCopy.ToolTipText = "Copy"
        '
        'btnPaste
        '
        Me.btnPaste.ImageIndex = 3
        Me.btnPaste.Tag = "Paste"
        Me.btnPaste.ToolTipText = "Paste"
        '
        'ToolBarButton2
        '
        Me.ToolBarButton2.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        '
        'btnUndo
        '
        Me.btnUndo.ImageIndex = 4
        Me.btnUndo.Tag = "Undo"
        Me.btnUndo.ToolTipText = "Undo"
        '
        'ToolBarButton3
        '
        Me.ToolBarButton3.Style = System.Windows.Forms.ToolBarButtonStyle.Separator
        '
        'btnAdd
        '
        Me.btnAdd.ImageIndex = 5
        Me.btnAdd.Tag = "Add"
        Me.btnAdd.ToolTipText = "Add"
        '
        'btnUpdate
        '
        Me.btnUpdate.ImageIndex = 6
        Me.btnUpdate.Tag = "Update"
        Me.btnUpdate.ToolTipText = "Update"
        '
        'btnDelete
        '
        Me.btnDelete.ImageIndex = 7
        Me.btnDelete.Tag = "Delete"
        Me.btnDelete.ToolTipText = "Delete"
        '
        'StatusBar1
        '
        Me.StatusBar1.Location = New System.Drawing.Point(0, 461)
        Me.StatusBar1.Name = "StatusBar1"
        Me.StatusBar1.Panels.AddRange(New System.Windows.Forms.StatusBarPanel() {Me.pnlStatus, Me.pnlDate})
        Me.StatusBar1.ShowPanels = True
        Me.StatusBar1.Size = New System.Drawing.Size(752, 22)
        Me.StatusBar1.TabIndex = 1
        Me.StatusBar1.Text = "StatusBar1"
        '
        'pnlStatus
        '
        Me.pnlStatus.AutoSize = System.Windows.Forms.StatusBarPanelAutoSize.Spring
        Me.pnlStatus.Text = "Ready"
        Me.pnlStatus.Width = 661
        '
        'pnlDate
        '
        Me.pnlDate.Width = 75
        '
        'Label1
        '
        Me.Label1.BackColor = System.Drawing.Color.White
        Me.Label1.Dock = System.Windows.Forms.DockStyle.Top
        Me.Label1.Location = New System.Drawing.Point(0, 28)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(752, 3)
        Me.Label1.TabIndex = 2
        '
        'Label2
        '
        Me.Label2.BackColor = System.Drawing.Color.White
        Me.Label2.Dock = System.Windows.Forms.DockStyle.Bottom
        Me.Label2.Location = New System.Drawing.Point(0, 458)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(752, 3)
        Me.Label2.TabIndex = 3
        '
        'Label3
        '
        Me.Label3.BackColor = System.Drawing.Color.White
        Me.Label3.Dock = System.Windows.Forms.DockStyle.Left
        Me.Label3.Location = New System.Drawing.Point(0, 31)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(3, 427)
        Me.Label3.TabIndex = 4
        '
        'Label4
        '
        Me.Label4.BackColor = System.Drawing.Color.White
        Me.Label4.Dock = System.Windows.Forms.DockStyle.Right
        Me.Label4.Location = New System.Drawing.Point(749, 31)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(3, 427)
        Me.Label4.TabIndex = 5
        '
        'Panel1
        '
        Me.Panel1.BackColor = System.Drawing.Color.White
        Me.Panel1.Controls.Add(Me.Panel7)
        Me.Panel1.Controls.Add(Me.Splitter1)
        Me.Panel1.Controls.Add(Me.Panel2)
        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Panel1.Location = New System.Drawing.Point(3, 31)
        Me.Panel1.Name = "Panel1"
        Me.Panel1.Size = New System.Drawing.Size(746, 427)
        Me.Panel1.TabIndex = 6
        '
        'Panel7
        '
        Me.Panel7.Controls.Add(Me.pnlUsers)
        Me.Panel7.Controls.Add(Me.pnlRoles)
        Me.Panel7.Controls.Add(Me.pnlGroupProjects)
        Me.Panel7.Controls.Add(Me.pnlGroups)
        Me.Panel7.Controls.Add(Me.pnlProjects)
        Me.Panel7.Dock = System.Windows.Forms.DockStyle.Fill
        Me.Panel7.Location = New System.Drawing.Point(170, 0)
        Me.Panel7.Name = "Panel7"
        Me.Panel7.Size = New System.Drawing.Size(576, 427)
        Me.Panel7.TabIndex = 2
        '
        'pnlUsers
        '
        Me.pnlUsers.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.pnlUsers.Controls.Add(Me.GroupBox5)
        Me.pnlUsers.Controls.Add(Me.lvwUsers)
        Me.pnlUsers.Controls.Add(Me.Label27)
        Me.pnlUsers.Location = New System.Drawing.Point(5000, 5000)
        Me.pnlUsers.Name = "pnlUsers"
        Me.pnlUsers.Size = New System.Drawing.Size(576, 427)
        Me.pnlUsers.TabIndex = 4
        '
        'GroupBox5
        '
        Me.GroupBox5.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.GroupBox5.Controls.Add(Me.txtUserUpdateDate)
        Me.GroupBox5.Controls.Add(Me.Label38)
        Me.GroupBox5.Controls.Add(Me.cboUserRole)
        Me.GroupBox5.Controls.Add(Me.Label37)
        Me.GroupBox5.Controls.Add(Me.cboUserManager)
        Me.GroupBox5.Controls.Add(Me.Label36)
        Me.GroupBox5.Controls.Add(Me.cboUserGroup)
        Me.GroupBox5.Controls.Add(Me.Label35)
        Me.GroupBox5.Controls.Add(Me.txtPhone)
        Me.GroupBox5.Controls.Add(Me.Label34)
        Me.GroupBox5.Controls.Add(Me.txtEmail)
        Me.GroupBox5.Controls.Add(Me.Label33)
        Me.GroupBox5.Controls.Add(Me.txtLastName)
        Me.GroupBox5.Controls.Add(Me.Label32)
        Me.GroupBox5.Controls.Add(Me.txtFirstName)
        Me.GroupBox5.Controls.Add(Me.Label31)
        Me.GroupBox5.Controls.Add(Me.txtPassword)
        Me.GroupBox5.Controls.Add(Me.Label30)
        Me.GroupBox5.Controls.Add(Me.txtLogin)
        Me.GroupBox5.Controls.Add(Me.Label29)
        Me.GroupBox5.Controls.Add(Me.optStatusSuspended)
        Me.GroupBox5.Controls.Add(Me.optStatusActive)
        Me.GroupBox5.Controls.Add(Me.txtUserID)
        Me.GroupBox5.Controls.Add(Me.Label28)
        Me.GroupBox5.Location = New System.Drawing.Point(2, 245)
        Me.GroupBox5.Name = "GroupBox5"
        Me.GroupBox5.Size = New System.Drawing.Size(571, 179)
        Me.GroupBox5.TabIndex = 2
        Me.GroupBox5.TabStop = False
        Me.GroupBox5.Text = "User Details"
        '
        'txtUserUpdateDate
        '
        Me.txtUserUpdateDate.Location = New System.Drawing.Point(322, 148)
        Me.txtUserUpdateDate.Name = "txtUserUpdateDate"
        Me.txtUserUpdateDate.ReadOnly = True
        Me.txtUserUpdateDate.Size = New System.Drawing.Size(134, 20)
        Me.txtUserUpdateDate.TabIndex = 23
        Me.txtUserUpdateDate.Text = ""
        '
        'Label38
        '
        Me.Label38.Location = New System.Drawing.Point(248, 148)
        Me.Label38.Name = "Label38"
        Me.Label38.Size = New System.Drawing.Size(72, 20)
        Me.Label38.TabIndex = 22
        Me.Label38.Text = "Update Date"
        Me.Label38.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'cboUserRole
        '
        Me.cboUserRole.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboUserRole.Location = New System.Drawing.Point(83, 148)
        Me.cboUserRole.Name = "cboUserRole"
        Me.cboUserRole.Size = New System.Drawing.Size(165, 21)
        Me.cboUserRole.TabIndex = 21
        '
        'Label37
        '
        Me.Label37.Location = New System.Drawing.Point(8, 148)
        Me.Label37.Name = "Label37"
        Me.Label37.Size = New System.Drawing.Size(72, 20)
        Me.Label37.TabIndex = 20
        Me.Label37.Text = "Role"
        Me.Label37.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'cboUserManager
        '
        Me.cboUserManager.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboUserManager.Location = New System.Drawing.Point(322, 122)
        Me.cboUserManager.Name = "cboUserManager"
        Me.cboUserManager.Size = New System.Drawing.Size(165, 21)
        Me.cboUserManager.TabIndex = 19
        '
        'Label36
        '
        Me.Label36.Location = New System.Drawing.Point(248, 122)
        Me.Label36.Name = "Label36"
        Me.Label36.Size = New System.Drawing.Size(72, 20)
        Me.Label36.TabIndex = 18
        Me.Label36.Text = "Manager"
        Me.Label36.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'cboUserGroup
        '
        Me.cboUserGroup.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboUserGroup.Location = New System.Drawing.Point(82, 122)
        Me.cboUserGroup.Name = "cboUserGroup"
        Me.cboUserGroup.Size = New System.Drawing.Size(165, 21)
        Me.cboUserGroup.TabIndex = 17
        '
        'Label35
        '
        Me.Label35.Location = New System.Drawing.Point(8, 122)
        Me.Label35.Name = "Label35"
        Me.Label35.Size = New System.Drawing.Size(72, 20)
        Me.Label35.TabIndex = 16
        Me.Label35.Text = "Group"
        Me.Label35.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtPhone
        '
        Me.txtPhone.Location = New System.Drawing.Point(322, 96)
        Me.txtPhone.Name = "txtPhone"
        Me.txtPhone.TabIndex = 15
        Me.txtPhone.Text = ""
        '
        'Label34
        '
        Me.Label34.Location = New System.Drawing.Point(248, 96)
        Me.Label34.Name = "Label34"
        Me.Label34.Size = New System.Drawing.Size(72, 20)
        Me.Label34.TabIndex = 14
        Me.Label34.Text = "Phone"
        Me.Label34.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtEmail
        '
        Me.txtEmail.Location = New System.Drawing.Point(82, 96)
        Me.txtEmail.Name = "txtEmail"
        Me.txtEmail.Size = New System.Drawing.Size(165, 20)
        Me.txtEmail.TabIndex = 13
        Me.txtEmail.Text = ""
        '
        'Label33
        '
        Me.Label33.Location = New System.Drawing.Point(8, 96)
        Me.Label33.Name = "Label33"
        Me.Label33.Size = New System.Drawing.Size(72, 20)
        Me.Label33.TabIndex = 12
        Me.Label33.Text = "Email"
        Me.Label33.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtLastName
        '
        Me.txtLastName.Location = New System.Drawing.Point(322, 70)
        Me.txtLastName.Name = "txtLastName"
        Me.txtLastName.TabIndex = 11
        Me.txtLastName.Text = ""
        '
        'Label32
        '
        Me.Label32.Location = New System.Drawing.Point(248, 70)
        Me.Label32.Name = "Label32"