[Resolvido]Alertas Access

Olá a todos,
Tenho uma BD para controlo de visitas de vendedores. Já tenho criada uma consulta com os agendamentos vencidos. Precisava de um alerta/mensagem que iria abrir automaticamente ao iniciar o Computador. Bastava que existisse um agendamento com data vencida para que aparecesse uma mensagem ao iniciar o PC com a Nota: "Atenção existem agendamentos Vencidos". Isto é possível? Ou tenho obrigatoriamente que entrar no Access para ter um alerta?
Muito Obrigado
Duarte

Boas Duarte, Feliz Natal e seja bem vindo ao Fórum.

Bem.. Creio que sem usar o access seria um rotina em Vb executáve, colocando no inicia do windows. Talvez um vbScript colocando o no agendador de tarefas...

Mas podes criar um pequeno BD em access Colocando o código de abrir em oculto, colocando-o no menu iniciar. Esse BD vereficaria o teu sistema sem abrí-lo e em caso de datas vencidas abriria o sistema.

é por ai.

Cumprimento.

Obrigado e feliz natal também!

Sou mesmo um zero em Access e a sua resposta foi chinês para mim ...

Podia-me explicar melhor como é que eu posso fazer isso?

Obrigado pela disponibilidade!

Duarte

Eis como fazê-lo, podes abrir o ,vbs com o bloco de notas do windows. Observe que a tabela será carregada em um recordset através do vbs e assim emite msgBox.

é necessário alterar no vbs o caminho do BD.
podes colocar o vbs no iniciar do windows.

http://maximoaccess.forumeiros.com/t11027-exibir-menssagem-de-vencimento-pesquisando-no-bd-via-recordset

Cumprimentos

Boas cá estou eu novamente para mais uma questão relacionada com isto.

Coloquei a BD na drive C do meu PC e alterei estas três partes do código que me enviou: .ConnectionString = "Data Source=""C:\ACCESS_Vinhaguas\Database3.accdb"";" e cmd.CommandText = "Select * From InserirClientes_Visitas WHERE Agenda Nova Visita <= #" & Date() & "#;". e ainda MsgBox "Existem visitas agendadas vencidas para o Cliente..."

Acontece que ao dar dois cliques com o rato neste ficheiro VBScript aparece-me o seguinte erro:

Error: "Provider cannot be found. It may not be properly installed"

Supostamente para colocar no menu iniciar este VBscript seria somente dar dois cliques no ficheiro certo?

Qual a razão para este erro? Estará relacionado com o facto de não ter algum outro software instalado no PC e eu seja necessário?

Desculpe mais uma vez.

Obrigado

Ao duplo click do Mouse ele automaticamente abre o BD e pesquisa na tabela...

[code]
cmd.CommandText =
"Select * From InserirClientes_Visitas WHERE Agenda Nova Visita <= #"
& Date() & "#;"

Tente colocar o nome do campo entre colchetes... Evite sempre espaços em nome de campos;

cmd.CommandText =
"Select * From InserirClientes_Visitas WHERE [Agenda Nova Visita] <= #"
& Date() & "#;"

Eu testei no que me enviou e funcionou perfeitamente.

Cumprimentos.

Duarte Pinto, qual a versão do Windows e Ms Access.

Boas,

Experimentei como me disse. Ao dar dois cliques no ficheiro abriu a BD mas ficou no menu principal e não procurou. Depois fechei a BD e quando voltei a tentar voltou a dar-me o mesmo erro e sendo assim o problema já nao é das []. Por via das dúvidas experimentei no seu exemplo...alterei somente a linha da localização e também deu o mesmo erro. Na segunda tentativa no seu exemplo (antes coloquei as []) e fez o mesmo que na minha BD ou seja abriu a BD e não fez mais nada.

Será que estou a fazer alguma coisa de errado?

Boas a versão do Office é a de 2007 e o Windows 7 Professional...

Obrigado

32 bits ou 64 bits ?

64 Bits com a versão do Office e do Windows que lhe disse.

Certo, mas sendo 64 bits muda tudo.

Pois...o código é mt diferente?

Penso que tem de instalar o AccessDatabaseEngine_X64.exe

Mas aconselho a pesquisar sobre o aassunto.

Vá no Painel de controle, Ferramentas Admnistrativas, Fonte de Dados ODBC e verifique se existem os drives instalados...

Veja se ajuda

:

http://social.msdn.microsoft.com/Forums/en-US/sqldataaccess/thread/475fa623-ea22-48de-b1bf-61585715dcc4

Boas,

As configurações estão iguais às suas...

No entanto consegui fazer com que o alerta funcionasse no PC de um colega que é de 32...

A minha última questão é somente se este alerta é executado automaticamente ou se temos de clicar sempre nesse ficheiro para ver o que está vencido...

Obrigado mais uma vez

Coloque no menu Iniciar do windows e será executado automaticamente ao iniciar o windows.

Cumprimentos.

Coloque no menu Iniciar do windows e será executado automaticamente ao iniciar o windows.

Baixe o novo exemplo no repositório melhorado pelo Mestre João Paulo.

Cumprimentos.

Podes tambem dispará-lo no agendador de tarefas do windows.

Em pesquisa vi alguem falando sobre instalar o beta do access 2010 para que carregue os drives, nao sei se teria que desinstalá-lo depois..

Infelizmente nisso não posso ajudá-lo mais pois utilizo o XP.

Sucesso e Boas Festas!

Boas,

Estou quase quase lá...agora a questão é que o código VBS só está preparado para tabelas...se eu quiser ir buscar as datas a um formulário não é possível? é que as visitas vencidas para determinado cliente resulta de uma consulta ente duas tabelas.

Obrigado

No form não amigão... Uma consulta é nada mais nada menos que uma representação da tabela.. Utilize a consulta no código.

Boas,

Resolvi de outra maneira... e assim até vai mais de encontro ao que queria. O que fiz basicamente foi mudar o texto da box assim MsgBox "Existem visitas vencidas". Assim só alerta o utilizador que existem visitas vencidas e se ele quiser ver quais são entra na BD e consulta no relatório quais são as que estao vencidas era mesmo isto que eu queria.

Obrigado por tudo...foram impecáveis.

No repositório de VBScript, há dois exemplos, o segundo foi aprimorado pelo Mestre JP, ele atende ao que deseja.

Não utilize o loop da forma como coloquei senão vai ficar dando voltas no código para quantos registros estiverem vencidos.

Podes utilizar o RecordCount

Ir Rs.RecorCount > 0 Then
MSgBox " blablabbla"
End If

O Fórum agradece o Retorno.

Não se esqueça de clicar no joinha da msg que o auxiliou...

Cumprimentos.

Olá Duarte, tudo bem?

estou tendo o mesmo problema que teve e não consegui resolver... o meu sistema é Win7 64 bits e office 2007 32 bits.

gostaria de saber como resolveu para ver se consigo por aqui...

desde ja agradeço...

Olá tudo bem!

Não resolvi essa parte dos 64 bits pq somente o meu computador é que tinha essa versão. Onde o ficheiro vai trabalhar é de 32 bits pelo que nao houve problema.

Lamento não o poder ajudar.

Duarte

Obrigado pelo retorno amigo...
Vou tentar outra forma no 64. Muito obrigado mesmo.

Tentou a solução postada pelo JP na mensagem 15?

Cumprimentos.

Opa... obrigado pelo retorno... tentei sim... mas deu incompatibilidade, pois o meu windows é 64 bit e o office é 32 dai tentei instalar tb o 32bits do programa e tb nao funcionou.

Sinto por não poder ajudá-lo mais.

Sucesso!