FUNCION OPENARGS

Discussion:

FUNCION OPENARGS

(demasiado antiguo para responder)

JORDI

2004-04-22 20:55:58 UTC

Hola, trabajando en office xp.

Quuiero que al salir un formulario continuo con varios
campos, cuando marque una de ellos en cualquier registro,
me vaya a otro formulario y me ponga esos datos, pero no
me sale, el codigo es el siguiente

Private Sub SELECCIONAR_Click()
Dim SINO As Variant
Select Case Me.OpenArgs
Case "SF_AC_BA"
Forms!SF_AC_BA!EL_CODIGO = Me![Secundario20].Form!
[BAR_COD]
Forms![SF_AC_BA]![SF_ACT_BA_BAR_SUB].Requery
Forms![SF_AC_BA]![SF_ACT_BA_PER_SUB].Requery
Forms!SF_AC_BA!EL_CODIGO.SetFocus
End Select
DoCmd.Close acForm, "SF_AC_BUSCO_BA"
End Sub

lo busco en SF_ACT_BUS_BAR Y lo marco, pulso en
seleccionar_click y no me sale en los otros subformularios
alguien sabe el motivo.
gracias

Ju@nK

2004-04-22 22:24:09 UTC

Permalink

Ejecútalo paso a paso y mira que es lo que pasa.
--
Salu2
***@nK
www.ms-access.tk
www.juank.tk

Post by JORDI
Hola, trabajando en office xp.
Quuiero que al salir un formulario continuo con varios
campos, cuando marque una de ellos en cualquier registro,
me vaya a otro formulario y me ponga esos datos, pero no
me sale, el codigo es el siguiente
Private Sub SELECCIONAR_Click()
Dim SINO As Variant
Select Case Me.OpenArgs
Case "SF_AC_BA"
Forms!SF_AC_BA!EL_CODIGO = Me![Secundario20].Form!
[BAR_COD]
Forms![SF_AC_BA]![SF_ACT_BA_BAR_SUB].Requery
Forms![SF_AC_BA]![SF_ACT_BA_PER_SUB].Requery
Forms!SF_AC_BA!EL_CODIGO.SetFocus
End Select
DoCmd.Close acForm, "SF_AC_BUSCO_BA"
End Sub
lo busco en SF_ACT_BUS_BAR Y lo marco, pulso en
seleccionar_click y no me sale en los otros subformularios
alguien sabe el motivo.
gracias

Ju@nK

2004-04-22 22:26:42 UTC

Permalink

de todas formas, no entiendo que pinta ahí un select case cuando solamente
tienes una opción que además la respuesta tiene que ser boolean, no lo
entiendo.
--
Salu2
***@nK
www.ms-access.tk
www.juank.tk

Rosa Sanjuan

2004-04-23 01:53:07 UTC

Permalink

Por partes.
Openargs no es una función sino una propiedad.
Es una cadena opcional que puedes incluir al abrir un formulario
con el objeto OpenForm del objeto Cmd.
Dices 'al salir' de un formulario, pregunto si no quieres decir
'al entrar' porque si es al salir Openargs y nada es lo mismo.
Si es dentro del formulario recién abierto "SF_AC_BA" parece
el nombre del formulario, con lo que deberias referirte a él
simplemente como Me y no liar al motor de la base de datos.
En definitiva si me cuentas que quieres hacer quizá pueda ayudarte
pues Openargs y servidora somos viejos conocidos y siempre
que lo he necesitado ha dado la talla.
Para terminar debo indicarte que como alternativa puedes
crear una variable publica en un modulo, darle el valor que
consideres pertinente en un formulario, cerrarlo, abrir otro,
recoger el valor que haya dejado el cerrado y mover pieza.

Saludos
Rosa

CarCar

2004-04-23 11:18:27 UTC

Permalink

¡Abandonados!, nos has tenido abandonados. ¡Re-bienvenida!

Saludos,
CarCar
MVP-Acces

-----Mensaje original-----
Por partes.

...
...

Saludos
Rosa

Rosa Sanjuan

2004-04-26 03:46:44 UTC

Permalink

Gracias CarCar. Eres muy amable.

Saludos
Rosa

"CarCar" <***@hotmail.com> escribi� en el mensaje news:342201c42924$b303aae0$***@phx.gbl...
¡Abandonados!, nos has tenido abandonados. ¡Re-bienvenida!

Saludos,
CarCar
MVP-Acces

jordi

2004-04-23 20:54:39 UTC

Permalink

