Hello Guys,

Can you give me a code to search a data from the table. I want to validate the entry(PRODUCT CODE) to see if already exist in the table or not. The simplest code to search a record.

rsproduct is my recordset.
prdcode is on of my fields to search on.

Rudner

hello Rudner . . .
try this code :
----------------------------------------------------
Function Existence(Byval iNdx$,Byval iData$) as Boolean

      rc.Open "SELECT [" & INdx & "] FROM PRODUCTS WHERE [" & iNDX & "]='" & IData & "'"
      if Not Rc.EOF then
         Existence = True
      end if

End Function
-----------------------------------------------------
To Use it :
    If Existence("YOUR PRIMARY FIELD","VALUES FROM CONTROLS") then
       msgbox "DUPLICATE DATA",,"ZERO ICE"
       exit sub
    end if
-----------------------------------------------------
that's all. And if you put new parameter as Recordset you'll be able to check all primary in a table just with this function.
bye . . . and happy coding !!!!!!!