>Hi,
>how I can insert this SQL statment :
>" SELECT * FROM unit, unittype, estate WHERE untestateidno = estateid AND unttypeidno = unittypeid"
>
>TO this RecordSet :
>
>With rstUnit
> .Index = "PrimaryKey"
> .Open "unit", myConn, adOpenKeyset, adLockPessimistic, adCmdTableDirect
>End With
>
>Many thanks
>adsc


Instead of giving a table name, give your SQL query and use the ORDER BY clause instead of using an index like this :

With rstUnit
   .Open "SELECT * FROM unit, unittype, estate WHERE untestateidno = estateid AND unttypeidno = unittypeid ORDER BY FieldName", myConn, adOpenKeyset, adLockPessimistic
End With