如何点击按钮弹出新窗口,输入数据后返回并刷新页面?
作者:孟宪会 出自:【孟宪会之精彩世界】 发布日期:2003年7月8日 4点0分13秒

在一些.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>

WebForm2.aspx.vb

Public Class WebForm2 Inherits System.Web.UI.Page #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 '在此处放置初始化页的用户代码 End Sub End Class

WebForm3.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.vb

Public Class WebForm3 Inherits System.Web.UI.Page Protected WithEvents TextBox1 As System.Web.UI.WebControls.TextBox Protected WithEvents Label1 As System.Web.UI.WebControls.Label Protected WithEvents Button1 As System.Web.UI.WebControls.Button Protected MyBody As System.Web.UI.HtmlControls.HtmlControl #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 IsPostBack Then Dim strScript As String = "<script>" + vbCrLf strScript += "window.parent.returnValue='" + TextBox1.Text.Replace("'", "\'") + "'" + vbCrLf strScript += "window.parent.close()" + vbCrLf strScript += "</script>" + vbCrLf If (Not IsClientScriptBlockRegistered("clientScript")) Then RegisterClientScriptBlock("clientScript", strScript) End If End If If Not IsPostBack Then MyBody.Attributes.Add("onload", "document.Form1.TextBox1.value=window.parent.dialogArguments") End If End Sub End Class
发表评论】 【打印文章】 【收藏文章
  关于本文的评论:为了保护您的电子邮件不被骚扰,地址中的个别符号转换成了全角字符!
评论人:况怀强 电子邮件:kuanghuaiqiang@hotmail.co 评论日期:2008年01月16日 04:58:46
大家好  有没有转换成C#的  麻烦发一份到我的邮箱 kuanghuaiqiang@hotmail.com  谢谢
评论人:况怀强 电子邮件:kuanghuaiqiang@hotmail.co 评论日期:2008年01月16日 04:53:30
大家好  有没有转换成C#的  麻烦发一份到我的邮箱 kuanghuaiqiang@hotmail.com  谢谢
评论人:友堂 电子邮件:youtown@126.com 评论日期:2007年12月14日 01:08:52
路过孟老大地盘,支持一下!

欢迎大家来友堂看看, http://www.youtown.cn
评论人:hl_8792 电子邮件:hl_8792@163.com 评论日期:2007年11月11日 08:16:13
真是佩服了, 困了我几天的东西在你这里 看到了!
谢谢 !!!!
顶!!顶!!
顶!!
顶!!
顶!!
评论人:refyl 电子邮件:refyl@163.com 评论日期:2007年09月09日 01:43:25
您申请成为asp.net版主的申请已经通过审核.

www.errmsg.cn 错误信息网.

致力于发现的解决编程和软件应用过程中的错误信息. 
评论人:bruce_wang 电子邮件:_xuanoscar@163.com 评论日期:2007年08月11日 06:12:59
编辑中这么加入下拉框?
评论人:Liter Chang 电子邮件:adminzjc@126.com 评论日期:2007年07月02日 10:31:01
班门弄斧:在.NET中合理利用HTML控件(添加个runat = "server"),结合javascript,可以实现意想不到的效果,在此例中就是这样!
评论人:Liter Chang 电子邮件:adminzjc@126.com 评论日期:2007年07月02日 10:20:58
借孟大哥的宝地发表一下小弟我对这个问题的解决方法,实现要点:
1.在*.aspx页面中实现
2.弹出窗口、载入数据、提交数据均在客户端完成(不发生一次页面回送操作,没回送的必要,这样速度快,节省服务器资源,减少错误几率)
3.提交后的数据可以采用.NET的常规方法写入数据库(<textarea id="TextArea1" cols="40" rows="20" runat = "server"></textarea>,多了个runat = "server",就可以采用TextArea1.Value的形式获取TextArea1的值了)
//调用页面代码
<%@ Page Language="VB" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<script runat="server">

