Здравейте...

Отново имам въпрос за Access 2007. Имам таблица "договори" с полера ID, дата на покупка, закупена стока, служител, , Клиент, данни за клиента.. Направих формуляр за търсене, но ми показва само един запис, а често даден клиент има повече от една покупка... ето го кода за търсене, не зная дали там е проблема

Private Sub Search1_Click()

DoCmd.ShowAllRecords

DoCmd.GoToControl ("Клиент")

DoCmd.FindRecord Me!txtSearch1

Клиент.SetFocus

Клиент = Клиент.Text

txtSearch1.SetFocus

strSearch = txtSearch1.Text

'If matching record found sets focus in Клиент and shows msgbox

'and clears search control

If Клиент = strSearch Then

MsgBox "Намерен е клиента: " & strSearch, , "Поздравлвния!"

Клиент.SetFocus

txtSearch1 = ""

'If value not found sets focus back to txtSearch and shows msgbox

Else

MsgBox "Match Not Found For: " & strSearch & " - Please Try Again.", _

, "Invalid Search Criterion!"

txtSearch1.SetFocus

End If

End Sub

Да имате идея къде е проблема? сложих и допълнителни полета, но в тях се повтаря един и същ запис. Например: давам му да търси клиент "х"... който знам, че има различни покупки, а ми дава резултат само за една.

Не зная дали добре обясних.

Благодаря предватително... усмивки

Аз искам да видя кода на заявката.

Аз искам да видя кода на заявката.

SELECT [Договори].ИД, [Договори].Закупена стока, [Договори].дата на покупка, [Договори].Офис, [Договори].Клиент, [Договори].Данни за клиента, [Договори].Начин на плащане, [Договори].Брой разсрочки, [Договори].Сума, [Договори].Служител

FROM [Договори]

Единият вариант е да ги сортираш по клиент. Така всички записи за един клиент ще бъдат събрани заедно.

Или виж как се използва FindRecord : http://www.blueclaw-db.com/docmd_findrecord_example.htm

Благодаря ти ще видя, кое ще е най-удачно