Wyszukiwanie w kilku polach

Thread View: pl.comp.bazy-danych.msaccess

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by affix - Marek Thu, 17 Sep 2020 05:34

#134041

Author: affix - Marek
Date: Thu, 17 Sep 2020 05:34

19 lines
626 bytes

Witam

W formularzu jest pole [szukaj]. Wpisując tekst w to pole szukane są wyniki w frmPodformularz w polu [nazwa1] zgodnie z poniższym:

Private Sub szukaj_Change()
On Error Resume Next
Dim Sb  As Form
    Set Sb = Me!frmPodformularz.Form
        Sb.Filter = "[nazwa1] Like '" & szukaj.Text & "*'"
    Sb.FilterOn = -1
End Sub

Ale w frmPodformularz jest kilka pól: [nazwa1], [nazwa2], [nazwa3]. Chciałbym aby przy wpisywaniu tekstu w polu [szukaj] pokazywały mi się wyniki znalezione we wszystkich trzech polach.

Będę wdzięczny zapomoc
Pozdrawiam
Marek Walczak

Re: Wyszukiwanie w kilku polach

#134043

Author: affix - Marek
Date: Thu, 17 Sep 2020 10:51

20 lines
567 bytes

> A może tak:
> 
> Sb.Filter = "[nazwa1] Like '" & szukaj.Text & "*' OR [nazwa2] Like '" & 
> szukaj.Text & "*'" 'itd. itd.
> 
> -- 
> Pozdrawiam
> Zbigniew Bratko

Tak (jak mi się wydawało) robiłem i źle filtrowało. Ale skoro taki autorytet jak Pan też tak napisał to przejrzałem jeszcze raz mój kod i okazało się, że wkleił mi się gdzieś dodatkowy cudzysłów i kod nie działał.

Wielkie Dzięki za pomoc

Pozdrawiam serdecznie
Marek Walczak.

Re: Wyszukiwanie w kilku polach

#134042

Author: Zbigniew Bratko
Date: Thu, 17 Sep 2020 18:15

51 lines
1354 bytes

This is a multi-part message in MIME format.
--------------019B4B4A107399B6FD4CAB2E
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit

W dniu 17.09.2020 o 14:34, affix - Marek pisze:
> Witam
>
> W formularzu jest pole [szukaj]. Wpisując tekst w to pole szukane są wyniki w frmPodformularz w polu [nazwa1] zgodnie z poniższym:
>
> Private Sub szukaj_Change()
> On Error Resume Next
> Dim Sb  As Form
>      Set Sb = Me!frmPodformularz.Form
>          Sb.Filter = "[nazwa1] Like '" & szukaj.Text & "*'"
>      Sb.FilterOn = -1
> End Sub
>
> Ale w frmPodformularz jest kilka pól: [nazwa1], [nazwa2], [nazwa3]. Chciałbym aby przy wpisywaniu tekstu w polu [szukaj] pokazywały mi się wyniki znalezione we wszystkich trzech polach.
>

[...]

A może tak:

Sb.Filter = "[nazwa1] Like '" & szukaj.Text & "*' OR [nazwa2] Like '" &
szukaj.Text & "*'" 'itd. itd.

--
Pozdrawiam
Zbigniew Bratko

--------------019B4B4A107399B6FD4CAB2E
Content-Type: text/x-vcard; charset=utf-8;
 name="adminBEZTEGO.vcf"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
 filename="adminBEZTEGO.vcf"

begin:vcard
fn:Zbigniew Bratko
n:Bratko;Zbigniew
note;quoted-printable:-- 	
	Pozdrowienia BraZby
	 www.faq.accdb.pl
	 www.accdb.pl
version:2.1
end:vcard


--------------019B4B4A107399B6FD4CAB2E--

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads