Well here's the problem. I already have a gridview/formview set up with their sql datasources. My only problem is that once the user clicks on the edit button I want it to pull data from the Oracle table. All I'm doing is refreshing the employee information with data from our central database. Here's the code on how I did it in 1.1:
Sub EditForm(sender As Object, e As System.EventArgs)
cmbCallStatus.Enabled = "True"
cmbCallerType.Enabled = "True"
txtCallerEmployeeID.Enabled = "True"
txtCallerPhone1.Enabled = "True"
txtCallerPhone2.Enabled = "True"
cmbMajBusFunctionArea.Enabled = "True"
cmbCompetitiveHireInfo.Enabled = "True"
txtHROMNotes.Enabled = "True"
btnEdit.Enabled = "False"
btnUpdate.Enabled = "True"
'Reload EV2 Employee Information
Dim strEE As String
Dim HireDate As Date
strEE = lblEmployeeID.Text
Dim oOracleConn As OracleConnection = New OracleConnection()
Dim dataReader As OracleClient.OracleDataReader
oOracleConn.ConnectionString = "Data Source=test;User Id=test;Password=test;Integrated Security=no;"
Dim myInsertQuery As String = "SELECT * FROM myOracleView WHERE EMPLOYEE_NUMBER='" & strEE & "'"
Dim myOracleCommand As New OracleCommand(myInsertQuery)
myOracleCommand.Connection = oOracleConn
oOracleConn.Open()
dataReader = myOracleCommand.ExecuteReader()
If dataReader.Read() = True Then
lblEmployeeLastName.text=dataReader("EMPLOYEE_LAST_NAME").ToString()
lblEmployeeFirstName.text=dataReader("EMPLOYEE_FIRST_NAME").ToString()
lblMgrEmployeeID.text=dataReader("SUPERVISOR_ID").ToString()
lblMgrLastName.text=dataReader("MANAGER_LAST_NAME").ToString()
lblMgrFirstName.text=dataReader("MANAGER_FIRST_NAME").ToString()
lblOrgCode.text=dataReader("DEPARTMENT").ToString()
lblOrgName.text=dataReader("DEPARTMENT_DESCRIPTION").ToString()
lblWorkLocationCity.Text=dataReader("WORK_LOCATION_CITY").ToString()
lblWorkLocationState.Text=dataReader("WORK_LOCATION_STATE").ToString()
lblAge.Text=dataReader("AGE")
lblDOB.Text=dataReader("BIRTHDATE")
lblEmployeeStatusCode.Text=dataReader("XE_STATUS_CD").ToString()
lblEmployeeStatusDesc.Text=dataReader("STATUS_DESCR").ToString()
lblEmployeeStatusEffDate.Text=FormatDateTime(dataReader("XE_ST_ENTRY_DT"), DateFormat.ShortDate)
lblJobCode.Text=dataReader("JOBCODE")
lblJobTitle.text=dataReader("JOB_DESCRIPTION").ToString()
HireDate=dataReader("ORIGINAL_HIRE_DT")
lblHireDate.text=HireDate.ToString("d")
lblYrsOfService.Text=dataReader("SERVICE_YEARS")
Select Case dataReader("ETHNIC_GRP_CODE").ToString()
Case "1"
lblEEO.text=("1 - White (Not of Hispanic Origin)")
Case "2"
lblEEO.text=("2 - Black (Not of Hispanic Origin)")
Case "3"
lblEEO.text=("3 - Hispanic")
Case "4"
lblEEO.text=("4 - Asian or Pacific Islander")
Case "5"
lblEEO.text=("5 - American Indian / Alaskan Native")
Case Else
End Select
Select Case dataReader("SEX_CODE").ToString()
Case "F"
lblGender.text=("Female")
Case "M"
lblGender.text=("Male")
Case Else
End Select
Select Case dataReader("EDUCATION_CD").ToString()
Case "1"
lblEducation.text=("Associates")
Case "2"
lblEducation.text=("Bachelors")
Case "3"
lblEducation.text=("Masters")
Case "4"
lblEducation.text=("Doctorate")
Case "A"
lblEducation.text=("1-2 Years")
Case "B"
lblEducation.text=("3-4 Years")
Case "C"
lblEducation.text=("Post Bach")
Case "D"
lblEducation.text=("Post Mast")
Case "E"
lblEducation.text=("Post Doct")
Case Else
End Select
Select Case dataReader("REFERRAL_SOURCE").ToString()
Case "AD"
lblReferralSource.text=("Advertisement")
Case "AG"
lblReferralSource.text=("N/A")
Case "AQ"
lblReferralSource.text=("Acquisition")
Case "CA"
lblReferralSource.text=("Career Center")
Case "CC"
lblReferralSource.text=("Contract Worker Conversion")
Case "CO"
lblReferralSource.text=("College Recruiting")
Case "CR"
lblReferralSource.text=("Corporate/Direct Recruiting")
Case "EA"
lblReferralSource.text=("Employment Agency")
Case "EE"
lblReferralSource.text=("Employee Referral")
Case "FE"
lblReferralSource.text=("Former Employee")
Case "IN"
lblReferralSource.text=("Internet Posting")
Case "JF"
lblReferralSource.text=("Job Fair")
Case "JP"
lblReferralSource.text=("Job Posting")
Case "OT"
lblReferralSource.text=("Other Source")
Case "US"
lblReferralSource.text=("Unsolicited")
Case "XR"
lblReferralSource.text=("Executive Referral")
Case "XS"
lblReferralSource.text=("Executive Search")
Case Else
End Select
dataReader.Close()
End If
oOracleConn.Close()
Page.Validate
End Sub