Hola genten tengo un problema extraño con este codigo, en la línea en negrita me tira un error:
Run-time error '-2147217865(80040e37)':
Invalid object name 'tb_PedidosDetealle'.
estuve leyendo una y mil veces el codigo y no encuentro ninguna asociacion con tb_pedidosDetealle (lo mas parecido es tbPedidosDetalle, pero creo que no viene al caso)
si necesitan algun dato mas, por favor, pidanmelo, ya me trae 3 horas sin saber de que se trata este problema.
Los dos sub son identicos salvo que accionan sobre tablas distintas, el sub borrarDetalles funciona, pero borrarPedido no
Private Sub CmdBorrar_Click()
borrarDetalles
borrarPedido
End Sub
Private Sub borrarPedido()
id = Val(txtIdPedido.Text)
Adodc3.ConnectionString = cn
Adodc3.CommandType = adCmdText
Adodc3.RecordSource = "select * from tb_pedidosEncabezado where idPedido =" & id
Adodc3.Refresh
If Not Adodc3.Recordset.EOF Then
Adodc3.Recordset.Delete
Adodc3.Recordset.Update
End If
End Sub
Private Sub borrarDetalles()
id = Val(txtIdPedido.Text)
Adodc1.RecordSource = "select * from tb_pedidosDetalle where idPedido =" & id
Adodc1.Refresh
If Not Adodc1.Recordset.EOF Then
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
End If
End Sub
muchas gracias desde ya.
