zl程序教程

您现在的位置是:首页 >  其它

当前栏目

如何传值在2个页面之间要求不刷新父页面,并且不能用Querystring传值

如何 页面 不能 之间 刷新 要求 传值 并且
2023-06-13 09:14:07 时间
例子:
以下是父页的Html代码
<%@PageLanguage="vb"AutoEventWireup="false"Codebehind="main.aspx.vb"Inherits="zero.main"%>
<!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML4.0Transitional//EN">
<HTML>
<HEAD>
<title>main</title>
<metaname="GENERATOR"content="MicrosoftVisualStudio.NET7.1">
<metaname="CODE_LANGUAGE"content="VisualBasic.NET7.1">
<metaname="vs_defaultClientScript"content="JavaScript">
<metaname="vs_targetSchema"content="http://schemas.microsoft.com/intellisense/ie5">
<scriptlanguage="javascript"charset="gb2312">
functionsearchvalue()
{
varsql="select*fromcompanyjob";
SetCookie("SendSql",sql);
varurl="child.aspx";
window.open(url,"_blank");
}
functionSetCookie(name,value)
{
document.cookie=name+"="+value;
}
</script>
</HEAD>
<bodyMS_POSITIONING="GridLayout">
<formid="Form1"method="post"runat="server">
<INPUTid="Hidden1"style="Z-INDEX:101;LEFT:8px;POSITION:absolute;TOP:8px"type="hidden"
name="Hidden1"runat="server"><INPUTstyle="Z-INDEX:102;LEFT:96px;POSITION:absolute;TOP:144px"type="button"onclick="searchvalue();"
value="Open"id="Button1"name="Button1">
<asp:Buttonid="Button2"style="Z-INDEX:103;LEFT:256px;POSITION:absolute;TOP:152px"runat="server"
Text="Button"></asp:Button>
</form>
</body>
</HTML>
child页[子页]
<%@PageLanguage="vb"AutoEventWireup="false"Codebehind="child.aspx.vb"Inherits="zero.child"%>
<!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML4.0Transitional//EN">
<HTML>
<HEAD>
<title>child</title>
<metaname="GENERATOR"content="MicrosoftVisualStudio.NET7.1">
<metaname="CODE_LANGUAGE"content="VisualBasic.NET7.1">
<metaname="vs_defaultClientScript"content="JavaScript">
<metaname="vs_targetSchema"content="http://schemas.microsoft.com/intellisense/ie5">
<scriptlanguage=javascript>
functiongetv()
{
alert(document.forms("Hidden1"));
document.all("Hidden1").value=document.forms("Hidden1");
}
</script>
</HEAD>
<bodyMS_POSITIONING="GridLayout">
<formid="Form1"method="post"runat="server">
<INPUTstyle="Z-INDEX:101;LEFT:8px;POSITION:absolute;TOP:8px"type="hidden"id="Hidden1"
name="Hidden1"runat="server"></FONT>
</form>
</body>
</HTML>
.vb文件
IfNotIsPostBackThen
"Response.Write(Request.Form("Hidden1"))
DimcookieAsHttpCookie=Request.Cookies("SendSql")
IfNotcookieIsNothingThen
Response.Write(cookie.Value)
EndIf
EndIf
2。是思归大哥介绍的方法
在父页中加入一个非runat=server的form表单,用来提交隐藏控件的值到子页
<formmethod="post"target="_blank"id="form2">
<inputtype=hiddenname="query">
</form>
<scriptlanguage="javascript">
functionsearchvalue()
{
varsql="select*fromcompanyjob";
document.all.form2.query.value=sql;
document.all.form2.action="child.aspx";
document.all.form2.submit();
}
</script>
子页的后台代码中(.vb)
在Page_Load事件中写
Response.Write(Request.Form("query"))