⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmcsearch.vb

📁 humar resourse management
💻 VB
📖 第 1 页 / 共 5 页
字号:
' Human Resources Management System (HRMS)
'
' Programmed by: Nura Tijjani Abubakar (ntagrafix@yahoo.com)
' Submitted to: Mr. Ravindran Kanapathy
'
' Oxford Brookes University (OBU)
' Final Year Project (November, 2007)

Imports System.Data.OleDb
Public Class frmCSearch
    Inherits System.Windows.Forms.Form

    Dim ConnectionString As String = System.Configuration.ConfigurationSettings.AppSettings("DSN") ' Declared in App.Config File
    Dim Connection As OleDbConnection
    Dim DACandidate As OleDbDataAdapter
    Dim DSCndM As DataSet ' DataSet Main
    Dim TmpTable As DataTable
    Dim Result() As DataRow
    Dim CurrentRow As DataRow
    Dim cid As Integer
    Dim CurId As String
    Dim oDetails As Details
    Dim PersQuery, PPQuery, EduQuery, ExpQuery As String 'Query for DataAdapter
    Dim CandName, EmailID As String
    Dim IS1 As String = "Selected" ' To exclude selected or shortisted candidates from list
    Dim IS2 As String = "Shortlisted"
#Region " Windows Form Designer generated code "

    Public Sub New()
        MyBase.New()

        'This call is required by the Windows Form Designer.
        InitializeComponent()

        'Add any initialization after the InitializeComponent() call

    End Sub

    'Form overrides dispose to clean up the component list.
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    Friend WithEvents panelCnd As System.Windows.Forms.Panel
    Friend WithEvents dtpAppliedOn As System.Windows.Forms.DateTimePicker
    Friend WithEvents lblAppliedOn As System.Windows.Forms.Label
    Friend WithEvents dtpYears3 As System.Windows.Forms.DateTimePicker
    Friend WithEvents txtMajor3 As System.Windows.Forms.TextBox
    Friend WithEvents txtCourse3 As System.Windows.Forms.TextBox
    Friend WithEvents txtInstitute3 As System.Windows.Forms.TextBox
    Friend WithEvents dtpYears2 As System.Windows.Forms.DateTimePicker
    Friend WithEvents txtMajor2 As System.Windows.Forms.TextBox
    Friend WithEvents txtCourse2 As System.Windows.Forms.TextBox
    Friend WithEvents txtInstitute2 As System.Windows.Forms.TextBox
    Friend WithEvents dtpYears1 As System.Windows.Forms.DateTimePicker
    Friend WithEvents Label16 As System.Windows.Forms.Label
    Friend WithEvents Label13 As System.Windows.Forms.Label
    Friend WithEvents txtMajor1 As System.Windows.Forms.TextBox
    Friend WithEvents Label12 As System.Windows.Forms.Label
    Friend WithEvents txtCourse1 As System.Windows.Forms.TextBox
    Friend WithEvents txtInstitute1 As System.Windows.Forms.TextBox
    Friend WithEvents Label15 As System.Windows.Forms.Label
    Friend WithEvents txtJob3 As System.Windows.Forms.TextBox
    Friend WithEvents txtMonths3 As System.Windows.Forms.TextBox
    Friend WithEvents txtYears3 As System.Windows.Forms.TextBox
    Friend WithEvents txtCountry3 As System.Windows.Forms.TextBox
    Friend WithEvents txtCompany3 As System.Windows.Forms.TextBox
    Friend WithEvents txtJob2 As System.Windows.Forms.TextBox
    Friend WithEvents txtMonths2 As System.Windows.Forms.TextBox
    Friend WithEvents txtYears2 As System.Windows.Forms.TextBox
    Friend WithEvents txtCountry2 As System.Windows.Forms.TextBox
    Friend WithEvents txtCompany2 As System.Windows.Forms.TextBox
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents txtJob1 As System.Windows.Forms.TextBox
    Friend WithEvents Label3 As System.Windows.Forms.Label
    Friend WithEvents txtMonths1 As System.Windows.Forms.TextBox
    Friend WithEvents Label4 As System.Windows.Forms.Label
    Friend WithEvents txtYears1 As System.Windows.Forms.TextBox
    Friend WithEvents Label5 As System.Windows.Forms.Label
    Friend WithEvents txtCountry1 As System.Windows.Forms.TextBox
    Friend WithEvents txtCompany1 As System.Windows.Forms.TextBox
    Friend WithEvents Label10 As System.Windows.Forms.Label
    Friend WithEvents dtpDoE As System.Windows.Forms.DateTimePicker
    Friend WithEvents txtPPNo As System.Windows.Forms.TextBox
    Friend WithEvents Label17 As System.Windows.Forms.Label
    Friend WithEvents Label20 As System.Windows.Forms.Label
    Friend WithEvents cbxAgent As System.Windows.Forms.ComboBox
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents txtCandPincode As System.Windows.Forms.TextBox
    Friend WithEvents txtCandCity As System.Windows.Forms.TextBox
    Friend WithEvents txtCandAddress As System.Windows.Forms.TextBox
    Friend WithEvents lblCandPincode As System.Windows.Forms.Label
    Friend WithEvents dtpCandDoB As System.Windows.Forms.DateTimePicker
    Friend WithEvents lblCandDoB As System.Windows.Forms.Label
    Friend WithEvents lblCandCity As System.Windows.Forms.Label
    Friend WithEvents lblCandAddress As System.Windows.Forms.Label
    Friend WithEvents btnProfile As System.Windows.Forms.Button
    Friend WithEvents Label6 As System.Windows.Forms.Label
    Friend WithEvents btnGo As System.Windows.Forms.Button
    Friend WithEvents cbxJob As System.Windows.Forms.ComboBox
    Friend WithEvents dgCnd As System.Windows.Forms.DataGrid
    Friend WithEvents DataGridTableStyle1 As System.Windows.Forms.DataGridTableStyle
    Friend WithEvents ID As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents City As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents Phone As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents Mobile As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents Email As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents ApplicantName As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents DateOfBirth As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents AppliedOn As System.Windows.Forms.DataGridTextBoxColumn
    Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
    Friend WithEvents Label7 As System.Windows.Forms.Label
    Friend WithEvents Button1 As System.Windows.Forms.Button
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmCSearch))
        Me.panelCnd = New System.Windows.Forms.Panel
        Me.Label7 = New System.Windows.Forms.Label
        Me.dtpAppliedOn = New System.Windows.Forms.DateTimePicker
        Me.lblAppliedOn = New System.Windows.Forms.Label
        Me.dtpYears3 = New System.Windows.Forms.DateTimePicker
        Me.txtMajor3 = New System.Windows.Forms.TextBox
        Me.txtCourse3 = New System.Windows.Forms.TextBox
        Me.txtInstitute3 = New System.Windows.Forms.TextBox
        Me.dtpYears2 = New System.Windows.Forms.DateTimePicker
        Me.txtMajor2 = New System.Windows.Forms.TextBox
        Me.txtCourse2 = New System.Windows.Forms.TextBox
        Me.txtInstitute2 = New System.Windows.Forms.TextBox
        Me.dtpYears1 = New System.Windows.Forms.DateTimePicker
        Me.Label16 = New System.Windows.Forms.Label
        Me.Label13 = New System.Windows.Forms.Label
        Me.txtMajor1 = New System.Windows.Forms.TextBox
        Me.Label12 = New System.Windows.Forms.Label
        Me.txtCourse1 = New System.Windows.Forms.TextBox
        Me.txtInstitute1 = New System.Windows.Forms.TextBox
        Me.Label15 = New System.Windows.Forms.Label
        Me.txtJob3 = New System.Windows.Forms.TextBox
        Me.txtMonths3 = New System.Windows.Forms.TextBox
        Me.txtYears3 = New System.Windows.Forms.TextBox
        Me.txtCountry3 = New System.Windows.Forms.TextBox
        Me.txtCompany3 = New System.Windows.Forms.TextBox
        Me.txtJob2 = New System.Windows.Forms.TextBox
        Me.txtMonths2 = New System.Windows.Forms.TextBox
        Me.txtYears2 = New System.Windows.Forms.TextBox
        Me.txtCountry2 = New System.Windows.Forms.TextBox
        Me.txtCompany2 = New System.Windows.Forms.TextBox
        Me.Label2 = New System.Windows.Forms.Label
        Me.txtJob1 = New System.Windows.Forms.TextBox
        Me.Label3 = New System.Windows.Forms.Label
        Me.txtMonths1 = New System.Windows.Forms.TextBox
        Me.Label4 = New System.Windows.Forms.Label
        Me.txtYears1 = New System.Windows.Forms.TextBox
        Me.Label5 = New System.Windows.Forms.Label
        Me.txtCountry1 = New System.Windows.Forms.TextBox
        Me.txtCompany1 = New System.Windows.Forms.TextBox
        Me.Label10 = New System.Windows.Forms.Label
        Me.dtpDoE = New System.Windows.Forms.DateTimePicker
        Me.txtPPNo = New System.Windows.Forms.TextBox
        Me.Label17 = New System.Windows.Forms.Label
        Me.Label20 = New System.Windows.Forms.Label
        Me.cbxAgent = New System.Windows.Forms.ComboBox
        Me.Label1 = New System.Windows.Forms.Label
        Me.txtCandPincode = New System.Windows.Forms.TextBox
        Me.txtCandCity = New System.Windows.Forms.TextBox
        Me.txtCandAddress = New System.Windows.Forms.TextBox
        Me.lblCandPincode = New System.Windows.Forms.Label
        Me.dtpCandDoB = New System.Windows.Forms.DateTimePicker
        Me.lblCandDoB = New System.Windows.Forms.Label
        Me.lblCandCity = New System.Windows.Forms.Label
        Me.lblCandAddress = New System.Windows.Forms.Label
        Me.btnProfile = New System.Windows.Forms.Button
        Me.LinkLabel1 = New System.Windows.Forms.LinkLabel
        Me.Button1 = New System.Windows.Forms.Button
        Me.cbxJob = New System.Windows.Forms.ComboBox
        Me.Label6 = New System.Windows.Forms.Label
        Me.btnGo = New System.Windows.Forms.Button
        Me.dgCnd = New System.Windows.Forms.DataGrid
        Me.DataGridTableStyle1 = New System.Windows.Forms.DataGridTableStyle
        Me.ID = New System.Windows.Forms.DataGridTextBoxColumn
        Me.AppliedOn = New System.Windows.Forms.DataGridTextBoxColumn
        Me.ApplicantName = New System.Windows.Forms.DataGridTextBoxColumn
        Me.DateOfBirth = New System.Windows.Forms.DataGridTextBoxColumn
        Me.City = New System.Windows.Forms.DataGridTextBoxColumn
        Me.Phone = New System.Windows.Forms.DataGridTextBoxColumn
        Me.Mobile = New System.Windows.Forms.DataGridTextBoxColumn
        Me.Email = New System.Windows.Forms.DataGridTextBoxColumn
        Me.panelCnd.SuspendLayout()
        CType(Me.dgCnd, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
        'panelCnd
        '
        Me.panelCnd.Controls.Add(Me.Label7)
        Me.panelCnd.Controls.Add(Me.dtpAppliedOn)
        Me.panelCnd.Controls.Add(Me.lblAppliedOn)
        Me.panelCnd.Controls.Add(Me.dtpYears3)
        Me.panelCnd.Controls.Add(Me.txtMajor3)
        Me.panelCnd.Controls.Add(Me.txtCourse3)
        Me.panelCnd.Controls.Add(Me.txtInstitute3)
        Me.panelCnd.Controls.Add(Me.dtpYears2)
        Me.panelCnd.Controls.Add(Me.txtMajor2)
        Me.panelCnd.Controls.Add(Me.txtCourse2)
        Me.panelCnd.Controls.Add(Me.txtInstitute2)
        Me.panelCnd.Controls.Add(Me.dtpYears1)
        Me.panelCnd.Controls.Add(Me.Label16)
        Me.panelCnd.Controls.Add(Me.Label13)
        Me.panelCnd.Controls.Add(Me.txtMajor1)
        Me.panelCnd.Controls.Add(Me.Label12)
        Me.panelCnd.Controls.Add(Me.txtCourse1)
        Me.panelCnd.Controls.Add(Me.txtInstitute1)
        Me.panelCnd.Controls.Add(Me.Label15)
        Me.panelCnd.Controls.Add(Me.txtJob3)
        Me.panelCnd.Controls.Add(Me.txtMonths3)
        Me.panelCnd.Controls.Add(Me.txtYears3)
        Me.panelCnd.Controls.Add(Me.txtCountry3)
        Me.panelCnd.Controls.Add(Me.txtCompany3)
        Me.panelCnd.Controls.Add(Me.txtJob2)
        Me.panelCnd.Controls.Add(Me.txtMonths2)
        Me.panelCnd.Controls.Add(Me.txtYears2)
        Me.panelCnd.Controls.Add(Me.txtCountry2)
        Me.panelCnd.Controls.Add(Me.txtCompany2)
        Me.panelCnd.Controls.Add(Me.Label2)
        Me.panelCnd.Controls.Add(Me.txtJob1)
        Me.panelCnd.Controls.Add(Me.Label3)
        Me.panelCnd.Controls.Add(Me.txtMonths1)
        Me.panelCnd.Controls.Add(Me.Label4)
        Me.panelCnd.Controls.Add(Me.txtYears1)
        Me.panelCnd.Controls.Add(Me.Label5)
        Me.panelCnd.Controls.Add(Me.txtCountry1)
        Me.panelCnd.Controls.Add(Me.txtCompany1)
        Me.panelCnd.Controls.Add(Me.Label10)
        Me.panelCnd.Controls.Add(Me.dtpDoE)
        Me.panelCnd.Controls.Add(Me.txtPPNo)
        Me.panelCnd.Controls.Add(Me.Label17)
        Me.panelCnd.Controls.Add(Me.Label20)
        Me.panelCnd.Controls.Add(Me.cbxAgent)
        Me.panelCnd.Controls.Add(Me.Label1)
        Me.panelCnd.Controls.Add(Me.txtCandPincode)
        Me.panelCnd.Controls.Add(Me.txtCandCity)
        Me.panelCnd.Controls.Add(Me.txtCandAddress)
        Me.panelCnd.Controls.Add(Me.lblCandPincode)
        Me.panelCnd.Controls.Add(Me.dtpCandDoB)
        Me.panelCnd.Controls.Add(Me.lblCandDoB)
        Me.panelCnd.Controls.Add(Me.lblCandCity)
        Me.panelCnd.Controls.Add(Me.lblCandAddress)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -