admin.vb

Beginning VB.NET DatabasesAll_Code.rar

        Me.ColumnHeader10.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
        '
        'ColumnHeader11
        '
        Me.ColumnHeader11.Text = "Last Update Date "
        Me.ColumnHeader11.Width = 125
        '
        'Label21
        '
        Me.Label21.BackColor = System.Drawing.SystemColors.ControlDark
        Me.Label21.Dock = System.Windows.Forms.DockStyle.Top
        Me.Label21.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Bold)
        Me.Label21.ForeColor = System.Drawing.Color.White
        Me.Label21.Location = New System.Drawing.Point(0, 0)
        Me.Label21.Name = "Label21"
        Me.Label21.Size = New System.Drawing.Size(574, 23)
        Me.Label21.TabIndex = 0
        Me.Label21.Text = "Roles"
        Me.Label21.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'pnlGroupProjects
        '
        Me.pnlGroupProjects.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.pnlGroupProjects.Controls.Add(Me.GroupBox3)
        Me.pnlGroupProjects.Controls.Add(Me.Label17)
        Me.pnlGroupProjects.Location = New System.Drawing.Point(5000, 5000)
        Me.pnlGroupProjects.Name = "pnlGroupProjects"
        Me.pnlGroupProjects.Size = New System.Drawing.Size(576, 427)
        Me.pnlGroupProjects.TabIndex = 2
        '
        'GroupBox3
        '
        Me.GroupBox3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
                    Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.GroupBox3.Controls.Add(Me.lstGroupProjects)
        Me.GroupBox3.Controls.Add(Me.Label20)
        Me.GroupBox3.Controls.Add(Me.lstProjects)
        Me.GroupBox3.Controls.Add(Me.Label19)
        Me.GroupBox3.Controls.Add(Me.cboGroups)
        Me.GroupBox3.Controls.Add(Me.Label18)
        Me.GroupBox3.Location = New System.Drawing.Point(2, 25)
        Me.GroupBox3.Name = "GroupBox3"
        Me.GroupBox3.Size = New System.Drawing.Size(571, 399)
        Me.GroupBox3.TabIndex = 1
        Me.GroupBox3.TabStop = False
        Me.GroupBox3.Text = "Group Projects Details"
        '
        'lstGroupProjects
        '
        Me.lstGroupProjects.AllowDrop = True
        Me.lstGroupProjects.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
                    Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lstGroupProjects.IntegralHeight = False
        Me.lstGroupProjects.Location = New System.Drawing.Point(255, 76)
        Me.lstGroupProjects.Name = "lstGroupProjects"
        Me.lstGroupProjects.Size = New System.Drawing.Size(256, 313)
        Me.lstGroupProjects.TabIndex = 5
        '
        'Label20
        '
        Me.Label20.Location = New System.Drawing.Point(255, 60)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(120, 16)
        Me.Label20.TabIndex = 4
        Me.Label20.Text = "Group Projects"
        '
        'lstProjects
        '
        Me.lstProjects.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
                    Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
        Me.lstProjects.IntegralHeight = False
        Me.lstProjects.Location = New System.Drawing.Point(8, 76)
        Me.lstProjects.Name = "lstProjects"
        Me.lstProjects.Size = New System.Drawing.Size(240, 313)
        Me.lstProjects.TabIndex = 3
        '
        'Label19
        '
        Me.Label19.Location = New System.Drawing.Point(8, 60)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(100, 16)
        Me.Label19.TabIndex = 2
        Me.Label19.Text = "Available Projects"
        '
        'cboGroups
        '
        Me.cboGroups.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cboGroups.Location = New System.Drawing.Point(8, 32)
        Me.cboGroups.Name = "cboGroups"
        Me.cboGroups.Size = New System.Drawing.Size(240, 21)
        Me.cboGroups.TabIndex = 1
        '
        'Label18
        '
        Me.Label18.Location = New System.Drawing.Point(8, 16)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(56, 16)
        Me.Label18.TabIndex = 0
        Me.Label18.Text = "Groups"
        '
        'Label17
        '
        Me.Label17.BackColor = System.Drawing.SystemColors.ControlDark
        Me.Label17.Dock = System.Windows.Forms.DockStyle.Top
        Me.Label17.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Bold)
        Me.Label17.ForeColor = System.Drawing.Color.White
        Me.Label17.Location = New System.Drawing.Point(0, 0)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(574, 23)
        Me.Label17.TabIndex = 0
        Me.Label17.Text = "Group Projects"
        Me.Label17.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'pnlGroups
        '
        Me.pnlGroups.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.pnlGroups.Controls.Add(Me.GroupBox2)
        Me.pnlGroups.Controls.Add(Me.lvwGroups)
        Me.pnlGroups.Controls.Add(Me.Label12)
        Me.pnlGroups.Location = New System.Drawing.Point(5000, 5000)
        Me.pnlGroups.Name = "pnlGroups"
        Me.pnlGroups.Size = New System.Drawing.Size(576, 427)
        Me.pnlGroups.TabIndex = 1
        '
        'GroupBox2
        '
        Me.GroupBox2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.GroupBox2.Controls.Add(Me.txtGroupUpdateDate)
        Me.GroupBox2.Controls.Add(Me.Label16)
        Me.GroupBox2.Controls.Add(Me.txtGroupDescription)
        Me.GroupBox2.Controls.Add(Me.Label15)
        Me.GroupBox2.Controls.Add(Me.txtGroupName)
        Me.GroupBox2.Controls.Add(Me.Label14)
        Me.GroupBox2.Controls.Add(Me.txtGroupID)
        Me.GroupBox2.Controls.Add(Me.Label13)
        Me.GroupBox2.Location = New System.Drawing.Point(2, 299)
        Me.GroupBox2.Name = "GroupBox2"
        Me.GroupBox2.Size = New System.Drawing.Size(571, 125)
        Me.GroupBox2.TabIndex = 2
        Me.GroupBox2.TabStop = False
        Me.GroupBox2.Text = "Group Details"
        '
        'txtGroupUpdateDate
        '
        Me.txtGroupUpdateDate.Location = New System.Drawing.Point(82, 96)
        Me.txtGroupUpdateDate.Name = "txtGroupUpdateDate"
        Me.txtGroupUpdateDate.ReadOnly = True
        Me.txtGroupUpdateDate.Size = New System.Drawing.Size(134, 20)
        Me.txtGroupUpdateDate.TabIndex = 7
        Me.txtGroupUpdateDate.Text = ""
        '
        'Label16
        '
        Me.Label16.Location = New System.Drawing.Point(8, 96)
        Me.Label16.Name = "Label16"
        Me.Label16.Size = New System.Drawing.Size(72, 20)
        Me.Label16.TabIndex = 6
        Me.Label16.Text = "Update Date"
        Me.Label16.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtGroupDescription
        '
        Me.txtGroupDescription.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.txtGroupDescription.Location = New System.Drawing.Point(82, 70)
        Me.txtGroupDescription.Name = "txtGroupDescription"
        Me.txtGroupDescription.Size = New System.Drawing.Size(481, 20)
        Me.txtGroupDescription.TabIndex = 5
        Me.txtGroupDescription.Text = ""
        '
        'Label15
        '
        Me.Label15.Location = New System.Drawing.Point(8, 70)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(72, 20)
        Me.Label15.TabIndex = 4
        Me.Label15.Text = "Description"
        Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtGroupName
        '
        Me.txtGroupName.Location = New System.Drawing.Point(82, 44)
        Me.txtGroupName.Name = "txtGroupName"
        Me.txtGroupName.Size = New System.Drawing.Size(176, 20)
        Me.txtGroupName.TabIndex = 3
        Me.txtGroupName.Text = ""
        '
        'Label14
        '
        Me.Label14.Location = New System.Drawing.Point(8, 44)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(72, 20)
        Me.Label14.TabIndex = 2
        Me.Label14.Text = "Name"
        Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'txtGroupID
        '
        Me.txtGroupID.Location = New System.Drawing.Point(82, 18)
        Me.txtGroupID.Name = "txtGroupID"
        Me.txtGroupID.ReadOnly = True
        Me.txtGroupID.Size = New System.Drawing.Size(246, 20)
        Me.txtGroupID.TabIndex = 1
        Me.txtGroupID.Text = ""
        '
        'Label13
        '
        Me.Label13.Location = New System.Drawing.Point(8, 18)
        Me.Label13.Name = "Label13"
        Me.Label13.Size = New System.Drawing.Size(72, 20)
        Me.Label13.TabIndex = 0
        Me.Label13.Text = "ID"
        Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        '
        'lvwGroups
        '
        Me.lvwGroups.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
                    Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lvwGroups.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader5, Me.ColumnHeader6, Me.ColumnHeader7})
        Me.lvwGroups.FullRowSelect = True
        Me.lvwGroups.Location = New System.Drawing.Point(2, 28)
        Me.lvwGroups.Name = "lvwGroups"
        Me.lvwGroups.Size = New System.Drawing.Size(571, 263)
        Me.lvwGroups.TabIndex = 1
        Me.lvwGroups.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader5
        '
        Me.ColumnHeader5.Text = "Name"
        Me.ColumnHeader5.Width = 150
        '
        'ColumnHeader6
        '
        Me.ColumnHeader6.Text = "Description"
        Me.ColumnHeader6.Width = 200
        '
        'ColumnHeader7
        '
        Me.ColumnHeader7.Text = "Last Update Date "
        Me.ColumnHeader7.Width = 125
        '
        'Label12
        '
        Me.Label12.BackColor = System.Drawing.SystemColors.ControlDark
        Me.Label12.Dock = System.Windows.Forms.DockStyle.Top
        Me.Label12.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Bold)
        Me.Label12.ForeColor = System.Drawing.Color.White
        Me.Label12.Location = New System.Drawing.Point(0, 0)
        Me.Label12.Name = "Label12"
        Me.Label12.Size = New System.Drawing.Size(574, 23)
        Me.Label12.TabIndex = 0
        Me.Label12.Text = "Groups"
        Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
        '
        'pnlProjects
        '
        Me.pnlProjects.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.pnlProjects.Controls.Add(Me.GroupBox1)
        Me.pnlProjects.Controls.Add(Me.lvwProjects)
        Me.pnlProjects.Controls.Add(Me.Label6)
        Me.pnlProjects.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlProjects.Location = New System.Drawing.Point(0, 0)
        Me.pnlProjects.Name = "pnlProjects"
        Me.pnlProjects.Size = New System.Drawing.Size(576, 427)
        Me.pnlProjects.TabIndex = 0
        '
        'GroupBox1
        '
        Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
                    Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.GroupBox1.Controls.Add(Me.txtProjectUpdateDate)
        Me.GroupBox1.Controls.Add(Me.Label11)
        Me.GroupBox1.Controls.Add(Me.txtSequenceNumber)
        Me.GroupBox1.Controls.Add(Me.Label10)
        Me.GroupBox1.Controls.Add(Me.txtProjectDescription)
        Me.GroupBox1.Controls.Add(Me.Label9)
        Me.GroupBox1.Controls.Add(Me.txtProjectName)
        Me.GroupBox1.Controls.Add(Me.Label8)
        Me.GroupBox1.Controls.Add(Me.txtProjectID)
        Me.GroupBox1.Controls.Add(Me.Label7)
        Me.GroupBox1.Location = New System.Drawing.Point(2, 256)
        Me.GroupBox1.Name