Ver Mensaje Individual
  #1 (permalink)  
Antiguo 07/03/2012, 11:35
betojasso
 
Fecha de Ingreso: marzo-2012
Mensajes: 11
Antigüedad: 12 años, 2 meses
Puntos: 0
Información Actualizar Base de Datos con Archivo Excel

Buenos Dias:
tengo un pequeño problema estoy tratando de actualizar una bases de datos, con un archivo excel, esto con la finalidad de hacer una carga masiva de datos capturados en una hoja de excel la cual ya cuanta con una estructura igual a la de la base de datos, lo mas que me acerque a esto es lo siguiente:

Public Sub ActualizarBDSTD()

Try


Using objOleConnection = New OleDbConnection( _
"Provider=PervasiveOLEDB;Data Source=PFWENTARI;Location=10.27.17.33;")
objOleConnection.Open()

Dim query As String = "INSERT INTO PLFRCSTD(Itemkey,Locationkey,Forecastkey,Forecastd ate,Forecastqty,Recuresid,Recdate,Rectime) VALUES (@Itemkey,@Locationkey,@Forecastkey,@Forecastdate, @Forecastqty,@Recuresid,@Recdate,@Rectime)"
Dim cmd As New OleDbCommand(query, objOleConnection)

For Each row As DataGridViewRow In frmCargaDG.DGE1.Rows
cmd.Parameters.Clear()

cmd.Parameters.AddWithValue("@ItemKey", CStr(row.Cells("ItemKey").Value))
cmd.Parameters.AddWithValue("@Locationkey", CStr(row.Cells("Locationkey").Value))
cmd.Parameters.AddWithValue("@Forecastkey", CStr(row.Cells("Forecastkey").Value))
cmd.Parameters.AddWithValue("@Forecastdate", CDate(row.Cells("Forecastdate").Value))
cmd.Parameters.AddWithValue("@Forecastqty", CDbl(row.Cells("Forecastqty").Value))
cmd.Parameters.AddWithValue("@ItemKey", CStr(row.Cells("ItemKey").Value))
cmd.Parameters.AddWithValue("@Recuserid", CStr(row.Cells("Recuserid").Value))
cmd.Parameters.AddWithValue("@Recdate", CStr(row.Cells("Recdate").Value))
cmd.Parameters.AddWithValue("@Rectime", CDate(row.Cells("Rectime").Value))

cmd.ExecuteNonQuery()
Next
End Using
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

pero me arroja el siguiente error...
intento de leer o escribir en la memoria protegida. A menudo, esto indica que hay otra memoria dañada.

ya no se como hacerle para lograr este proyecto si alguien tiene un codigo que me pueda servir se los agradesco...

Esto es otra solucion que vi en internet
Crear una macro que transforme el archivo excel a access y de ahi hacer una Api que actualice la base de datos, pero soy muy novato en esto y no se como hacerlo si necesito ayuda de verdad muchas gracias por su ayuda y colaboracion
de antemano gracias