您的位置:首页 > Web前端 > HTML

如何点击按钮弹出新窗口,输入数据后返回并刷新页面?

2007-01-06 20:05 1211 查看
AutoEventWireup="false" Codebehind="WebForm1.aspx.vb"Inherits="ShowModalDialog.WebForm1" %><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML><HEAD><title>WebForm1</title><meta content="Microsoft Visual Studio .NET 7.0" name="GENERATOR"><meta content="Visual Basic 7.0" name="CODE_LANGUAGE"><meta content="JavaScript" name="vs_defaultClientScript"><meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema"></HEAD><body MS_POSITIONING="GridLayout"><div align="center"><form id="Form1" method="post" runat="server"><asp:label id="Label1" runat="server" Font-Bold="true">从当前页面打开新窗口,并把变量传递到新窗口的例子,可以多次打开提交。</asp:label><br><br><asp:textbox id="TextBox1" runat="server" Width="600px">这是初始值,将被传递到新窗口。</asp:textbox><br><br><asp:button id="Button1" runat="server" Text="打开窗口" Width="96px"></asp:button></form></div></body></HTML>WebForm1.aspx.vb

Public Class WebForm1Inherits System.Web.UI.PageProtected WithEvents TextBox1 As System.Web.UI.WebControls.TextBoxProtected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlFormProtected WithEvents Label1 As System.Web.UI.WebControls.LabelProtected WithEvents Button1 As System.Web.UI.WebControls.Button#Region " Web 窗体设计器生成的代码 "'该调用是 Web 窗体设计器所必需的。<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()End SubPrivate Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init'CODEGEN: 此方法调用是 Web 窗体设计器所必需的'不要使用代码编辑器修改它。InitializeComponent()End Sub#End RegionPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'在此处放置初始化页的用户代码If (Not IsClientScriptBlockRegistered("clientScript")) ThenDim strScript As String = "<script>" + vbCrLfstrScript += "function OpenWin(){" + vbCrLfstrScript += "var str=window.showModalDialog('WebForm2.aspx',document.Form1.TextBox1.value)" + vbCrLfstrScript += "if(str!=null) document.Form1.TextBox1.value=str" + vbCrLfstrScript += "}" + vbCrLfstrScript += "</script>" + vbCrLfRegisterClientScriptBlock("clientScript", strScript)End IfButton1.Attributes.Add("onclick", "OpenWin()")End SubEnd ClassWebForm2.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm2.aspx.vb" Inherits="aspxWeb.mengxianhui.com.WebForm2"%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML><HEAD><title>WebForm2</title><meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.0"><meta name="CODE_LANGUAGE" content="Visual Basic 7.0"><meta name="vs_defaultClientScript" content="JavaScript"><meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5"></HEAD><frameset rows="0,*"><frame src="about:blank"><frame src="WebForm3.aspx"></frameset></HTML>WebForm2.aspx.vbPublic Class WebForm2Inherits System.Web.UI.Page#Region " Web 窗体设计器生成的代码 "'该调用是 Web 窗体设计器所必需的。<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()End SubPrivate Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init'CODEGEN: 此方法调用是 Web 窗体设计器所必需的'不要使用代码编辑器修改它。InitializeComponent()End Sub#End RegionPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'在此处放置初始化页的用户代码End SubEnd ClassWebForm3.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm3.aspx.vb"Inherits="ShowModalDialog.WebForm3" %><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML><HEAD><title>WebForm3</title><meta name="GENERATOR" content="Microsoft Visual Studio .NET 7.0"><meta name="CODE_LANGUAGE" content="Visual Basic 7.0"><meta name="vs_defaultClientScript" content="JavaScript"><meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5"></HEAD><body MS_POSITIONING="GridLayout" id="MyBody" runat="server"><form id="Form1" method="post" runat="server"><asp:Label id="Label1" runat="server">请输入您的大名:</asp:Label><br><br><asp:TextBox id="TextBox1" runat="server" Width="558"></asp:TextBox><br><br><asp:Button id="Button1" runat="server" Text=" 提 交 "></asp:Button></form></body></HTML>WebForm3.aspx.vbPublic Class WebForm3Inherits System.Web.UI.PageProtected WithEvents TextBox1 As System.Web.UI.WebControls.TextBoxProtected WithEvents Label1 As System.Web.UI.WebControls.LabelProtected WithEvents Button1 As System.Web.UI.WebControls.ButtonProtected MyBody As System.Web.UI.HtmlControls.HtmlControl#Region " Web 窗体设计器生成的代码 "'该调用是 Web 窗体设计器所必需的。<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()End SubPrivate Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init'CODEGEN: 此方法调用是 Web 窗体设计器所必需的'不要使用代码编辑器修改它。InitializeComponent()End Sub#End RegionPrivate Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load'在此处放置初始化页的用户代码If IsPostBack ThenDim strScript As String = "<script>" + vbCrLfstrScript += "window.parent.returnValue='" + TextBox1.Text.Replace("'", "/'") + "'" + vbCrLfstrScript += "window.parent.close()" + vbCrLfstrScript += "</script>" + vbCrLfIf (Not IsClientScriptBlockRegistered("clientScript")) ThenRegisterClientScriptBlock("clientScript", strScript)End IfEnd IfIf Not IsPostBack ThenMyBody.Attributes.Add("onload", "document.Form1.TextBox1.value=window.parent.dialogArguments")End IfEnd SubEnd ClassshowModalDialog()、showModelessDialog()方法使用详解
Javascript有许多内建的方法来产生对话框,如:window.alert(), window.confirm(),window.prompt().等。 然而IE提供更多的方法支持对话框。如:  showModalDialog() (IE 4+ 支持)
  showModelessDialog() (IE 5+ 支持)

 window.showModalDialog()方法用来创建一个显示HTML内容的模态对话框,由于是对话框,因此它并没有一般用window.open()打开的窗口的所有属性。
 window.showModelessDialog()方法用来创建一个显示HTML内容的非模态对话框。

 当我们用showModelessDialog()打开窗口时,不必用window.close()去关闭它,当以非模态方式[IE5]打开时, 打开对话框的窗口仍可以进行其他的操作,即对话框不总是最上面的焦点,当打开它的窗口URL改变时,它自动关闭。而模态[IE4]方式的对话框始终有焦点(焦点不可移走,直到它关闭)。模态对话框和打开它的窗口相联系,因此我们打开另外的窗口时,他们的链接关系依然保存,并且隐藏在活动窗口的下面。

