VB.NET WebForm1.aspx.vb Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If IsPostBack Then If Request.Form("__EVENTARGUMENT") = "ScriptCallBack" Then Server.Transfer("WebForm2.aspx", True)''''第二个参数指示是否保留页面的Form和QuerryString的值 End If End If End Sub
WebForm2.aspx.vb Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If Not Me.Context.Handler Is sender Then Response.Write(Request.Form("TextBox1")) End If End Sub