If search result is bigger than 50 totalrecords then ??????

[66damian66]

Good morning ,
I have problem with search in grid .
I want have result of search Insert a limit of search fields to 50
I wants search name of products,
but there must be limit of the {totalrecord} result <= 50
when the result of search is bigger than (>) 50 must or show error like
"Define parameters of searching out exactly" .

I put in events AftreSearch this code but this not working:

if (Args.Info.TotalRecords > 50 ) then
Result.Cancel = .t.
Result.ErrorHTML = "Define parameters of searching out exactly"
end if

Maybe anybody use something like this function of search engine,
Please help me with this. :), what function I must use to this? or else manner?

[66damian66]

Re: If search result is bigger than 50 totalrecords then ??????

I have inserted another code above the grid to the a5w site:

DIM t AS P
DIm rec as N
DIM liczba as N
liczba=50

t = table.open("[PathAlias.ADB_Name]\Product.dbf")
t.order("Product_name")
rec = t.fetch_find(nazwa)
if rec > liczba then
CurrentForm.RedirectTarget="search_error1.a5w"
end if

But when i search I have this error: "Invalid key length"
I dont understand because the search name is 50 lenght,
but in the table "Products" the Products_name lenght is 240
meybe this is the problem?



Please HELP me.

[martin horzempa]

Re: If search result is bigger than 50 totalrecords then ??????

hi Damian

if (Args.Info.TotalRecords > 50 ) then
Result.Cancel = .t.
Result.ErrorHTML = "Define parameters of searching out exactly"
end if

have you tried

if Args.Info.TotalRecords > 50 then
Result.Cancel = .t.
Result.ErrorHTML = "Define parameters of searching out exactly"
end if


and what is " nazwa " and how is it defined?

and i am confused about what you want

are you trying to limit the number of records returned or
are you trying to limit the length of the search string
your 2 posts dont seem to work together for the same result?

[66damian66]

Re: If search result is bigger than 50 totalrecords then ??????

Thanks for replay Martin,

yes I tried this

if Args.Info.TotalRecords > 50 then
Result.Cancel = .t.
Result.ErrorHTML = "Define parameters of searching out exactly"
end if

but with no result

Examle for this what I wont to do:
I have In the table "Products" the row name: "product_name"
and in "product_name" have 62179 records.

I wants search product name like "Polska" but this product
in data base is 154 (<-totalrecords)
And in this moment i must have limitation of searching
If totalrecords is bigger than 50 then is showing ERROR text , but if totalrecords is < 50 then show results of search.



I hope I good explain this problem :(

[martin horzempa]

Re: If search result is bigger than 50 totalrecords then ??????

Hi Damian


the problem with your code is that the result variable is
not available in the aftersearch event ---

The Result variable is available for use in the CanUpdateRecord, CanDeleteRecord, and CanInsertRecord grid event scripts.

from the help index see
http://support.alphasoftware.com/alp...t_Variable.htm

you can test your code by using this:

if Args.Info.TotalRecords > 500 then
Response.Redirect("mybadsearch.a5w")
end if

then if you use "Polska" the grid will return all 156 records
but if you change your code to:

if Args.Info.TotalRecords > 100 then
Response.Redirect("mybadsearch.a5w")
end if

then again using "Polska" your grid will show an error attempting to
show the non existant "mybadsearch.a5w"

you could then create a real mybadsearch.a5w page with an error message on it and a button that would redirect back to your original page with the search grid

[66damian66]

Re: If search result is bigger than 50 totalrecords then ??????

Łoł , WERY THANKS !!!!
I searched too many wery complicated solutions and here is a simple answer :)

Thanks one more time Martin.