>I am using.......
>cnSMDR1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\Tracit\SMDR1.mdb"
>and
>rsCompany.Open "Company", cnSMDR1, adOpenKeyset, adLockOptimistic
>to open my recordset. When I use the command rsCompany.Sort = "CompanyName", it returns the error, "Current provider does not support the nessecary interfaces for sorting or filtering". Any suggestions on how I can sort this recordset before I use it?

You need to open a client sided cursor:

set rsCompany = new adodb.recordset
rsCompany.cursorlocation=aduseclient
rsCompany.Open "Company", cnSMDR1, adOpenstatic, adLockOptimistic
rsCompany.Sort = "CompanyName"