</script>

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>无标题页</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <textarea id="TextArea1" cols="40" rows="20" runat = "server"></textarea><br />
        <input id="Button1" type="button" value="弹出窗口" onclick = "window.open(''Default2.aspx'',''sub'')" /></div>
    </form>
</body>
</html>

//弹出窗口代码
<%@ Page Language="VB" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<script language = "jscript" type = "text/javascript">
    function Submit_Value()
    {
      opener.document.forms[0].TextArea1.value = document.getElementById("TextArea2").value;
      window.close();
    }
    
    function Load_TextArea1_Value()
    {
      document.getElementById("TextArea2").value = opener.document.forms[0].TextArea1.value;
    }
</script>

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>无标题页</title>
</head>
<body onload = "Load_TextArea1_Value()">
    <form id="form1" runat="server">
    <div>
        <textarea id="TextArea2" cols="40" rows="20"></textarea><br />
        <input id="Button1" type="button" value="提交数据" onclick = " Submit_Value()" /></div>
    </form>
</body>
</html>
评论人: 电子邮件:hdh528@163.com 评论日期:2007年05月28日 03:56:16
asp.net 2.0中,我们一般新建一个页面时都会继续母版页,<base target="_self" />根本就没有地方写。难道写在母版页里?.....
评论人:wuqi_linux 电子邮件:wuqi_linux@hotmail.com\ 评论日期:2007年05月27日 02:40:32
  我在你的网站上看到了关于showModelDialog的说明。但是小弟的需求比你这个要复杂点。
  详细说明如下。
  
   father.aspx, child.aspx

   father.aspx中点 “添加”按钮,弹出child.aspx. 在child.aspx中填写完资料,点“提交”将数据提交给 数据库后 生成一个索引号,child.aspx要将这个索引号传递到 father.aspx页上的一个listbox上,而且father.aspx.cs中一个string变量中要保存这个 索引号,如何做?请孟兄指点。谢谢。

                                                         2007/05/27
评论人:tly 电子邮件:lanzhu1999@126.com 评论日期:2007年04月06日 03:55:10
这个代码我试过没错,不过,我也希望要一份C#的,VB的真的很难看懂,谢谢!:)
评论人:sevenseal 电子邮件:cn-net@hotmail.com 评论日期:2007年02月15日 07:30:52
showModalDialog和showModelessDialog使用心得

一、showModalDialog和showModelessDialog有什么不同?
  showModalDialog:被打开后就会始终保持输入焦点。除非对话框被关闭,否则用户无法切换到主窗口。类似alert的运行效果。
  showModelessDialog:被打开后,用户可以随机切换输入焦点。对主窗口没有任何影响(最多是被挡住一下而以。:P)

二、怎样才让在showModalDialog和showModelessDialog的超连接不弹出新窗口?
  在被打开的网页里加上<base target="_self">就可以了。这句话一般是放在<html>和<body>之间的。

三、怎样才刷新showModalDialog和showModelessDialog里的内容?
  在showModalDialog和showModelessDialog里是不能按F5刷新的,又不能弹出菜单。这个只能依靠javascript了,以下是相关代码:

<body onkeydown="if (event.keyCode==116){reload.click()}">
<a id="reload" href="filename.htm" style="display:none">reload...</a>

  将filename.htm替换成网页的名字然后将它放到你打开的网页里,按F5就可以刷新了,注意,这个要配合<base target="_self">使用,不然你按下F5会弹出新窗口的。

四、如何用javascript关掉showModalDialog(或showModelessDialog)打开的窗口。
  <input type="button" value="关闭" onclick="window.close()">
  也要配合<base target="_self">,不然会打开一个新的IE窗口,然后再关掉的。

