naveguito
14 de Diciembre del 2003

Tengo el siguiente problema:
Estoy haciendo un formulario en el cual tengo que añadir registros a una tabla de access,para ello tengo varios datas ya que los campos de las distintas tablas son comunes,el error me da cuando acepto guardar,tengo este codigo:

Private Sub CmdAceptar2_Click()
Dim j As Integer
For i = 0 To 4
If Data(i).Visible = True Then
T_encoder
'FALLA EN EL SET
'For j = 0 To 21
' set Txt(j).DataSource = Data(i)
'Next
With Data(i)
.Recordset.Update
.Recordset.MoveFirst
.Enabled = True
End With
End If
Next
marco_botones.Enabled = True
marco_opciones.Enabled = False
marco_datos.Enabled = False
End Sub

La propiedad DataField ya la pongo en las propiedades del las cajas de texto.

Me dice que no coinciden los tipos

Baltasar
14 de Diciembre del 2003

Tal y como te he contestado por email, el problema está en que le asignas al textbox, como datasource un controldata, cuando lo que has de enviarle es un objeto database:

set Txt(j).DataSource = Data(i).database

Saludos

Baltasar
14 de Diciembre del 2003

Perdona, la respuesta anterior no era la solución.
Ya he encontrado el problema, y es que la propiedad DATASOURCE no se puede establecer en tiempo de ejecución, como indica la ayuda de visual:

Ya he encontrado el error, Jose; está en la ayuda de visual:

Propiedad datasource:
" . . . no puede establecer la propiedad DataSource de otro control u objeto a ninguno de estos controles en tiempo de ejecución. "

Saludos