使用方法如下:
 vReturnValue = window.showModalDialog(sURL [, vArguments] [, sFeatures])
 vReturnValue = window.showModelessDialog(sURL [, vArguments] [, sFeatures])
参数说明:
 sURL
 必选参数,类型:字符串。用来指定对话框要显示的文档的URL。
 vArguments
 可选参数,类型:变体。用来向对话框传递参数。传递的参数类型不限,包括数组等。对话框通过window.dialogArguments来取得传递进来的参数。
 sFeatures
 可选参数,类型:字符串。用来描述对话框的外观等信息,可以使用以下的一个或几个,用分号“;”隔开。
  dialogHeight 对话框高度,不小于100px,IE4中dialogHeight 和 dialogWidth 默认的单位是em,而IE5中是px,为方便其见,在定义modal方式的对话框时,用px做单位。
   dialogWidth: 对话框宽度。
   dialogLeft: 距离桌面左的距离。
   dialogTop: 离桌面上的距离。
   center: {yes | no | 1 | 0 }:窗口是否居中,默认yes,但仍可以指定高度和宽度。
   help: {yes | no | 1 | 0 }:是否显示帮助按钮,默认yes。
   resizable: {yes | no | 1 | 0 } [IE5+]:是否可被改变大小。默认no。
   status: {yes | no | 1 | 0 } [IE5+]:是否显示状态栏。默认为yes[ Modeless]或no[Modal]。
  scroll:{ yes | no | 1 | 0 | on | off }:指明对话框是否显示滚动条。默认为yes。

  还有几个属性是用在HTA中的,在一般的网页中一般不使用。
  dialogHide:{ yes | no | 1 | 0 | on | off }:在打印或者打印预览时对话框是否隐藏。默认为no。
  edge:{ sunken | raised }:指明对话框的边框样式。默认为raised。
  unadorned:{ yes | no | 1 | 0 | on | off }:默认为no。

 传入参数:
 要想对话框传递参数,是通过vArguments来进行传递的。类型不限制,对于字符串类型,最大为4096个字符。也可以传递对象,例如:

 test1.htm
 ====================
 <script>
  var mxh1 = new Array("mxh","net_lover","孟子E章")
  var mxh2 = window.open("about:blank","window_mxh")
  // 向对话框传递数组
  window.showModalDialog("test2.htm",mxh1)
  // 向对话框传递window对象
  window.showModalDialog("test3.htm",mxh2)
 </script>

 test2.htm
 ====================
 <script>
  var a = window.dialogArguments
  alert("您传递的参数为:" + a)
 </script>

 test3.htm
 ====================
 <script>
  var a = window.dialogArguments
  alert("您传递的参数为window对象,名称:" + a.name)
 </script>

 可以通过window.returnValue向打开对话框的窗口返回信息,当然也可以是对象。例如:

 test4.htm
 ===================
 <script>
  var a = window.showModalDialog("test5.htm")
  for(i=0;i<a.length;i++) alert(a[i])
 </script>

 test5.htm
 ===================
 <script>
 function sendTo()
 {
  var a=new Array("a","b")
  window.returnValue = a
  window.close()
 }
 </script>
 <body>
 <form>
  <input value="返回" type=button onclick="sendTo()">
 </form>

 常见问题:
 1,如何在模态对话框中进行提交而不新开窗口?
 如果你 的 浏览器是IE5.5+,可以在对话框中使用带name属性的iframe,提交时可以制定target为该iframe的name。对于IE4+,你可以用高度为0的frame来作:例子,

 test6.htm
 ===================
 <script>
  window.showModalDialog("test7.htm")
 </script>

 test7.htm
 ===================
 if(window.location.search) alert(window.location.search)
 <frameset rows="0,*">
  <frame src="about:blank">
  <frame src="test8.htm">
 </frameset>

 test8.htm
 ===================
 <form target="_self" method="get">
 <input name=txt value="test">
 <input type=submit>
 </form>
 <script>
 if(window.location.search) alert(window.location.search)
 </script>
 2,可以通过http://servername/virtualdirname/test.htm?name=mxh方式直接向对话框传递参数吗?
 答案是不能。但在frame里是可以的。

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=1475727
[收藏到我的网摘]   lne818发表于 2007年01月06日 16:21:43

相关文章:
弹出对话框集合 2004-12-24 lvhuii

showModalDialog()、showModelessDialog()方法使用详解 2002-09-24 net_lover

showModalDialog()、showModelessDialog()方法使用详解 2005-07-11 tanruitian

模态窗口 2005-05-30 renyu732

如何点击按钮弹出新窗口,输入数据后返回并刷新页面?(转自孟子E章) 2006-04-23 jhtyt

 
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
相关文章推荐