Formulario continuo desvinculado com recordset ADO

Viva
Como utilizo o access para visualizar e alterar dados do SQL SErver via ADO, e pelo facto de os filtros do access não funcionarem nestas situações em formulários continuos, os quais acho bastantes completos.
Junto anexo um exemplo que criei que percisa ser aperfeiçoado.
Utiliza filtros semelhantes ao access mas ainda está imcompleto.
Agradeço sugestões de melhorias ou alternativas para obter os mesmos resultados.
A tabela existente e respetivos dados foi criada atraves do exemplo do Avelino (usandoaccess), através do bd HumMilhao.
Também podem tranferir a tabela para o sql server e trabalhar através do mesmo alterando a ligação.
Um Abraço
Rui Sérgio

Viva
Constatei que o exemplo anterior não funciona em alguns Office's devido a não assumir o valor no Item do formulário assinalado na foto no ficheiro anexo, desconheço qual a razão.
Foram feitas pequenas alterações ao código de forma ao filtro ser aplicado directamente ao recordset, ficando a funcionar.

Agora o próximo desafio é que o modulo possa funcionar para vários formulários e também detectar automaticamente o tipo de campo para as opções de filtro serem de acordo com datas, números ou texto como faz o access por defeito.

Todas as sugestões serão bem vindas

Obrigado pela contribuíção.

Nota:
Não tirar duvidas nesta sala, devem abrir um tópico nas salas apropriadas, relacionando o exemplo em causa.

Viva
Junto anexo versão 3 do aplicativo em que o filtro de texto já funciona parcialmente, está a dar erro no filtro termina Com.
Depois de conseguir resolver este bug irei construir os filtros de data e de números

Olá,

Explica melhor o funcionamento do aplicativo, por favor.
Nos meus testes, nenhum dos filtros funciona.

Viva Cláudio
O funcionamento é semelhante aos filtros do access (Clicar no botão do lado direito sobre o campo que se pretende filtar), porque o recordset é ADO os filtros do access não funcionam, dai estar a implementar este método.
Qual o office que você usa?, eu já testei no 2007 e no 2010 e funciona bem nos dois, tenho é que por permissão para todas as macros

Viva
Para quem já baixou o ficheiro, funciona ou acontece como o Cláudio?

Ola;

Sim, com o botão direito do mouse em cima da coluna pretendida, funciona bem.

Obrigado pela contribuíção.

Nota:
Todas as mensagens (extra exemplo), serão removidas deste tópico.

RuiSergio,

O erro ocorre ao usar o filtro "termina com", dentro da função FuncAdoFiltroAplicar, no módulo ModContinuoADO.

Essa função deve ser adaptada para tratar esse tipo de filtro, talvez usando o Right no lugar do Like.

Viva Cláudio
Já fiz experiências com o comando right de várias formas mas não consegui por a funcionar

Tópico movido para a sala apropriada até finalização do exemplo.

Viva
Junto anexo versão 4 do exemplo.
Já foram criados os filtros de texto, número, data e caixa de seleção.
Falta ultrapassar o problema dos filtros seguintes:
Quando leva o operador NOT LIKE
Quando leva LIKE '%XXX'
Filtro de número igual a xx,xx (Com decimas também não funciona)

O restante penso que está tudo a funcionar, se detetarem algum bug agradeço que informem.

Cumprimentos
Rui

Junto anexo versão 5 do exemplo, e em principio todos os filtros já funcionam correctamente
Os seguintes filtros requerem ligação ao servidor:
Quando leva o operador NOT LIKE
Quando leva LIKE '%XXX'
Os restantes não.
A próxima versão será quando conseguir que todos os filtros trabalhem sem ser necessário ligar ao servidor

Quem testar o exemplo se detectarem algum bug agradeço que informem.

Cumprimentos
Rui