Command.Execute da error
Publicado por PEDRO JAVIER (5 intervenciones) el 25/10/2020 23:06:16
Buenas noches,
Estoy programando en visual basic en Access, quiero actualizar el campo Apellidos desde otra tabla, cuando me da error en Command.Execute con el siguiente mensaje "No se han especificado valores para algunos de los parámetros requeridos"
Este es mi código:
Un saludo,
Pedro
Estoy programando en visual basic en Access, quiero actualizar el campo Apellidos desde otra tabla, cuando me da error en Command.Execute con el siguiente mensaje "No se han especificado valores para algunos de los parámetros requeridos"
Este es mi 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
Dim miconexion As New Connection
Dim miconexion2 As New Connection
Set miconexion = CurrentProject.Connection
miconexion2.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=D:\Base Nueva\Database2.accdb"
Dim instruccion As String
Dim instruccion2 As String
instruccion = "SELECT * FROM Tabla1"
Dim mirecordset As New Recordset
mirecordset.Open instruccion, miconexion
Dim micomando As New Command
micomando.ActiveConnection = miconexion2
Do Until mirecordset.EOF
micomando.CommandText = "UPDATE Tabla2 SET Apellidos=mirecordset!Apellidos where Id=mirecordset!Id"
micomando.CommandType = adCmdText
micomando.Execute
mirecordset.MoveNext
Loop
mirecordset.Close
Set mirecordset = Nothing
Un saludo,
Pedro
Valora esta pregunta


0