五、showModalDialog和showModelessDialog数据传递技巧。
  (作者语:本来想用一问一答形式来写的,但是我想不出这个怎么问,所以只好这样了。)
  这个东西比较麻烦,我改了好几次了不是没办法说明白(语文水平越来越差了),只好用个例子说明了。
  例子:
    现在需要在一个showModalDialog(或showModelessDialog)里读取或设置一个变量var_name

      一般的传递方式:
        window.showModalDialog("filename.htm",var_name)
        //传递var_name变量
      在showModalDialog(或showModelessDialog)读取和设置时:
        alert(window.dialogArguments)//读取var_name变量
        window.dialogArguments="oyiboy"//设置var_name变量
    这种方式是可以满足的,但是当你想在操作var_name同时再操作第二个变理var_id时呢?就无法再进行操作了。这就是这种传递方式的局限性。
    
      以下是我建议使用的传递方式:
        window.showModalDialog("filename.htm",window)
        //不管要操作什么变量,只直传递主窗口的window对象
      在showModalDialog(或showModelessDialog)读取和设置时:
        alert(window.dialogArguments.var_name)//读取var_name变量
        window.dialogArguments.var_name="oyiboy"//设置var_name变量

        同时我也可以操作var_id变量
        alert(window.dialogArguments.var_id)//读取var_id变量
        window.dialogArguments.var_id="001"//设置var_id变量

        同样还可以对主窗口的任何对象进行操作,如form对象里的元素。
        window.dialogArguments.form1.index1.value="这是在设置index1元素的值"

