Variables globales

[beamm]

Como puedo pasar parametros entre formularios ?

En una página el usuario introduce una fecha y dos horas y la aplicación le lleva a una pagina donde le mostrará un listado de aulas libres, pero para hacer ese select necesito esos 3 datos que mete el usuario en la pag anterior, alguien me puede decir como pasarlos??


Por favor necesito una solución urgente... no se si me he explikado bien por si akaso pongo mi código.

EN la siguiente pagina meten la fecha, la hora inicio y la hora fin:

Imports System.Data
Imports System.Data.OleDb
Partial Class VerHorariosAulas
Inherits System.Web.UI.Page



Protected Sub aulasLibres_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles aulasLibres.Click

'Dim a As String = TextBox1.Text
'Dim esvalido As Boolean = IsDate(a)
'If esvalido Then
'Response.Write("XXXXXXX")
'sLibres.PostBackUrl = "~/AulasLibres.aspx"

'End If

End Sub

Protected Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
'Dim a As String = TextBox1.Text
'Session("a") = TextBox1.Text
End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim strconexion As String
Dim objconexion As OleDbConnection
Dim objcomando As OleDbDataAdapter
Dim objds, ob2 As New DataSet
Dim Inicio As New DataTable("Inicio")
Dim Fin As New DataTable("Fin")
strconexion = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Documents and Settings\Bea.BEA-095B12391FA\Mis documentos\Visual Studio 2005\WebSites\GestionAulas\App_Data\gestionaulas.m db"

objconexion = New OleDbConnection(strconexion)
objconexion.Open()
objcomando = New OleDbDataAdapter("select Inicio from FranHoraria", objconexion)
objcomando.Fill(objds, "Inicio")
Dim fila As DataRow
For Each fila In objds.Tables("Inicio").Rows
DropDownList1.Items.Add(fila(0))

Next


objcomando = New OleDbDataAdapter("select Fin from FranHoraria", objconexion)
objcomando.Fill(ob2, "Fin")
For Each fila In ob2.Tables("Fin").Rows
DropDownList2.Items.Add(fila(0))

Next
objconexion.Close()
End Sub
End Class




Y en la siguiente tengo que hacer un select pero usando los valores de la fecha y horas que el usuario ha metido anteriormente:


Imports System.Data
Imports System.Data.OleDb

Partial Class _Default

Inherits System.Web.UI.Page


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



Dim strconexion As String
Dim objconexion As OleDbConnection
Dim objcomando As OleDbDataAdapter
Dim objds As New DataSet
Dim Num As New DataTable("Num")

strconexion = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\Documents and Settings\Bea.BEA-095B12391FA\Mis documentos\Visual Studio 2005\WebSites\GestionAulas\App_Data\gestionaulas.m db"

objconexion = New OleDbConnection(strconexion)
objconexion.Open()
objcomando = New OleDbDataAdapter("select Num from Aula left outer join Reserva where exists( select NumClase from Reserva where ", objconexion)
objcomando.Fill(objds, "Num")
Dim fila As DataRow
For Each fila In objds.Tables("Num").Rows
DropDownList1.Items.Add(fila(0))

Next
objconexion.Close()

End Sub

Protected Sub DropDownList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList1.SelectedIndexChanged

End Sub

Protected Sub ReservarAula_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ReservarAula.Click

End Sub
End Class




Por favor ayudenme!!!