ASP.NET跨页面传值技巧（VB.NET篇）

关于页面传值的方法，引发了很多讨论。看来有很多人关注这个，我就我个人观点做了些总结，希望对大家有所帮助。

1.  使用QueryString变量

QueryString是一种非常简单的传值方式，他可以将传送的值显示在浏览器的地址栏中。如果是传递一个或多个安全性要求不高或是结构简单的数值时，可以使用这个方法。但是对于传递数组或对象的话，就不能用这个方法了。下面是一个例子：

a.aspx的VB.NET代码

Private    Sub  Button1_Click( ByVal  sender  As   Object ,  ByVal  e  As  System.EventArgs)
     Dim  s_url  As   String
    s_url  =   " b.aspx?name= "   +  Label1.Text
    Response.Redirect(s_url)
End Sub

b.aspx中VB.NET代码

Private    Sub  Page_Load( ByVal  sender  As   Object ,  ByVal  e  As  EventArgs)
    Label2.Text  =  Request.QueryString( " name " )
End Sub

2.  使用Application 对象变量

Application对象的作用范围是整个全局，也就是说对所有用户都有效。其常用的方法用Lock和UnLock。

a.aspx的VB.NET代码

Private    Sub  Button1_Click( ByVal  sender  As   Object ,  ByVal  e  As  System.EventArgs)
    Application( " name " )  =  Label1.Text
    Server.Transfer( " b.aspx " )
End Sub

b.aspx中VB.NET代码

Private    Sub  Page_Load( ByVal  sender  As   Object ,  ByVal  e  As  EventArgs)
     Dim  name  As   String
    Application.Lock()
    name  =  Application( " name " ).ToString()
    Application.UnLock()
End Sub

3.  使用Session变量

想必这个肯定是大家使用中最常见的用法了，其操作与Application类似，作用于用户个人，所以，过量的存储会导致服务器内存资源的耗尽。

a.aspx的VB.NET代码

Private    Sub  Button1_Click( ByVal  sender  As   Object ,  ByVal  e  As  System.EventArgs)
    Session( " name " )  =  Label.Text
End Sub

b.aspx中VB.NET代码

Private    Sub  Page_Load( ByVal  sender  As   Object ,  ByVal  e  As  EventArgs)
     Dim  name  As   String
    name  =  Session( " name " ).ToString()
End Sub

4.  使用Cookie对象变量

这个也是大家常使用的方法，与Session一样，其是什对每一个用户而言的，但是有个本质的区别，即Cookie是存放在客户端的，而session是存放在服务器端的。而且Cookie的使用要配合ASP.NET内置对象Request来使用。

a.aspx的VB.NET代码

Private    Sub  Button1_Click( ByVal  sender  As   Object ,  ByVal  e  As  System.EventArgs)
     Dim  cookie_name  As  HttpCookie  =    New  HttpCookie( " name " ) 
    cookie_name.Value  =  Label1.Text
    Reponse.AppendCookie(cookie_name)
    Server.Transfer( " b.aspx " )
End Sub

b.aspx中VB.NET代码

Private    Sub  Page_Load( ByVal  sender  As   Object ,  ByVal  e  As  EventArgs)
     Dim  name  As   String
    name  =  Request.Cookie( " name " ).Value.ToString()
End Sub

5.  使用Server.Transfer方法

这个才可以说是面象对象开发所使用的方法，其使用Server.Transfer方法把流程从当前页面引导到另一个页面中，新的页面使用前一个页面的应答流，所以这个方法是完全面象对象的，简洁有效。

a.aspx的VB.NET代码

Public   ReadOnly   Property  Name()  As   String
     Get  
          Return  Label1.Text
     End   Get
End Property
Private    Sub  Button1_Click( ByVal  sender  As   Object ,  ByVal  e  As  System.EventArgs)
    Server.Transfer( " b.aspx " )
End Sub

b.aspx中VB.NET代码

Private    Sub  Page_Load( ByVal  sender  As   Object ,  ByVal  e  As  EventArgs)
     Dim  NewWeb  As  a     ' 实例a窗体
    NewWeb  =   CType (Context.Handler, source)
     Dim  name  As   String
    name  =  NewWeb.Name
End Sub