error "3219": La operación no está permitida en este contexto.
Publicado por josé (1 intervención) el 01/07/2021 19:44:29
Estoy haciendo que mediante un combobox llamado "Area" me cargue en otro combobox todos los empleados de una base de datos del area respectiva, pero cuando quiero vaciar el combobox "Area" me sale ese error, alguna sugerencia porfavor seria de gran ayuda... Pienso que es por que tengo que cerrar ese avarRecords o eliminarlo una vez que se terimen la instrucción...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim RS As ADODB.Recordset
Set RS = New ADODB.Recordset
RS.CursorLocation = adUseClient
RS.Open "SELECT ID, CONCAT(Nombre,' ',Apellido_Paterno,' ',Apellido_Materno) FROM Empleados WHERE CodigoArea=" & area, CN
i = RS.RecordCount
' me dice que el problema esta en el avarRecords
avarRecords = RS.GetRows(i)
RS.Close
CN.Close
Set RS = Nothing
j = 0
Do While j < UBound(avarRecords, 2) + 1
cmbNombre.AddItem avarRecords(1, j)
j = j + 1
Loop
If cmbArea.Value <> Empty Then
cmbNombre.Enabled = True
End If
Valora esta pregunta


0