Hi, i have a data access page that i'm trying to put a search feature on. The feature is working but it will only work if you have already scrolled over the page that the item is located on. It displays 10 items per set and i have over 2000 items that employees need to search through. i want them to be able to hit a button, enter an item number and it will display the page with that item on it. Like i stated earlier, this works with my code but only if they have already scrolled to or past that page. This is my code:
<SCRIPT language=vbscript event=onclick for=cmdFind>
' Clone the recordset.
Set rs = MSODSC.DataPages(0).Recordset.Clone
' dim Str as string
On error resume next
' This line assumes that the value you are filtering on is an integer.
' If the search value is a string, use slightly different syntax.
' For example, "CustomerID = '" & CStr(InputBox("Please enter _
' customer to find", "Find")) & "'"
rs.find "Item#=" & cStr(inputbox("Enter an Item Number","Find"))
' rs.find Str
' Custom error handling.
If (err.number <> 0) Then
Msgbox "Error: " & err.number & " " & err.description,, _
' Check search results for success.
If (rs.bof) or (rs.eof) Then
Msgbox "No Product found",,"Search Done"