The gridview in the popup displaying.but it's not filling by data (month, salary) .... ? ! ! ! I'm editing the code

Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ButSchedule.Click
       Dim ds As New DataSet
      Dim dt As New DataTable
      Dim x As Double
      Dim y As Double
      Dim z As Double
      If txtFrom.Text = "" Then
          x = 0
      Else
          x = txtFrom.Text
      End If
      If txtTo.Text = "" Then
          y = 0
      Else
          y = txtTo.Text
      End If
      If TextBox3.Text = "" Then
          z = 0
      Else
          z = TextBox3.Text
      End If
      Session("LoadData") = ds.Tables("tabel1")
      Session("fromMonth") = x
      Session("toMonth") = y
      ' Dim SUMSALARY As Integer
      Session("SUMSALARY") = (z / (y - x + 1))
      ButSchedule.Attributes.Add("onclick", "window.open('salaryAA.aspx','','location=0,resizable=1,ScrollBars=1,statusbar=1,width=400,height=300,left=20,top=10,moveable=0') ;return false")

  End Sub

Sub sorting()
         Dim dt As New DataTable
        dt.Columns.Add(New DataColumn("Month", GetType(Integer)))
        dt.Columns.Add(New DataColumn("Salary", GetType(Double)))

        For i = Session("fromMonth") To Session("toMonth")
            Dim drr As DataRow = dt.NewRow()
            drr("Month") = i
            drr("Salary") = Session("SUMSALARY")
            dt.Rows.Add(drr)
        Next
        Session("LoadData") = dt
        dt.AcceptChanges()
        GridView1.DataSource = dt
   
    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            sorting()
        End If
    End Sub
<pre>