Protected Sub Btn_Yes_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Btn_Yes.Click
        Dim aCookie As New HttpCookie("DeleteRecordYesNo")
        aCookie.Values("ConfDelete") = "Yes"
        aCookie.Expires = DateTime.Now.AddDays(1)
        Response.Cookies.Add(aCookie)

        Response.Write("<script language='javascript'> { window.Close();}</script>")
end sub