There is no row at position 0. (Deployed on IIS)

Question

Hi guys can you help me on this one, I'm only having this error when my site is deployed on IIS

Source Error:

An unhandled exception was generated during the execution of the current web request. Information regarding the origin and location of the exception can be identified using the exception stack trace below.

Stack Trace:

[IndexOutOfRangeException: There is no row at position 0.]    

System.Data.RBTree`1.GetNodeByIndex(Int32 userIndex) +1556386    

System.Data.DataRowCollection.get_Item(Int32 index) +20    

HRMS.Index.Page_Load(Object sender, EventArgs e) in 

C:\Users\orculloj\Desktop\New folder (2)\HRMS\HRMS\Index.aspx.vb:83    

System.Web.UI.Control.OnLoad(EventArgs e) +92    

System.Web.UI.Control.LoadRecursive() +54    

System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, 

Boolean includeStagesAfterAsyncPoint) +772 

 

HERE IS MY PAGE_LOAD CODE:

 

 

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim DomainUser As String = System.Web.HttpContext.Current.User.Identity.Name.Replace("\", "/")
        'Dim DomainUser As String = System.Security.Principal.WindowsIdentity.GetCurrent.Name.Replace("\", "/")

        Dim sUser() As String = Split(DomainUser, "/")
        Dim sUserId As String = ""
        'Dim sDomain As String = sUser(0)
        If DomainUser <> "" Then
            sUserId = sUser(1)
        End If

        pubUser = sUserId

        'pubUser = "ricerrae"

        userID.Text = pubUser

        'UpdateUserStatusTemp()

        GetEmpInfo()
        LastLeave()
        PopulateHolidays(Val(lblMonth.Text))

        If Not Page.IsPostBack Then
            If dtEmp.Rows.Count > 0 Then
                employeeID = dtEmp.Rows(0)("EmpID")
                employeeName = dtEmp.Rows(0)("EmpName")
                employeeSupervisor = dtEmp.Rows(0)("MngrName")
                employeeDepartment = dtEmp.Rows(0)("LOBDesc")
                employeeLocation = dtEmp.Rows(0)("Location")
                employeeDoj = CDate(dtEmp.Rows(0)("DateJoined")).ToString("MMMM dd, yyyy")
                employeeApprover = dtEmp.Rows(0)("MngrName")

                empID.Text = employeeID
                empName.Text = employeeName
                supervisor.Text = employeeSupervisor
                dept.Text = employeeDepartment
                doj.Text = employeeDoj
                approver.Text = employeeApprover
            End If

            PopulateHolidays(Today.Month)

            If dtHoliday_reg.Rows.Count > 0 Then
                lblMonth.Text = Today.Month

                lblLeaveBal.Text = IIf(IsDBNull(dtEmp.Rows(0)("LeaveBal")), "00", dtEmp.Rows(0)("leaveBal"))

            End If

            If dtChkLeave.Rows.Count > 0 Then
                lblLastLeave.Text = dtChkLeave.Rows(0)("LastLeave")
            End If

        End If
    End Sub

 

PS: as you would notice, my code is in vb and i know this is a c# forum, so ill just convert my code or your answer. THANKS