子画面から親画面をサブミット

環境/言語:[VB.NET]
分類:[ASP.NET]

ASP.NETで開発しています。
親画面、子画面があって子画面のOKボタンが押されたら
子画面の情報をセッションに入れ、親画面をサブミットし子画面を閉じる、サブミットされた親画面で子画面でセットしたセッションを参照すると言うことをやりたいのですがなかなかうまくいきません。
今は下記のように書いてるんですが、子画面の情報をセッションに入れる前に親画面がサブミットされてしまい、親画面で子画面でセットしたセッションを参照することができません。

Private Sub Page_Load()

btn_btn_Ok.Attributes("OnClick") = "shori();" ←この中のJSで親画面サブミット、子画面クローズ処理

end Sub

Private Sub btn_Ok_Click()

'子画面の情報をセッションにセット
Session("Message") = strTest

End Sub

Page_LoadでCLOSEの処理を入れないで
ボタンを押したときにCLOSEのJAVASCRIPTを作ってあげたらいいのでは

Private Sub btn_Ok_Click()

'子画面の情報をセッションにセット
Session("Message") = strTest


'''Windowを閉じるJavaScript
Dim strScript As New System.Text.StringBuilder

With strScript
.Append("<script language=javascript>")
.Append("window.close();")
.Append("</sc" & "ript>")
End With
Response.Write(strScript.ToString)


End Sub