Here is the code from the button click from the first form to open the
second form.
Private Sub BTNSlctMvFrm_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles BTNSlctMvFrm.Click
Dim str As String = "<script language
=javascript>{window.open('userselectionform.aspx?formname1=Form1.TBXMvFr
mRm&formname2=Form1.TBXMvFrmFlr&formname3=Form1.TBXMvFrmBldg&formname4=F
orm1.TBXMvFrmSt&formname5=Form1.TBXMvFrmLNm&formname6=Form1.TBXMvFrmFNm'
,"
str += " 'UserSelection','menubar=no,resizable=no,
toolbar=no,scrollbars=no,top=100,left=300,height=400,width=300');}</scri
pt>"
RegisterStartupScript("adf", str)
End Sub
Here is the code from the button click on the second form to close it
and post the info back to fields on the first.
Private Sub BtnCnfmMv_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles BtnCnfmMv.Click
Try
Dim Str As String = "<script language=""javascript"">"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname1") & ".value = '" &
DDLRm.SelectedValue & "';"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname2") & ".value = '" &
DDLFlr.SelectedValue & "';"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname3") & ".value = '" &
DDLBldg.SelectedValue & "';"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname4") & ".value = '" &
DDLSite.SelectedValue & "';"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname5") & ".value = '" &
Trim(DDLMvNm.SelectedValue.Substring(0,
DDLMvNm.SelectedValue.IndexOf(","))) & "';"
Str = Str & "window.opener." &
HttpContext.Current.Request.QueryString("formname6") & ".value = '" &
Trim(DDLMvNm.SelectedValue.Substring(DDLMvNm.SelectedValue.IndexOf(",")
+ 2)) & "';window.close();"
Str = Str & "</script>"
LiteralRm.Text = Str
Catch ex As Exception
Response.Write(ex.Message)
End Try
End Sub
I want to be able to open ANOTHER window from the second window, if
nothing more than to place a graphic box on it and show a graphic. Help
please.
Evan Kontos | (e-mail address removed)
27 Whitehall St. | 3rd Floor | New York, NY 10004
Tel 212.480.8166 | Fax 212.480.8167 | Personal Fax 786.513.0295
www.comtekcadd.com