六、多个showModelessDialog的相互操作。
  因为光说很费劲,我就偷点懒,直接用代码来说了,如果不明白的话那就直接来信(oyiboy#163.net(使用时请将#改成@))问我吧。

  以下代码的主要作用是在一个showModelessDialog里移动别一个showModelessDialog的位置。

  主文件的部份js代码。
  var s1=showModelessDialog(''控制.htm'',window,"dialogTop:1px;dialogLeft:1px") //打开控制窗口
  var s2=showModelessDialog(''about:blank'',window,"dialogTop:200px;dialogLeft:300px")  //打开被控制窗口

  控制.htm的部份代码。
  <script>
    //操作位置数据,因为窗口的位置数据是"xxxpx"方式的,所以需要这样的一个特殊操作函数。
 function countNumber(A_strNumber,A_strWhatdo)
 {
  A_strNumber=A_strNumber.replace(''px'','''')
  A_strNumber-=0
  switch(A_strWhatdo)
  {
  case "-":A_strNumber-=10;break;
  case "+":A_strNumber+=10;break;
  }
  return A_strNumber + "px"
 }
  </script>
  <input type="button" onclick="window.dialogArguments.s2.dialogTop=countNumber(window.dialogArguments.s2.dialogTop,''-'')" value="上移">
  <input type="button" onclick="window.dialogArguments.s2.dialogLeft=countNumber(window.dialogArguments.s2.dialogLeft,''-'')" value="左移">
  <input type="button" onclick="window.dialogArguments.s2.dialogLeft=countNumber(window.dialogArguments.s2.dialogLeft,''+'')" value="右移">
  <input type="button" onclick="window.dialogArguments.s2.dialogTop=countNumber(window.dialogArguments.s2.dialogTop,''+'')" value="下移">

  以上关键部份是:
    窗口命名方式:var s1=showModelessDialog(''控制.htm'',window,"dialogTop:1px;dialogLeft:1px")
    变量访问方式:window.dialogArguments.s2.dialogTop

  这个例子只是现实showModelessDialog与showModelessDialog之间的位置操作功能,通过这个原理,在showModelessDialog之间相互控制各自的显示页面,传递变量和数据等。这要看各位的发挥了。
评论人: 电子邮件: 评论日期:2007年02月07日 11:34:29
这个在VB。NET里面可以用代理来实现,方法很简单。。tuozi2008@sina.com
评论人:祥宝 电子邮件:mengxiang_1024@yahoo.com. 评论日期:2006年08月05日 01:48:04
看不懂.我是新手 .慢慢向大家学习了
评论人:adamxin 电子邮件:adam_xin@msn.com 评论日期:2006年07月27日 05:01:31
孟大哥
给个C#版嘛
评论人:lwb 电子邮件:yga111@163.com 评论日期:2006年07月07日 03:01:25
有没有C#版的啊,孟子大哥,给我一份c#代码,小弟十什么感谢
评论人:孟宪佳 电子邮件:jiameng2008@tom.com 评论日期:2006年06月20日 10:11:07
能提供C# 的源代码给我吗? 谢谢 ,我的Email 是  jiameng2008@tom.com
评论人:readbook8 电子邮件:lovyou@126.com 评论日期:2006年02月26日 07:44:06
借孟子老大的地发个广告!想知道鲁迅笔下小说《骆驼祥子》中的祥子老婆--虎妞是怎样死的吗?---->>读书吧!!!http://www.readbook8.com
评论人:hnszzyh 电子邮件:hnszzyh@163.com 评论日期:2006年02月03日 12:17:24
孟子大侠,我要实现点击datagrid中模板列中的一个ImageButton后,弹出一个模式窗口,代码如下:
private void dgd_OpenInfo_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
for(int i=0;i<dgd_OpenInfo.Items.Count;i++)
{   
string strKHDValue = dgd_OpenInfo.Items[i].Cells[0].Text.ToString();
((ImageButton)(dgd_OpenInfo.Items[i].FindControl("cmd_update"))).Attributes.Add("onclick","javascript:showModalDialog('ASOpenMessage.aspx?tag="+strKHDValue+"',window,'dialogwidth:450px;dialogheight:480px;help:0;center:yes;resizable:0;status:0;scroll:yes');return(false);");
}
}
这样就打开了一个模式窗口,我想在打开的窗口中,关闭本窗口,重新加载父窗口,代码如下:

 Response.Write("<script language=javascript>parent.window.opener=null;parent.window.dialogArguments.location.reload();window.close();</script>");
 这样的话,父窗口中的DataGrid如果不发生分页事件的话,刚好可以实现,是我想要的效果,
 但是,当父窗口中的DataGrid分页后,再打开子窗口,关闭子窗口,加载父窗口,网页会弹出一个对话框,“你正在查看的网页,正在刷新窗口.....",父窗口中的DataGrid不分页,就不会弹出这个对话框!
 为什么分页后就这样,急盼得到你的帮助!
  新年快乐!
评论人: 电子邮件:hnszzyh@163.com 评论日期:2006年02月03日 12:15:23
孟子大侠,我要实现点击datagrid中模板列中的一个ImageButton后,弹出一个模式窗口,代码如下:
private void dgd_OpenInfo_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
for(int i=0;i<dgd_OpenInfo.Items.Count;i++)
{   
string strKHDValue = dgd_OpenInfo.Items[i].Cells[0].Text.ToString();
((ImageButton)(dgd_OpenInfo.Items[i].FindControl("cmd_update"))).Attributes.Add("onclick","javascript:showModalDialog('ASOpenMessage.aspx?tag="+strKHDValue+"',window,'dialogwidth:450px;dialogheight:480px;help:0;center:yes;resizable:0;status:0;scroll:yes');return(false);");
}
}
这样就打开了一个模式窗口,我想在打开的窗口中,关闭本窗口,重新加载父窗口,代码如下:

 Response.Write("<script language=javascript>parent.window.opener=null;parent.window.dialogArguments.location.reload();window.close();</script>");
 这样的话,父窗口中的DataGrid如果不发生分页事件的话,刚好可以实现,是我想要的效果,
 但是,当父窗口中的DataGrid分页后,再打开子窗口,关闭子窗口,加载父窗口,网页会弹出一个对话框,“你正在查看的网页,正在刷新窗口.....",父窗口中的DataGrid不分页,就不会弹出这个对话框!
 为什么分页后就这样,急盼得到你的帮助!
  新年快乐!
评论人: 电子邮件:hnszzyh@163.com 评论日期:2006年02月03日 12:14:27
孟子大侠,我要实现点击datagrid中模板列中的一个ImageButton后,弹出一个模式窗口,代码如下:
private void dgd_OpenInfo_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
for(int i=0;i<dgd_OpenInfo.Items.Count;i++)
{   
string strKHDValue = dgd_OpenInfo.Items[i].Cells[0].Text.ToString();
((ImageButton)(dgd_OpenInfo.Items[i].FindControl("cmd_update"))).Attributes.Add("onclick","javascript:showModalDialog('ASOpenMessage.aspx?tag="+strKHDValue+"',window,'dialogwidth:450px;dialogheight:480px;help:0;center:yes;resizable:0;status:0;scroll:yes');return(false);");
}
}
这样就打开了一个模式窗口,我想在打开的窗口中,关闭本窗口,重新加载父窗口,代码如下:

 Response.Write("<script language=javascript>parent.window.opener=null;parent.window.dialogArguments.location.reload();window.close();</script>");
 这样的话,父窗口中的DataGrid如果不发生分页事件的话,刚好可以实现,是我想要的效果,
 但是,当父窗口中的DataGrid分页后,再打开子窗口,关闭子窗口,加载父窗口,网页会弹出一个对话框,“你正在查看的网页,正在刷新窗口.....",父窗口中的DataGrid不分页,就不会弹出这个对话框!
 为什么分页后就这样,急盼得到你的帮助!
  新年快乐!
评论人:guyfe 电子邮件:guyef*163.com 评论日期:2005年02月16日 12:56:49

不用js不可以吗,我也正为这个事情发愁呢,但是我知道使用response只能在当前窗口里打开,
孟老师,能不能再给个方法??
评论人:Sandy 电子邮件:chen_chun@topsec.com.cn 评论日期:2004年10月13日 10:30:50
有C#的代码吗?发邮件给我吧!谢谢!
评论人:huoqiming 电子邮件:huoqiming@sohu.com 评论日期:2004年09月09日 09:40:07
孟老师: 如何把子窗口中的值传到父窗口中用户控件中的文本框中?
评论人:大木鸟 电子邮件:aspx888@163.com 评论日期:2004年08月10日 02:55:41
vb.net好啊支持!
评论人: 电子邮件: 评论日期:2004年07月12日 10:04:04
private void Page_Load(object sender, System.EventArgs e)
{
// 在此处放置用户代码以初始化页面
string vbCrLf="\n";
if (IsPostBack)
{
string strScript= "<script>" + vbCrLf;
strScript += "window.parent.returnValue='" + TextBox1.Text.Replace("'", "\'") + "'" + vbCrLf;
strScript += "window.parent.close()" + vbCrLf;
strScript += "</script>" + vbCrLf;
if (! IsClientScriptBlockRegistered("clientScript")) 
RegisterClientScriptBlock("clientScript", strScript);

if (!IsPostBack)
MyBody.Attributes.Add("onload", "document.Form1.TextBox1.value=window.parent.dialogArguments");
}
}
评论人:九品 电子邮件: 评论日期:2004年07月12日 10:02:51

public class getpass : System.Web.UI.Page
{
protected System.Web.UI.WebControls.Label Label1;
protected System.Web.UI.WebControls.TextBox TextBox1;
protected System.Web.UI.WebControls.Button Button1;
protected System.Web.UI.WebControls.Button Button2;
protected System.Web.UI.HtmlControls.HtmlControl MyBody;

private void Page_Load(object sender, System.EventArgs e)
{
// 在此处放置用户代码以初始化页面
string vbCrLf="\n";
if (IsPostBack)
{
string strScript= "<script>" + vbCrLf;
strScript += "window.parent.returnValue='" + TextBox1.Text.Replace("'", "\'") + "'" + vbCrLf;
strScript += "window.parent.close()" + vbCrLf;
strScript += "</script>" + vbCrLf;
if (! IsClientScriptBlockRegistered("clientScript")) 
RegisterClientScriptBlock("clientScript", strScript);

if (!IsPostBack)
MyBody.Attributes.Add("onload", "document.Form1.TextBox1.value=window.parent.dialogArguments");
}
}
#region Web 窗体设计器生成的代码
override protected void OnInit(EventArgs e)
{
//
// CODEGEN: 该调用是 ASP.NET Web 窗体设计器所必需的。
//
InitializeComponent();
base.OnInit(e);
}

/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{    
this.Load += new System.EventHandler(this.Page_Load);

}
#endregion
}
评论人: 电子邮件: 评论日期:2004年07月10日 09:30:03
http://dotnet.aspx.cc/ShowDetail.aspx?id=49ML4AO8-5PB3-4KNY-NJZD-LJOIOXV4M1X4
评论人:hsb 电子邮件:hsb0307@msn.com 评论日期:2004年07月07日 04:49:38
谁成功使用过,我怎么点击WebForm3的Button1关不了这个弹出窗口,我写了如下代码:
Button1.Attributes.Add("onclick", "javascript:parent.close();");
或者
Button1.Attributes.Add("onclick", "javascript:close();");

也不行,不能返回值给WebForm1上的控件,请成功使用过的,给解决一下。
评论人:hsb 电子邮件:黑死病 评论日期:2004年07月07日 04:49:13
谁成功使用过,我怎么点击WebForm3的Button1关不了这个弹出窗口,我写了如下代码:
Button1.Attributes.Add("onclick", "javascript:parent.close();");
或者
Button1.Attributes.Add("onclick", "javascript:close();");

也不行,不能返回值给WebForm1上的控件,请成功使用过的,给解决一下。
评论人:gpyzy 电子邮件:gpyzy@hotmail.com 评论日期:2004年06月19日 01:49:10
 大力支持孟老大多多发布vb.net的代码:)
评论人:dulker 电子邮件:dulker@sina.com 评论日期:2004年06月16日 12:00:30
?好象VB的代码居多,C#的呢
评论人:czh 电子邮件:pzczhhw@163.com 评论日期:2004年06月06日 07:10:05
孟老师,能不能麻烦将这段程序的运行机制说一下?主要是页面之间的传递。
评论人:本站管理员 电子邮件: 评论日期:2004年05月27日 05:25:12
注意:<base target=_self>在IE5下无效。
评论人:本站管理员 电子邮件: 评论日期:2004年05月27日 05:24:31
注意:<base target="_self">在IE5下无效。
评论人:ssphoenix 电子邮件:s_phoenix@tom.com 评论日期:2004年04月02日 07:07:14
sorry,看见了.
评论人:ssphoenix 电子邮件:s_phoenix@tom.com 评论日期:2004年04月02日 07:05:24
有错吧?
Button1.Attributes.Add("onclick", "OpenWin()")
可是页面上并没有定义OpenWin()这个函数呀?
评论人:liuyu202 电子邮件:liuyu202@etang.com 评论日期:2004年03月29日 08:58:31
Inherits="aspxWeb.mengxianhui.com.WebForm2"
是什么?

WebForm2.aspx有错误!如下:
未能加载类型:"VbWebApp.Global"

VbWebApp为应用程序名称!

评论人:bruce_wang 电子邮件:bruce_wang@163.com 评论日期:2004年03月16日 11:17:59
我已经转为C#了。VB.Net转C#很容易的。vbCrLf = \n。
  发表评论(小于4000字) [注意:如果您输入电子邮件,将有利于您得到及时的回复。]【请勿发表国家法律不允许的言论,谢谢!!】
posted on 2008-01-24 15:47  洛阳~波  阅读(1987)  评论(0编辑  收藏  举报