Unir dos condiciones en Where
Uriel
Alguien podria asesorarme en cuanto a las uniones WHERE al abrir un
formulario por medio de un boton o procedimento de evento esto en VBA sin
usar macros.
Esto es lo que tengo pero marca un error que dice asi:
No coinciden los tipos
y el codigo que me interesa manejar es este:
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Registro de Nuevos Clientes"
stLinkCriteria = "[Cliente]=" & "'" & Me![CLCliente] & "'" And
"[Usuario]=" & "'" & Me![CLUsuario] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Esto se genera dado que tengo un formulario principal y me gustaria que el
segundo formulario que se abre al realizar una accion X busque los datos
contenidos en los dos Cuadros Combinados como restriccion y asi no tener que
buscarlo despues de abierto el segundo.
Si me explique...!!
Gracias de antemano a todos los que se molesten en ayudarme..!!!!
Pedro-José VILA SANTOS
"Uriel" <uga...@kbtel.com> escribió en el mensaje
news:Oz1JbOnJBHA.1252@tkmsftngp02...
> Que tal a todos ..!!
>
> Alguien podria asesorarme en cuanto a las uniones WHERE al abrir un
> formulario por medio de un boton o procedimento de evento esto en VBA sin
> usar macros.
> Esto es lo que tengo pero marca un error que dice asi:
>
> No coinciden los tipos
>
> y el codigo que me interesa manejar es este:
>
> Dim stDocName As String
> Dim stLinkCriteria As String
>
> stDocName = "Registro de Nuevos Clientes"
>
> stLinkCriteria = "[Cliente]=" & "'" & Me![CLCliente] & "'" And
> "[Usuario]=" & "'" & Me![CLUsuario] & "'"
cláusula debería ser
stLinkCriteria = "Cliente = '" & me!cliente & "'" & " and usuario = '" &
me!clusuario & "'"
Saludos
Uriel
Que creeess..!!!!!!!!! Pedro-José VILA SANTOS
Si funciono y al aprimera Gracias, Gracias y muchas Gracias..!!!!!!!
Pero:
Si tienes tiempo despejame las telarañas de mi cabesa con la nueva sentencia
que me hiciste favor de corregir:
1. Cual es la diferencia de poner un ' (es que no recuerdo el nombre:
Apostrofe?) despues de "Cliente = '" si la primera no lo contiene solo esta
escrito asi "Cliente = " igual que "Usuario = " pero ambos la tienen. Hora
los quito y funciona igual por que? o para que se ponen.
2. Por que el & " and en la estructura Me![CLCliente] & "'" & " And
[Usuario]=
Bueno si tienes tiempo de darme una pequeña explicacion, la verdad genere el
codigo con el asistente pero no se muy bien manejar el VBA ni el SQL asi que
quiero saber el porque a modo de aprender y que se me quite lo Sope..!!
y nuevamente Gracias, Gracias Gracias..!!
"Pedro-José VILA SANTOS" <pjvi...@terra.es> wrote in message
news:#6j9#enJBHA.912@tkmsftngp04...
:
: "Uriel" <uga...@kbtel.com> escribió en el mensaje
: >
: >
:
:
Pedro-José VILA SANTOS
>
>
> Que creeess..!!!!!!!!! Pedro-José VILA SANTOS
>
> Si funciono y al aprimera Gracias, Gracias y muchas Gracias..!!!!!!!
>
> Pero:
> Si tienes tiempo despejame las telarañas de mi cabesa con la nueva
sentencia
> que me hiciste favor de corregir:
>
> 1. Cual es la diferencia de poner un ' (es que no recuerdo el nombre:
> Apostrofe?) despues de "Cliente = '" si la primera no lo contiene solo
esta
> escrito asi "Cliente = " igual que "Usuario = " pero ambos la tienen. Hora
> los quito y funciona igual por que? o para que se ponen.
otro, si los metes detrás del igual te ahorras un &
por lo que se refiere a tu verdadero problema el tema es que debes
concatenar toda la cláusula where y el and para la segunda condición - y
sucesivas- va dentro de la claúsula.
para que me entiendas mejor
"..... where a = b and c = d" o
"..... where a = " & me!micampo1 & " and b = " & me!micampo2 o
".... where a = '" & me!micampo1 & "'" & " and b = '" & me!micampo2 & "'"
Espero que te haya aclarado algo
Saludos
Uriel
Perfecto..
Bye..!!
"Pedro-José VILA SANTOS" <pjvi...@terra.es> wrote in message
news:eJn9Z2nJBHA.1252@tkmsftngp02...
:
: "Uriel" <uga...@kbtel.com> escribió en el mensaje
: > :
: > :
: >
: >
:
: