您的位置:首页 > 编程语言 > ASP

asp.net 子页面使用js给ReadOnly的TextBox赋值

2016-11-30 11:28 309 查看
主页面



前台代码:

<head runat="server">
<title>js给只读文本框赋值</title>
<script type="text/javascript" >
function GetInfo()
{
document.getElementById('Button1').click();
}
//禁用Enter键表单自动提交
document.onkeydown = function(event)
{
var target, code, tag;
if (!event)
{
event = window.event; //针对ie浏览器
target = event.srcElement;
code = event.keyCode;
if (code == 13)
{
tag = target.tagName;
if (tag == "TEXTAREA") { return true; }
else { return false; }
}
}
else
{
target = event.target; //针对遵循w3c标准的浏览器,如Firefox
code = event.keyCode;
if (code == 13)
{
tag = target.tagName;
if (tag == "INPUT") { return false; }
else { return true; }
}
}
};
</script>
<base target="_self" />
</head>
<body>
<form id="form1" runat="server">
<div>
<table >
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label1" runat ="server" Text ="文本框:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox1" runat ="server" onkeydown="if(event.which || event.keyCode){if ((event.which == 13) || (event.keyCode == 13) || (event.which == 9) || (event.keyCode == 9)) {GetInfo();return false;}} else {return true};"></asp:TextBox>
<asp:Button ID="Button1" runat ="server" Text ="打开子页面" />
</td>
</tr>
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label2" runat ="server" Text ="显示结果文本框:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox2" runat ="server"></asp:TextBox>
</td>
</tr>
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label3" runat ="server" Text ="ReadOnly文本框:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox3" runat ="server"></asp:TextBox>
</td>
</tr>
</table>
</div>
</form>
</body>

后台代码

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then

Me.TextBox2.Text = ""

Me.TextBox3.Text = ""
Me.TextBox3.BackColor = Drawing.Color.LightGray
Me.TextBox3.Attributes.Add("readonly", "readonly")
End If
End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim script As New StringBuilder
Try
script.Append("var myValue")
script.Append("=window.showModalDialog('tb01_01_1.aspx?Key=" + Me.TextBox1.Text + "','','dialogWidth=750px;dialogHeight=400px;');")
script.Append("if(myValue!='' &&  myValue!=undefined)")
script.Append("{")

script.Append("document.getElementById('" + Me.TextBox2.ClientID + "').value=myValue.split('^')[0];")

script.Append("document.getElementById('" + Me.TextBox3.ClientID + "').value=myValue.split('^')[1];")

script.Append("}")

Page.ClientScript.RegisterStartupScript(Me.GetType, "msg", "<script language='javascript'>" + script.ToString + "</script>")

Catch ex As Exception

End Try

End Sub


子页面



前台代码

<head runat="server">
<title>无标题页</title>

<base target="_self" />
</head>
<body>
<form id="form1" runat="server">
<div>
<table >
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label1" runat ="server" Text ="传入值:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox1" runat ="server" ></asp:TextBox>
</td>
</tr>
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label2" runat ="server" Text ="返回值1:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox2" runat ="server"></asp:TextBox>
</td>
</tr>
<tr>
<td align ="right" style ="width :10%">
<asp:Label ID ="Label3" runat ="server" Text ="返回值2:"></asp:Label>
</td>
<td>
<asp:TextBox ID ="TextBox3" runat ="server" ></asp:TextBox>
</td>
</tr>
<tr>
<td colspan ="2">
<asp:Button ID="Button1" runat ="server" Text ="返回" />
</td>
</tr>
</table>
</div>
</form>
</body>

后台代码

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
Me.TextBox1.Text = Request.QueryString("Key").ToString
End If
End Sub

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim returnValue As New StringBuilder

returnValue.Append(Me.TextBox2.Text.Replace(" ", ""))
returnValue.Append("^")
returnValue.Append(Me.TextBox3.Text.Replace(" ", ""))

Me.Page.ClientScript.RegisterStartupScript(Me.GetType, "msg", "<script language='javascript'>window.returnValue='" + returnValue.ToString + "';window.opener=null;window.close();</script>")

End Sub

页面效果图

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