Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Como cambiar en un subformulario el RecordSource

1,827 views
Skip to first unread message

Pregunton

unread,
Feb 17, 2009, 4:56:12 PM2/17/09
to
Buenas Tardes a los integrantes de esta mesa de ayuda!

Como el dermatologo... al grano!. Resulta que antes de que se abra un
formulario que tiene un subformulario, quiero que me cambie el recordsource
del subformulario por otra consulta que tiene los mismos campos pero de
diferente tabla. Lo hice asi:

Private Sub Form_Current()
Dim Titulo As String
Dim Sab As String
Titulo = [Forms]![3_ForReqPenPre]![3_1PenRevPre].Form![NoReq]

Sab = Mid(Titulo, 1, 2)
If Sab = "CO" Then
Parent![31_SMArtResxRub].RecordSource = "[3_MovPreTiqResxRub]"
Else
End If

End Sub

Me aparece un error, y la verdad le he intentado de todo y no le he podido
solucionar.

De antemano agradezco su valiosa colaboración y ayuda que me puedan brindar.

Atentamente;

OSWALDO GAITAN ARAQUE
Bendiciones!

David Austria

unread,
Feb 17, 2009, 5:09:22 PM2/17/09
to
Saludos.

No entiendo que valores son objetos del formulario (subformularios) y
que valores son objetos de la base de datos (tablas, vistas).

Creo que lo que quieres hacer es algo como lo siguiente:

Me.Secundario0.SourceObject = "SubFormulario1"

ó algo como lo siguiente:

Me.Secundario0.Form.RecordSource = "SELECT * FROM Tabla1"

Saludos.
David Austria


On 17 feb, 15:56, Pregunton <Pregun...@discussions.microsoft.com>
wrote:

jmmiralles

unread,
Feb 18, 2009, 11:10:07 AM2/18/09
to
Buenas Oswaldo

te aconsejo que le eches un viztazo al Curso de Eduardo Olaz, entrega 22,
entre tantas cosas está:
- La conexión con datos a un formulario.
- Cambiar, en tiempo de ejecución del origen de datos.
-etc.

el link del curso es:

http://www.olaz.net/descargas/access/curso_vba/vba_entregas.htm

Espero te sirva, ya nos comentas.

Saludos desde un lugar de la Mancha.

"Pregunton" escribió:

0 new messages