DUVIDA COM SINTAXE SQL

        With cmd_conexao
            .ActiveConnection = conexao
            .CommandType = adCmdText
            .CommandText = [Ô]SELECT * FROM produtos ORDER BY codigo;[Ô]
            Set rst_conexao = .Execute
        End With

       rst_conexao.Open [Ô]SELECT *  FROM produto ORDER BY codigo[Ô], conexao, adOpenKeyset, adLockReadOnly