hola Rosa,
ter explico mi problema para ver si lo puedes resolver:

Tengo un formulario (SF_AC_BA) donde tengo un cuadro
combinado donde introduzco un codigo y al dar clic me
situo en un subformulario (SF_ACT_BA_BAR_SUB) donde
relleno los campos y doy a grabar, así sucesivamente,
luego cuando introduzco un codigo automaticamente se
cargan sus datos en el subformulario.

Tengo un boton para buscar que al pulsar me lleva al
formulario continuo (FS_AC_BUSCO_BA) y me salen todos los
campos que yo he requerido. una vez que quiero el
registro buscado me situo sobre el, y pulso un boton de
comando llamadado (seleccionar) donde tengo el siguiente
codigo pero no marca los campos en el subinforme
(SF_AC_BA),pero si me lleva ese subformulario

Private Sub SELECCIONAR_Click()

Post by JORDI
Dim SINO As Variant
Select Case Me.OpenArgs
Case "SF_AC_BA"
Forms!SF_AC_BA!EL_CODIGO = Me![Secundario20].Form!
[BAR_COD]
Forms![SF_AC_BA]![SF_ACT_BA_BAR_SUB].Requery
Forms![SF_AC_BA]![SF_ACT_BA_PER_SUB].Requery
Forms!SF_AC_BA!EL_CODIGO.SetFocus
End Select
DoCmd.Close acForm, "SF_AC_BUSCO_BA"
End Sub

ESPERO HABERME EXPLICADO BIEN
UN SALUDO Y GRACIAS POR TU ATENCIÓN

-----Mensaje original-----
Por partes.
Openargs no es una función sino una propiedad.
Es una cadena opcional que puedes incluir al abrir un

formulario

con el objeto OpenForm del objeto Cmd.
Dices 'al salir' de un formulario, pregunto si no

quieres decir

'al entrar' porque si es al salir Openargs y nada es lo

mismo.

Si es dentro del formulario recién abierto "SF_AC_BA"

parece

el nombre del formulario, con lo que deberias referirte

a él

simplemente como Me y no liar al motor de la base de

datos.

En definitiva si me cuentas que quieres hacer quizá

pueda ayudarte

pues Openargs y servidora somos viejos conocidos y

siempre

que lo he necesitado ha dado la talla.
Para terminar debo indicarte que como alternativa puedes
crear una variable publica en un modulo, darle el valor

que

consideres pertinente en un formulario, cerrarlo, abrir

otro,

recoger el valor que haya dejado el cerrado y mover

pieza.

Saludos
Rosa

Post by JORDI
Hola, trabajando en office xp.
Quuiero que al salir un formulario continuo con varios
campos, cuando marque una de ellos en cualquier

registro,

Post by JORDI
me vaya a otro formulario y me ponga esos datos, pero

Post by JORDI
me sale, el codigo es el siguiente
Private Sub SELECCIONAR_Click()
Dim SINO As Variant
Select Case Me.OpenArgs
Case "SF_AC_BA"
Forms!SF_AC_BA!EL_CODIGO = Me![Secundario20].Form!
[BAR_COD]
Forms![SF_AC_BA]![SF_ACT_BA_BAR_SUB].Requery
Forms![SF_AC_BA]![SF_ACT_BA_PER_SUB].Requery
Forms!SF_AC_BA!EL_CODIGO.SetFocus
End Select
DoCmd.Close acForm, "SF_AC_BUSCO_BA"
End Sub
lo busco en SF_ACT_BUS_BAR Y lo marco, pulso en
seleccionar_click y no me sale en los otros

subformularios

Post by JORDI
alguien sabe el motivo.
gracias

Rosa Sanjuan

2004-04-26 14:05:13 UTC

Permalink

Hola jordi:

Mezclas formularios con informes, hablas de formularios
continuos que parecen subformularios . No se en que
punto das valor a Openargs. ¿El código que posteas
esta en "SF_AC_BUSCO_BA" ?, entonces en que punto
lo abres y que valores le cargas en openArgs? Como ves
muchos interrogantes que nos soy capaz de resolver.

Lo siento pero sigo sin entender lo que quieres hacer.
Lo único que tengo claro es que deberias olvidarte de
openargs cuya utilidad esta en transmitir una cadena
(string) de un formulario a otro.
Como los subformularios se abren junto con el
principal no puedes comunicarte entre ellos con openargs
y si es con un formulario que no esta abierto ten presente que
los formularios son entelequias que solo existen cuando
estan abiertos, el resto del tiempo solo puedes referirte a ellos
como documentos con unas propiedes distintas a las de los formularios.

