German,
thank you for your help.
I tried what you told me but i don't know where to but the ",adCmdTableDirect" because I need it for the .Seek useing ADO.



>Hi Ahmad.
>
>You have two choices: ADO or DAO
>
>For ADO you must use some like this:
>
>'First, open a Reference to Microsoft ActiveX Data Objects Libray
>sqlStatment = "SELECT YourField1, YourField2, .., YourFieldN FROM YourTable ..."
>YourConnection.Open DSNToYourDataBase
>Set YourRs = YourConnection.Execute sqlStatment
>.
>.
>.
>
>For DAO you must use some like this:
>
>'First open a Reference to Microsoft Data Access Objects
>sqlStatment = "SELECT YourField1, YourField2, .., YourFieldN FROM YourTable ..."
>Set YourDatabase = YourWorkSpace.OpenDatabase("......")
>Set YourRs = YourDataBase.OpenRecordset(sqlStatment)
>.
>.
>.
>
>Bye.
>
>
>German