
08/11/2008, 13:57
|
| | Fecha de Ingreso: octubre-2008
Mensajes: 42
Antigüedad: 16 años, 5 meses Puntos: 0 | |
Respuesta: Visual Basic .NET Hola, tengo varias dudas sobre esto, tanto de lo q pone Maxi como lo de Jose.
Vereis cuando hablais del nombre del formulario a q os referis? xq yo en mis páginas lo que tengo definido es una clase que suele ser el nobre de la página (excepto donde la necesito q justamente pone _Default como nombre de la clase) y dentro de esa clase ya cada boton o cosa que haya puesto.
Maxi:
Cuando pones
'Defines una variable que contendra el form que recive los datos
Dim recive as new formulario_que_recive
Bueno para Jose es la misma pregunta, aver form2 que es el nombre del formulario de donde lo sako xq ando un poko liada
en que página lo pones en la q envia los datos o en la q los recibe? y el nombre del formulario q sería el nombre de la clase de la pag q envia? xq knd lo pongo me da error...
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!!!
Última edición por beamm; 08/11/2008 a las 14:14 |