您的位置：首页 > 其它

如何点击按钮弹出新窗口，输入数据后返回并刷新页面？(1)

2008-10-17 11:21 831 查看

在一些.NET论坛中有人经常会问：如何在页面中点击按钮打开新页面，输入数据，然后返回到初始页面并进行更新？要解决这个问题，应该弄清楚window.showModalDialog()的用法，本人在http://blog.csdn.net/net_lover/archive/2002/09/24/6910.aspx已经做过介绍。下面就用例子介绍如何在ASP.NET中实现这个功能。
本例子共3个页面，其中WebForm2.aspx是过渡页面，是为了防止提交时打开新页面。

WebForm1.aspx

<%@ Page Language="vb" 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 WebForm1

Inherits System.Web.UI.Page

Protected WithEvents TextBox1 As System.Web.UI.WebControls.TextBox

Protected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlForm

Protected WithEvents Label1 As System.Web.UI.WebControls.Label

Protected WithEvents Button1 As System.Web.UI.WebControls.Button

#Region " Web 窗体设计器生成的代码 "

'该调用是 Web 窗体设计器所必需的。

<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

End Sub

Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init

'CODEGEN: 此方法调用是 Web 窗体设计器所必需的

'不要使用代码编辑器修改它。

InitializeComponent()

End Sub

#End Region

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'在此处放置初始化页的用户代码

If (Not IsClientScriptBlockRegistered("clientScript")) Then

Dim strScript As String = "<script>" + vbCrLf

strScript += "function OpenWin(){" + vbCrLf

strScript += "var str=window.showModalDialog('WebForm2.aspx',document.Form1.TextBox1.value)" + vbCrLf

strScript += "if(str!=null) document.Form1.TextBox1.value=str" + vbCrLf

strScript += "}" + vbCrLf

strScript += "</script>" + vbCrLf

RegisterClientScriptBlock("clientScript", strScript)

End If

Button1.Attributes.Add("onclick", "OpenWin()")

End Sub

End Class

WebForm2.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>

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签：

相关文章推荐

新的分享

章节导航