Ver Mensaje Individual
  #1 (permalink)  
Antiguo 13/09/2006, 05:24
Avatar de SuperPinwi
SuperPinwi
 
Fecha de Ingreso: septiembre-2005
Mensajes: 317
Antigüedad: 19 años, 6 meses
Puntos: 1
Excepción InvalidCast al Insertar en BD's de Access

Hola compañer@s!

Tengo un problemilla al insertar en una base de datos access. Este problema consiste básicamente en que salta una excepción que no me permite insertarlos.

La excepción que salta es System.InvalidCastException y salta en la línea objAcciones.ExecuteNonQuery()

Os pego un fragmento del código por si sirve de algo,
Código:
Try
            objConn.Open()
            objAdapter = New OleDbDataAdapter("SELECT * FROM Actores ORDER BY IdActor", objConn)
            dt = New DataTable
            objAdapter.Fill(dt)
            n = dt.Rows.Count
            objAcciones.CommandText = "CREATE TABLE Tiempos " & "(Id INTEGER IDENTITY PRIMARY KEY, TiempoNombres INTEGER, TiempoIdentificadores INTEGER)"
            objAcciones.ExecuteNonQuery()
            If n = 0 Then
                MessageBox.Show("No se ha encontrado ningún registro que coincida con la selección")
            Else
                For i = 0 To n - 1
                    'Asignar a las variables el contenido del registro
                    tGetTimer.StartTimer()
                    sIdActor = dt.Rows(i)("IdActor").ToString
                    sNombre = dt.Rows(i)("Nombre").ToString
                    sCodPelicula = dt.Rows(i)("CodPelicula").ToString
                    tGetTimer.StopTimer()
                    sTiempo = tGetTimer.ElapsedTime.ToString
                    objAcciones.CommandText = "INSERT INTO Tiempos (TiempoNombres) VALUES (sTiempo)"
                    objAcciones.ExecuteNonQuery()
                Next
            End If
        Catch ex As Exception
            MessageBox.Show(ex, "aviso")
            'MessageBox.Show("El proceso ha terminado en un estado impreciso", "Aviso")
        End Try

¿alguien ve dónde está el error?
Muchas gracias por la ayuda y disculpad las molestias!