El grupo al cual envías entradas es un grupo Usenet. Si envías mensajes a este grupo, cualquier usuario de Internet podrá ver tu dirección de correo electrónico
=========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
Entiendo que
campodondeescribolapalabra
[campocuyapalabraintentobuscar]
y
Me![campodondeescribolapalabra]
lo habrás sustituido por valores existentes en tu formulario verdad?
________________________________________________ Private Sub Texto87_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" Me.Bookmark = rs.Bookmark End Sub ________________________________________________
por eso no entiendo el por qué no me sirve.
"julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl...
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
> Entiendo que
> campodondeescribolapalabra
> [campocuyapalabraintentobuscar]
> y
> Me![campodondeescribolapalabra]
> lo habrás sustituido por valores existentes en tu formulario verdad?
> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje > news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >> Hola, >> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >> Después de actualizar escrito lo siguiente:
>> _____________________________________________________ >> Private Sub campodondeescribolapalabra_AfterUpdate() >> Dim rs As Object
>> Set rs = Me.Recordset.Clone >> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >> Me![campodondeescribolapalabra] & "" >> Me.Bookmark = rs.Bookmark >> End Sub >> _____________________________________________________
>> y cuando le doy a Enter después de escribir la palabra a buscar en el >> campocuyapalabraintentobuscar me sale el siguiente error:
>> se ha producido el error 3070 [...] >> [...] no reconoce [...] como un nombre de campo de texto [...]
=========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
> ________________________________________________ > Private Sub Texto87_AfterUpdate() > Dim rs As Object > Set rs = Me.Recordset.Clone > rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" > Me.Bookmark = rs.Bookmark > End Sub > ________________________________________________
> por eso no entiendo el por qué no me sirve.
> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de > noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >> =========================================== >> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >> ===========================================
>> Entiendo que
>> campodondeescribolapalabra
>> [campocuyapalabraintentobuscar]
>> y
>> Me![campodondeescribolapalabra]
>> lo habrás sustituido por valores existentes en tu formulario verdad?
>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>> Hola, >>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>> Después de actualizar escrito lo siguiente:
>>> _____________________________________________________ >>> Private Sub campodondeescribolapalabra_AfterUpdate() >>> Dim rs As Object
>>> Set rs = Me.Recordset.Clone >>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>> Me![campodondeescribolapalabra] & "" >>> Me.Bookmark = rs.Bookmark >>> End Sub >>> _____________________________________________________
>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>> campocuyapalabraintentobuscar me sale el siguiente error:
>>> se ha producido el error 3070 [...] >>> [...] no reconoce [...] como un nombre de campo de texto [...]
no me lo creo!!! perfecto, es texto, así que les puse esas comillas, lo curioso es que en el ejemplo no aparecen esas comillas y texto87 no es numérico, sino texto... en fin... muchas gracias
... por unas comillas... o sea, si el campo es numérico, no lleva comillas, lo contrario que si fuera texto...
"julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de noticias:eS6HYKZVKHA.4...@TK2MSFTNGP05.phx.gbl...
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
>> ________________________________________________ >> Private Sub Texto87_AfterUpdate() >> Dim rs As Object >> Set rs = Me.Recordset.Clone >> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >> Me.Bookmark = rs.Bookmark >> End Sub >> ________________________________________________
>> por eso no entiendo el por qué no me sirve.
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>> Entiendo que
>>> campodondeescribolapalabra
>>> [campocuyapalabraintentobuscar]
>>> y
>>> Me![campodondeescribolapalabra]
>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>> Hola, >>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>> Después de actualizar escrito lo siguiente:
>>>> _____________________________________________________ >>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>> Dim rs As Object
>>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>> Me![campodondeescribolapalabra] & "" >>>> Me.Bookmark = rs.Bookmark >>>> End Sub >>>> _____________________________________________________
>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>> se ha producido el error 3070 [...] >>>> [...] no reconoce [...] como un nombre de campo de texto [...]
subsanado ese error de las comillas, le indico parte del nombre del código y no me lo busca correctamente, por ejemplo: tengo el expediente: 99JOJIOJ, escribí 99 y me colocó en el expediente 8UASOKJ (el primer registro) sin embargo, escribo 99JOJIOJ, y todo es correcto, me lleva hasta el expediente
¿esto es normal?
"julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de noticias:eS6HYKZVKHA.4...@TK2MSFTNGP05.phx.gbl...
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
>> ________________________________________________ >> Private Sub Texto87_AfterUpdate() >> Dim rs As Object >> Set rs = Me.Recordset.Clone >> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >> Me.Bookmark = rs.Bookmark >> End Sub >> ________________________________________________
>> por eso no entiendo el por qué no me sirve.
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>> Entiendo que
>>> campodondeescribolapalabra
>>> [campocuyapalabraintentobuscar]
>>> y
>>> Me![campodondeescribolapalabra]
>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>> Hola, >>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>> Después de actualizar escrito lo siguiente:
>>>> _____________________________________________________ >>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>> Dim rs As Object
>>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>> Me![campodondeescribolapalabra] & "" >>>> Me.Bookmark = rs.Bookmark >>>> End Sub >>>> _____________________________________________________
>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>> se ha producido el error 3070 [...] >>>> [...] no reconoce [...] como un nombre de campo de texto [...]
=========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
Totalmente normal.
Con la expresión
[IdExpediente] = Me![Texto87]
(dejando a parte comillas y demás) le estás diciendo que
[IdExpediente]
tiene que se igual a
Me![Texto87]
Para buscar un texto dentro de otro tendrás que usar
LIKE
o
INSTR
Mírate la ayuda de Access que seguro que lo explica mejor que lo que yo pueda escribir
> subsanado ese error de las comillas, le indico parte del nombre del código > y no me lo busca correctamente, por ejemplo: tengo el expediente: > 99JOJIOJ, escribí 99 y me colocó en el expediente 8UASOKJ (el primer > registro) > sin embargo, escribo 99JOJIOJ, y todo es correcto, me lleva hasta el > expediente
> ¿esto es normal?
> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de > noticias:eS6HYKZVKHA.4...@TK2MSFTNGP05.phx.gbl... >> =========================================== >> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >> ===========================================
>>> ________________________________________________ >>> Private Sub Texto87_AfterUpdate() >>> Dim rs As Object >>> Set rs = Me.Recordset.Clone >>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>> Me.Bookmark = rs.Bookmark >>> End Sub >>> ________________________________________________
>>> por eso no entiendo el por qué no me sirve.
>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>> =========================================== >>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>> ===========================================
>>>> Entiendo que
>>>> campodondeescribolapalabra
>>>> [campocuyapalabraintentobuscar]
>>>> y
>>>> Me![campodondeescribolapalabra]
>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>> Hola, >>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>> Después de actualizar escrito lo siguiente:
>>>>> _____________________________________________________ >>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>> Dim rs As Object
>>>>> Set rs = Me.Recordset.Clone >>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>> Me![campodondeescribolapalabra] & "" >>>>> Me.Bookmark = rs.Bookmark >>>>> End Sub >>>>> _____________________________________________________
>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>>> se ha producido el error 3070 [...] >>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
=========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
Si el campo o variable es numérico se pone tal cual
Si el campo o variable es texto necesita comillas delante y detrás
Si el campo o variable es fecha necesita almohadilla (#) delante y detrás
> no me lo creo!!! perfecto, es texto, así que les puse esas comillas, lo > curioso es que en el ejemplo no aparecen esas comillas y texto87 no es > numérico, sino texto... en fin... muchas gracias
> ... por unas comillas... > o sea, si el campo es numérico, no lleva comillas, lo contrario que si > fuera texto...
> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de > noticias:eS6HYKZVKHA.4...@TK2MSFTNGP05.phx.gbl... >> =========================================== >> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >> ===========================================
>>> ________________________________________________ >>> Private Sub Texto87_AfterUpdate() >>> Dim rs As Object >>> Set rs = Me.Recordset.Clone >>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>> Me.Bookmark = rs.Bookmark >>> End Sub >>> ________________________________________________
>>> por eso no entiendo el por qué no me sirve.
>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>> =========================================== >>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>> ===========================================
>>>> Entiendo que
>>>> campodondeescribolapalabra
>>>> [campocuyapalabraintentobuscar]
>>>> y
>>>> Me![campodondeescribolapalabra]
>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>> Hola, >>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>> Después de actualizar escrito lo siguiente:
>>>>> _____________________________________________________ >>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>> Dim rs As Object
>>>>> Set rs = Me.Recordset.Clone >>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>> Me![campodondeescribolapalabra] & "" >>>>> Me.Bookmark = rs.Bookmark >>>>> End Sub >>>>> _____________________________________________________
>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>>> se ha producido el error 3070 [...] >>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
>> ________________________________________________ >> Private Sub Texto87_AfterUpdate() >> Dim rs As Object >> Set rs = Me.Recordset.Clone >> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >> Me.Bookmark = rs.Bookmark >> End Sub >> ________________________________________________
>> por eso no entiendo el por qué no me sirve.
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>> Entiendo que
>>> campodondeescribolapalabra
>>> [campocuyapalabraintentobuscar]
>>> y
>>> Me![campodondeescribolapalabra]
>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>> Hola, >>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>> Después de actualizar escrito lo siguiente:
>>>> _____________________________________________________ >>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>> Dim rs As Object
>>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>> Me![campodondeescribolapalabra] & "" >>>> Me.Bookmark = rs.Bookmark >>>> End Sub >>>> _____________________________________________________
>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>> se ha producido el error 3070 [...] >>>> [...] no reconoce [...] como un nombre de campo de texto [...]
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
> Totalmente normal.
> Con la expresión
> [IdExpediente] = Me![Texto87]
> (dejando a parte comillas y demás) le estás diciendo que
> [IdExpediente]
> tiene que se igual a
> Me![Texto87]
> Para buscar un texto dentro de otro tendrás que usar
> LIKE
> o
> INSTR
> Mírate la ayuda de Access que seguro que lo explica mejor que lo que yo > pueda escribir
> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje > news:BB03957F-A8D1-4D68-A70D-F13AF5519123@microsoft.com... >> subsanado ese error de las comillas, le indico parte del nombre del >> código y no me lo busca correctamente, por ejemplo: tengo el expediente: >> 99JOJIOJ, escribí 99 y me colocó en el expediente 8UASOKJ (el primer >> registro) >> sin embargo, escribo 99JOJIOJ, y todo es correcto, me lleva hasta el >> expediente
>> ¿esto es normal?
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:eS6HYKZVKHA.4...@TK2MSFTNGP05.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>>> ________________________________________________ >>>> Private Sub Texto87_AfterUpdate() >>>> Dim rs As Object >>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>> Me.Bookmark = rs.Bookmark >>>> End Sub >>>> ________________________________________________
>>>> por eso no entiendo el por qué no me sirve.
>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>>> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>> =========================================== >>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>> ===========================================
>>>>> Entiendo que
>>>>> campodondeescribolapalabra
>>>>> [campocuyapalabraintentobuscar]
>>>>> y
>>>>> Me![campodondeescribolapalabra]
>>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>> Hola, >>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>>> Después de actualizar escrito lo siguiente:
>>>>>> _____________________________________________________ >>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>> Dim rs As Object
>>>>>> Set rs = Me.Recordset.Clone >>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>> Me![campodondeescribolapalabra] & "" >>>>>> Me.Bookmark = rs.Bookmark >>>>>> End Sub >>>>>> _____________________________________________________
>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>> se ha producido el error 3070 [...] >>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
-- =========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
>>> ________________________________________________ >>> Private Sub Texto87_AfterUpdate() >>> Dim rs As Object >>> Set rs = Me.Recordset.Clone >>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>> Me.Bookmark = rs.Bookmark >>> End Sub >>> ________________________________________________
>>> por eso no entiendo el por qué no me sirve.
>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>> =========================================== >>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>> ===========================================
>>>> Entiendo que
>>>> campodondeescribolapalabra
>>>> [campocuyapalabraintentobuscar]
>>>> y
>>>> Me![campodondeescribolapalabra]
>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>> Hola, >>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>> Después de actualizar escrito lo siguiente:
>>>>> _____________________________________________________ >>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>> Dim rs As Object
>>>>> Set rs = Me.Recordset.Clone >>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>> Me![campodondeescribolapalabra] & "" >>>>> Me.Bookmark = rs.Bookmark >>>>> End Sub >>>>> _____________________________________________________
>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>>> se ha producido el error 3070 [...] >>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
he buscado en la red a ver cómo funciona eso de like y lo he intentado acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde escribo la palabra a buscar e IdExpediente la palabra que pretende buscar
rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
> -- > =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
>> -- >> -- >> ** >> Salu2/Regards >> Ju@nK [MVP Access] 2006/09 >> [DCE2003 ***] + VSTO [DCE2005 **] >> http://juank.mvps.orghttp://www.juank.es >> Correos personales o preguntas particulares en mi grupo >> http://groups.google.es/group/juank?hl=es >> www.juank.tk >> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >> ** >> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>>> ________________________________________________ >>>> Private Sub Texto87_AfterUpdate() >>>> Dim rs As Object >>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>> Me.Bookmark = rs.Bookmark >>>> End Sub >>>> ________________________________________________
>>>> por eso no entiendo el por qué no me sirve.
>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>>> noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>> =========================================== >>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>> ===========================================
>>>>> Entiendo que
>>>>> campodondeescribolapalabra
>>>>> [campocuyapalabraintentobuscar]
>>>>> y
>>>>> Me![campodondeescribolapalabra]
>>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>> Hola, >>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>>> Después de actualizar escrito lo siguiente:
>>>>>> _____________________________________________________ >>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>> Dim rs As Object
>>>>>> Set rs = Me.Recordset.Clone >>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>> Me![campodondeescribolapalabra] & "" >>>>>> Me.Bookmark = rs.Bookmark >>>>>> End Sub >>>>>> _____________________________________________________
>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en el >>>>>> campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>> se ha producido el error 3070 [...] >>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
Private Sub Texto87_AfterUpdate() Dim rs As Object
Set rs = Me.Recordset.Clone rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'" Me.Bookmark = rs.Bookmark Me.IdExpediente.SetFocus
End Sub
lo cierto es que no sabía dónde debía poner ese like, probando, sustituí el igual por LIKE los eruditos tienen que estar 'descojonándose' de todo esto, pero no se imaginan lo que significa para mí, porque ni idea de código :(
"JLG" <jeanihates...@hotmail.com> escribió en el mensaje de noticias:8E9430C3-EC53-4DE1-AD48-406BEF2B1...@microsoft.com...
> he buscado en la red a ver cómo funciona eso de like y lo he intentado > acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde escribo > la palabra a buscar e IdExpediente la palabra que pretende buscar
> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de > noticias:Om4i9boVKHA.3...@TK2MSFTNGP04.phx.gbl... >> :-p
>> -- >> =========================================== >> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >> ===========================================
>>> -- >>> -- >>> ** >>> Salu2/Regards >>> Ju@nK [MVP Access] 2006/09 >>> [DCE2003 ***] + VSTO [DCE2005 **] >>> http://juank.mvps.orghttp://www.juank.es >>> Correos personales o preguntas particulares en mi grupo >>> http://groups.google.es/group/juank?hl=es >>> www.juank.tk >>> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >>> ** >>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>>> =========================================== >>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>> ===========================================
>>>>> ________________________________________________ >>>>> Private Sub Texto87_AfterUpdate() >>>>> Dim rs As Object >>>>> Set rs = Me.Recordset.Clone >>>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>>> Me.Bookmark = rs.Bookmark >>>>> End Sub >>>>> ________________________________________________
>>>>> por eso no entiendo el por qué no me sirve.
>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>> de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>>> =========================================== >>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>> ===========================================
>>>>>> Entiendo que
>>>>>> campodondeescribolapalabra
>>>>>> [campocuyapalabraintentobuscar]
>>>>>> y
>>>>>> Me![campodondeescribolapalabra]
>>>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>>> Hola, >>>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el evento >>>>>>> Después de actualizar escrito lo siguiente:
>>>>>>> _____________________________________________________ >>>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>>> Dim rs As Object
>>>>>>> Set rs = Me.Recordset.Clone >>>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>>> Me![campodondeescribolapalabra] & "" >>>>>>> Me.Bookmark = rs.Bookmark >>>>>>> End Sub >>>>>>> _____________________________________________________
>>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en >>>>>>> el campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>>> se ha producido el error 3070 [...] >>>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
=========================================== ¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te sirvió o no la respuesta dada. Muchas gracias. ===========================================
Pásate por mi Web y busca un ejemplo que se llama
Buscar con Comodines y Blancos y Todos
seguro que te puede ayudar a entender el LIKE o COMO
La ventaja del like o como es que te permite usar comodines como en el dos, el ? para sustituir un carácter, y el * para sustituir los caracteres que sean necesario
Si en tu sentencia pones
Like "*" & [parametro] & "*"
cuando en el parámetro pongas TE, te dará como resultados los valores
> Private Sub Texto87_AfterUpdate() > Dim rs As Object
> Set rs = Me.Recordset.Clone > rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'" > Me.Bookmark = rs.Bookmark > Me.IdExpediente.SetFocus
> End Sub
> lo cierto es que no sabía dónde debía poner ese like, probando, sustituí > el igual por LIKE > los eruditos tienen que estar 'descojonándose' de todo esto, pero no se > imaginan lo que significa para mí, porque ni idea de código :(
> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje de > noticias:8E9430C3-EC53-4DE1-AD48-406BEF2B1...@microsoft.com... >> he buscado en la red a ver cómo funciona eso de like y lo he intentado >> acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde escribo >> la palabra a buscar e IdExpediente la palabra que pretende buscar
>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:Om4i9boVKHA.3...@TK2MSFTNGP04.phx.gbl... >>> :-p
>>> -- >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>>> -- >>>> -- >>>> ** >>>> Salu2/Regards >>>> Ju@nK [MVP Access] 2006/09 >>>> [DCE2003 ***] + VSTO [DCE2005 **] >>>> http://juank.mvps.orghttp://www.juank.es >>>> Correos personales o preguntas particulares en mi grupo >>>> http://groups.google.es/group/juank?hl=es >>>> www.juank.tk >>>> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >>>> ** >>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>>>> =========================================== >>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>> ===========================================
>>>>>> ________________________________________________ >>>>>> Private Sub Texto87_AfterUpdate() >>>>>> Dim rs As Object >>>>>> Set rs = Me.Recordset.Clone >>>>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>>>> Me.Bookmark = rs.Bookmark >>>>>> End Sub >>>>>> ________________________________________________
>>>>>> por eso no entiendo el por qué no me sirve.
>>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>>> de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>>>> =========================================== >>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>> ===========================================
>>>>>>> Entiendo que
>>>>>>> campodondeescribolapalabra
>>>>>>> [campocuyapalabraintentobuscar]
>>>>>>> y
>>>>>>> Me![campodondeescribolapalabra]
>>>>>>> lo habrás sustituido por valores existentes en tu formulario verdad?
>>>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>>>> Hola, >>>>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el >>>>>>>> evento Después de actualizar escrito lo siguiente:
>>>>>>>> _____________________________________________________ >>>>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>>>> Dim rs As Object
>>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>>>> Me![campodondeescribolapalabra] & "" >>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>> End Sub >>>>>>>> _____________________________________________________
>>>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en >>>>>>>> el campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>>>> se ha producido el error 3070 [...] >>>>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
> =========================================== > ¡Importante!: Colabora con el grupo.Contesta a este mensaje > y dinos si te sirvió o no la respuesta dada. Muchas gracias. > ===========================================
> Pásate por mi Web y busca un ejemplo que se llama
> Buscar con Comodines y Blancos y Todos
> seguro que te puede ayudar a entender el LIKE o COMO
> La ventaja del like o como es que te permite usar comodines como en el > dos, el ? para sustituir un carácter, y el * para sustituir los caracteres > que sean necesario
> Si en tu sentencia pones
> Like "*" & [parametro] & "*"
> cuando en el parámetro pongas TE, te dará como resultados los valores
>> Private Sub Texto87_AfterUpdate() >> Dim rs As Object
>> Set rs = Me.Recordset.Clone >> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'" >> Me.Bookmark = rs.Bookmark >> Me.IdExpediente.SetFocus
>> End Sub
>> lo cierto es que no sabía dónde debía poner ese like, probando, sustituí >> el igual por LIKE >> los eruditos tienen que estar 'descojonándose' de todo esto, pero no se >> imaginan lo que significa para mí, porque ni idea de código :(
>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje de >> noticias:8E9430C3-EC53-4DE1-AD48-406BEF2B1...@microsoft.com... >>> he buscado en la red a ver cómo funciona eso de like y lo he intentado >>> acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde >>> escribo la palabra a buscar e IdExpediente la palabra que pretende >>> buscar
>>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>> noticias:Om4i9boVKHA.3...@TK2MSFTNGP04.phx.gbl... >>>> :-p
>>>> -- >>>> =========================================== >>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>> ===========================================
>>>>> -- >>>>> -- >>>>> ** >>>>> Salu2/Regards >>>>> Ju@nK [MVP Access] 2006/09 >>>>> [DCE2003 ***] + VSTO [DCE2005 **] >>>>> http://juank.mvps.orghttp://www.juank.es >>>>> Correos personales o preguntas particulares en mi grupo >>>>> http://groups.google.es/group/juank?hl=es >>>>> www.juank.tk >>>>> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >>>>> ** >>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>>>>> =========================================== >>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>> ===========================================
>>>>>>> ________________________________________________ >>>>>>> Private Sub Texto87_AfterUpdate() >>>>>>> Dim rs As Object >>>>>>> Set rs = Me.Recordset.Clone >>>>>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>>>>> Me.Bookmark = rs.Bookmark >>>>>>> End Sub >>>>>>> ________________________________________________
>>>>>>> por eso no entiendo el por qué no me sirve.
>>>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>>>> de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>>>>> =========================================== >>>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>>> ===========================================
>>>>>>>> Entiendo que
>>>>>>>> campodondeescribolapalabra
>>>>>>>> [campocuyapalabraintentobuscar]
>>>>>>>> y
>>>>>>>> Me![campodondeescribolapalabra]
>>>>>>>> lo habrás sustituido por valores existentes en tu formulario >>>>>>>> verdad?
>>>>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>>>>> Hola, >>>>>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el >>>>>>>>> evento Después de actualizar escrito lo siguiente:
>>>>>>>>> _____________________________________________________ >>>>>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>>>>> Dim rs As Object
>>>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>>>>> Me![campodondeescribolapalabra] & "" >>>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>>> End Sub >>>>>>>>> _____________________________________________________
>>>>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar en >>>>>>>>> el campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>>>>> se ha producido el error 3070 [...] >>>>>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
ahora que tengo más registros, puedo utilizar esta búsqueda con más precisión, lo que ocurre es que cuando tengo una referencia como esta: FD4518 y otra FD8458 pasa lo siguiente... supongamos que sólo recuerdo de la referencia esto: FD, así que escribo lo siguiente: FD* y me encuentra uno de ellos, el primero, pero quisiera que me filtrara, es decir, que no me aparezcan, como ahora, el total de registros y me vaya a ese registro, sino que si hay 5 registros cuya referencia tiene o empieza por FD, me los filtre, es decir, que sólo aparezcan los 5 con esa condición, ahora, lo que he conseguido es eso, que me vaya a uno de ellos y sigan apareciendome el resto de registros en cuya referencia no hay ninguna FD
cómo conseguir esto...
"JLG" <jeanihates...@hotmail.com> escribió en el mensaje de noticias:F5E82F8F-43CD-4374-9074-1AAF8C7C2...@microsoft.com...
> ok!!! si no es por ustedes.... > muchísimas gracias
> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de > noticias:OBWD1qyWKHA....@TK2MSFTNGP04.phx.gbl... >> =========================================== >> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >> ===========================================
>> Pásate por mi Web y busca un ejemplo que se llama
>> Buscar con Comodines y Blancos y Todos
>> seguro que te puede ayudar a entender el LIKE o COMO
>> La ventaja del like o como es que te permite usar comodines como en el >> dos, el ? para sustituir un carácter, y el * para sustituir los >> caracteres que sean necesario
>> Si en tu sentencia pones
>> Like "*" & [parametro] & "*"
>> cuando en el parámetro pongas TE, te dará como resultados los valores
>>> Private Sub Texto87_AfterUpdate() >>> Dim rs As Object
>>> Set rs = Me.Recordset.Clone >>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'" >>> Me.Bookmark = rs.Bookmark >>> Me.IdExpediente.SetFocus
>>> End Sub
>>> lo cierto es que no sabía dónde debía poner ese like, probando, sustituí >>> el igual por LIKE >>> los eruditos tienen que estar 'descojonándose' de todo esto, pero no se >>> imaginan lo que significa para mí, porque ni idea de código :(
>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje de >>> noticias:8E9430C3-EC53-4DE1-AD48-406BEF2B1...@microsoft.com... >>>> he buscado en la red a ver cómo funciona eso de like y lo he intentado >>>> acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde >>>> escribo la palabra a buscar e IdExpediente la palabra que pretende >>>> buscar
>>>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >>>> noticias:Om4i9boVKHA.3...@TK2MSFTNGP04.phx.gbl... >>>>> :-p
>>>>> -- >>>>> =========================================== >>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>> ===========================================
>>>>>> -- >>>>>> -- >>>>>> ** >>>>>> Salu2/Regards >>>>>> Ju@nK [MVP Access] 2006/09 >>>>>> [DCE2003 ***] + VSTO [DCE2005 **] >>>>>> http://juank.mvps.orghttp://www.juank.es >>>>>> Correos personales o preguntas particulares en mi grupo >>>>>> http://groups.google.es/group/juank?hl=es >>>>>> www.juank.tk >>>>>> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >>>>>> ** >>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>>> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>>>>>> =========================================== >>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>> ===========================================
>>>>>>>> ________________________________________________ >>>>>>>> Private Sub Texto87_AfterUpdate() >>>>>>>> Dim rs As Object >>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>> End Sub >>>>>>>> ________________________________________________
>>>>>>>> por eso no entiendo el por qué no me sirve.
>>>>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el >>>>>>>> mensaje de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>>>>>> =========================================== >>>>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>>>> ===========================================
>>>>>>>>> Entiendo que
>>>>>>>>> campodondeescribolapalabra
>>>>>>>>> [campocuyapalabraintentobuscar]
>>>>>>>>> y
>>>>>>>>> Me![campodondeescribolapalabra]
>>>>>>>>> lo habrás sustituido por valores existentes en tu formulario >>>>>>>>> verdad?
>>>>>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>>>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>>>>>> Hola, >>>>>>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el >>>>>>>>>> evento Después de actualizar escrito lo siguiente:
>>>>>>>>>> _____________________________________________________ >>>>>>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>>>>>> Dim rs As Object
>>>>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>>>>>> Me![campodondeescribolapalabra] & "" >>>>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>>>> End Sub >>>>>>>>>> _____________________________________________________
>>>>>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar >>>>>>>>>> en el campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>>>>>> se ha producido el error 3070 [...] >>>>>>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
> ahora que tengo más registros, puedo utilizar esta búsqueda con más > precisión, lo que ocurre es que cuando tengo una referencia como esta: > FD4518 y otra FD8458 pasa lo siguiente... supongamos que sólo recuerdo de > la referencia esto: FD, así que escribo lo siguiente: FD* y me encuentra > uno de ellos, el primero, pero quisiera que me filtrara, es decir, que no > me aparezcan, como ahora, el total de registros y me vaya a ese registro, > sino que si hay 5 registros cuya referencia tiene o empieza por FD, me los > filtre, es decir, que sólo aparezcan los 5 con esa condición, ahora, lo > que he conseguido es eso, que me vaya a uno de ellos y sigan apareciendome > el resto de registros en cuya referencia no hay ninguna FD
> cómo conseguir esto...
> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje de > noticias:F5E82F8F-43CD-4374-9074-1AAF8C7C2...@microsoft.com... >> ok!!! si no es por ustedes.... >> muchísimas gracias
>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje de >> noticias:OBWD1qyWKHA....@TK2MSFTNGP04.phx.gbl... >>> =========================================== >>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>> ===========================================
>>> Pásate por mi Web y busca un ejemplo que se llama
>>> Buscar con Comodines y Blancos y Todos
>>> seguro que te puede ayudar a entender el LIKE o COMO
>>> La ventaja del like o como es que te permite usar comodines como en el >>> dos, el ? para sustituir un carácter, y el * para sustituir los >>> caracteres que sean necesario
>>> Si en tu sentencia pones
>>> Like "*" & [parametro] & "*"
>>> cuando en el parámetro pongas TE, te dará como resultados los valores
>>>> Private Sub Texto87_AfterUpdate() >>>> Dim rs As Object
>>>> Set rs = Me.Recordset.Clone >>>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'" >>>> Me.Bookmark = rs.Bookmark >>>> Me.IdExpediente.SetFocus
>>>> End Sub
>>>> lo cierto es que no sabía dónde debía poner ese like, probando, >>>> sustituí el igual por LIKE >>>> los eruditos tienen que estar 'descojonándose' de todo esto, pero no se >>>> imaginan lo que significa para mí, porque ni idea de código :(
>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje de >>>> noticias:8E9430C3-EC53-4DE1-AD48-406BEF2B1...@microsoft.com... >>>>> he buscado en la red a ver cómo funciona eso de like y lo he intentado >>>>> acoplar a mi base, pero nada. Texto87 es el cuadro de texto donde >>>>> escribo la palabra a buscar e IdExpediente la palabra que pretende >>>>> buscar
>>>>> rs.FindFirst "[IdExpediente] LIKE '" & Me![Texto87] & "'"
>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>> de noticias:Om4i9boVKHA.3...@TK2MSFTNGP04.phx.gbl... >>>>>> :-p
>>>>>> -- >>>>>> =========================================== >>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>> ===========================================
>>>>>>> -- >>>>>>> -- >>>>>>> ** >>>>>>> Salu2/Regards >>>>>>> Ju@nK [MVP Access] 2006/09 >>>>>>> [DCE2003 ***] + VSTO [DCE2005 **] >>>>>>> http://juank.mvps.orghttp://www.juank.es >>>>>>> Correos personales o preguntas particulares en mi grupo >>>>>>> http://groups.google.es/group/juank?hl=es >>>>>>> www.juank.tk >>>>>>> ¿Que es un MVP?, entérate en http://mvp.support.microsoft.com >>>>>>> ** >>>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el mensaje >>>>>>> news:eS6HYKZVKHA.4780@TK2MSFTNGP05.phx.gbl... >>>>>>>> =========================================== >>>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>>> ===========================================
>>>>>>>>> ________________________________________________ >>>>>>>>> Private Sub Texto87_AfterUpdate() >>>>>>>>> Dim rs As Object >>>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>>> rs.FindFirst "[IdExpediente] = " & Me![Texto87] & "" >>>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>>> End Sub >>>>>>>>> ________________________________________________
>>>>>>>>> por eso no entiendo el por qué no me sirve.
>>>>>>>>> "julian-vlc-sp" <ijulianESTOSO...@iespana.es> escribió en el >>>>>>>>> mensaje de noticias:ep$atlXVKHA.1...@TK2MSFTNGP05.phx.gbl... >>>>>>>>>> =========================================== >>>>>>>>>> ¡Importante!: Colabora con el grupo.Contesta a este mensaje >>>>>>>>>> y dinos si te sirvió o no la respuesta dada. Muchas gracias. >>>>>>>>>> ===========================================
>>>>>>>>>> Entiendo que
>>>>>>>>>> campodondeescribolapalabra
>>>>>>>>>> [campocuyapalabraintentobuscar]
>>>>>>>>>> y
>>>>>>>>>> Me![campodondeescribolapalabra]
>>>>>>>>>> lo habrás sustituido por valores existentes en tu formulario >>>>>>>>>> verdad?
>>>>>>>>>> "JLG" <jeanihates...@hotmail.com> escribió en el mensaje >>>>>>>>>> news:03D5E6B8-F21B-41A9-A0CB-E57A5E51116B@microsoft.com... >>>>>>>>>>> Hola, >>>>>>>>>>> viendo un ejemplo de búsqueda para mi base, resulta que en el >>>>>>>>>>> evento Después de actualizar escrito lo siguiente:
>>>>>>>>>>> _____________________________________________________ >>>>>>>>>>> Private Sub campodondeescribolapalabra_AfterUpdate() >>>>>>>>>>> Dim rs As Object
>>>>>>>>>>> Set rs = Me.Recordset.Clone >>>>>>>>>>> rs.FindFirst "[campocuyapalabraintentobuscar] = " & >>>>>>>>>>> Me![campodondeescribolapalabra] & "" >>>>>>>>>>> Me.Bookmark = rs.Bookmark >>>>>>>>>>> End Sub >>>>>>>>>>> _____________________________________________________
>>>>>>>>>>> y cuando le doy a Enter después de escribir la palabra a buscar >>>>>>>>>>> en el campocuyapalabraintentobuscar me sale el siguiente error:
>>>>>>>>>>> se ha producido el error 3070 [...] >>>>>>>>>>> [...] no reconoce [...] como un nombre de campo de texto [...]
|
