Error 3251 en tiempo de ejecución en Access
Publicado por Heraldo (1 intervención) el 24/05/2016 18:23:24
Hola,
Soy novato en Access
Se me está presentando un error cuando divido una base de datos, en el siguiente código:
En la linea: Rst.Index = "PrimaryKey"
Se me detiene el depurador
Alguien me puede colaborar.
El error se presenta al dividir la base de datos. cuando la trabajo sin dividir no genera inconveniente.
Gracias al que me pueda colaborar.
Soy novato en Access
Se me está presentando un error cuando divido una base de datos, en el siguiente código:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub Anio_LostFocus()
Dim Db As DAO.Database
Dim Rst As DAO.Recordset
Set Db = CurrentDb()
Set Rst = Db.OpenRecordset("Comisiones", dbOpenDynaset)
Rst.Index = "PrimaryKey"
Rst.Seek "=", [DT], [Numero_de_comision], [Anio] 'Campos del formulario
If Not Rst.NoMatch Then
MsgBox "Este No. de comisión para este año en esta territorial ya existe!! Por Favor Verificar.", vbiinformation
Cancel = True
End If
Rst.Close
Db.Close
Set Rst = Nothing
Set Db = Nothing
End Sub
En la linea: Rst.Index = "PrimaryKey"
Se me detiene el depurador
Alguien me puede colaborar.
El error se presenta al dividir la base de datos. cuando la trabajo sin dividir no genera inconveniente.
Gracias al que me pueda colaborar.
Valora esta pregunta


0