网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 大学论文导航 设计下载 最新论文 下载排行 原创论文 论文源代码
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > ASP.net > 正文

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

来源:http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12

作者:孟宪会 

出自:【孟宪会之精彩世界】

在一些.net论坛中有人经常会问:如何在页面中点击按钮打开新页面,
输入数据,然后返回到初始页面并进行更新?要解决这个问题,
应该弄清楚window.showModalDialog()的用法,本人在http://www.csdn.net/Develop/read_article.asp?id=15113
已经做过介绍。下面就用例子介绍如何在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.show

网学推荐

免费论文

原创论文

设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号