Para comunicar y/o relacionar algo entre un formulario y sus subformularios
lo mejor es con un cuadro de texto independiente al que
te referiras en los suformularios simplemente como
Me.Parent![cuadroIndependiente] y en el principal como
Me![cuadro Independiente]. Puedes tomar su
valor o proporcionarselo desde el formulario principal
y/o desde cualquiera de los secundarios.

Saludos
Rosa

"jordi" <***@discussions.microsoft.com> escribi� en el mensaje news:385a01c42975$31ba4560$***@phx.gbl...
hola Rosa,
ter explico mi problema para ver si lo puedes resolver:

Tengo un formulario (SF_AC_BA) donde tengo un cuadro
combinado donde introduzco un codigo y al dar clic me
situo en un subformulario (SF_ACT_BA_BAR_SUB) donde
relleno los campos y doy a grabar, así sucesivamente,
luego cuando introduzco un codigo automaticamente se
cargan sus datos en el subformulario.

Tengo un boton para buscar que al pulsar me lleva al
formulario continuo (FS_AC_BUSCO_BA) y me salen todos los
campos que yo he requerido. una vez que quiero el
registro buscado me situo sobre el, y pulso un boton de
comando llamadado (seleccionar) donde tengo el siguiente
codigo pero no marca los campos en el subinforme
(SF_AC_BA),pero si me lleva ese subformulario

Private Sub SELECCIONAR_Click()

Eva Etxebeste

2004-04-23 06:36:28 UTC

Permalink

Hola Jordi

Vamos por partes:

1. Es conveniente asignar a una variable el valor de entrada de OpenArgs,
utiliza algo como:
sArgs = OpenArgs()
Después, utiliza la variable y olvídate de OpenArgs

2. Es también conveniente comprobar que el valor que llega es correcto, no
es nulo, llega algo.... Inspecciona la variabl sArgs para ver qué te está
llegando y si el resto del código se comporta como debe.

3. Nos pones la parte de código que recoge el valor, pero no la que lo
envía. ¿Seguro que estás enviando un valor correcto, en la posición
correcta? Si no fuera así, lo podrías comprobar en el punto 2.

Cuéntanos
--
Eva Etxebeste [MS MVP Access]

CarCar

2004-04-23 07:13:20 UTC

Permalink

Hola:

Ese código ¿dónde lo tienes? si es en el formulario
llamante, como sospecho, no tiene sentido.

Lo lógico es que tu llames al formulario y le pases en el
parámetro OpenArgs el valor y el formulario llamado en el
evento "Al cargar" (por ejemplo) haga uso del mismo...

Por otra parte me parece también entender que lo que
quieres es que el formulario llamado se abra con los datos
de un BAR_COD específico, eso se puede hacer simplemente
al llamar al formulario, por ejemplo así:

DoCmd.OpenForm "SF_AC_BA",,,"BAR_COD=" & Me!
[Secundario20].Form![BAR_COD]

Saludos,
CarCar
MVP-Access

-----Mensaje original-----
Hola, trabajando en office xp.
Quuiero que al salir un formulario continuo con varios
campos, cuando marque una de ellos en cualquier registro,
me vaya a otro formulario y me ponga esos datos, pero no
me sale, el codigo es el siguiente
Private Sub SELECCIONAR_Click()
Dim SINO As Variant
Select Case Me.OpenArgs
Case "SF_AC_BA"
Forms!SF_AC_BA!EL_CODIGO = Me![Secundario20].Form!
[BAR_COD]
Forms![SF_AC_BA]![SF_ACT_BA_BAR_SUB].Requery
Forms![SF_AC_BA]![SF_ACT_BA_PER_SUB].Requery
Forms!SF_AC_BA!EL_CODIGO.SetFocus
End Select
DoCmd.Close acForm, "SF_AC_BUSCO_BA"
End Sub
lo busco en SF_ACT_BUS_BAR Y lo marco, pulso en
seleccionar_click y no me sale en los otros subformularios
alguien sabe el motivo.
gracias
.

Victor Delgadillo

2004-04-23 11:14:07 UTC

Permalink

Excepto que no hayas copiado todo el Select Case, te falta End Select, lo
que dara errores de compilacion.
Revisa (deteniendo el proceso al comienzo de la subrutina) si estas
capturando algun valor o el Case es nulo?

--
Victor Delgadillo [MVP Access]
Miami, Florida

Consultas al grupo, asi todos nos beneficiamos.

_