CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Esto Estaría Bien?

(1/4) > >>

Jess_Kapria:
Hola , pues os voy a poner un procedimiento que yo creo que está bien y unos amigos (estudiantes) que están estudiando visual me dicen que está bien que no saben:


--- Citar ---        Try
            Dim conexion As New OleDbConnection
            conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=bd.mdb"

            conexion.Open()

            adaptador = New OleDbDataAdapter("SELECT * FROM pelisAlquiladas", conexion)
            datos = New DataSet()
            adaptador.Fill(datos, "pelisAlquiladas")

            adaptador2 = New OleDbDataAdapter("SELECT * FROM facturas", conexion)
            datos = New DataSet()
            adaptador2.Fill(datos, "facturas")

            conexion.Close()

            Dim filas As DataRow
            For Each filas In datos.Tables("pelisAlquiladas").Rows
                MsgBox(filas.Item("cod_factura"))
            Next

        Catch ex As Exception
            MsgBox("ERROR AL CREAR FACTURAS")
            MsgBox(ex.Message)
        End Try

--- Fin de la cita ---

Hemos creado instanciado ya las variables que utilizamos ahí


--- Citar ---private conexion as oledbdataconnection
private adaptador,adaptador2 as oledbdataadapter
private datos as dataset

--- Fin de la cita ---

No quiero que me lo resuelvan y espero que no me echen la bronca, sólo quiero saber porque me da error (y con explicación please)

El error que me da es:


--- Citar ---Referencia a objeto no establecia como instancia del objeto

--- Fin de la cita ---

No lo entiendo XD

lencho:
A simple vista parece que esta bien.

en que parte de tu codigo te tira ese error ??

BYTE.

Cajami:
hola, no estoy seguro pero si ia hicistes una instancia del DataSet porque vuelves ha hacer de nuevo'? aunque no lo he probado o tiene que hacerce asi??, tambien puede ser porue el nombre de tu campo no es filas.Item("cod_factura"), en que linea como dice lencho te sale error?

JuanK:

--- Código: Text ---            conexion.Close()             Dim filas As DataRow            For Each filas In datos.Tables("pelisAlquiladas").Rows                MsgBox(filas.Item("cod_factura"))            Next 
Esta mal porque estas cerrando la conexion cuando aun necesitas acceder al DataSet.

Cajami:
hola, pero que tiene si el dataset ia tienes los datos de la tabla, ia no necesita que siga abierta la conexion, ia que el For Each está trabajando con los datos del DataSet

Navegación

[0] Índice de Mensajes

[#] Página Siguiente