Obrigar O Fechamento Do Bd (resolvido)

[Akuma13]

Olá galera, eu trabalho com um banco de dados e as vezes faço alterações e quero jogar na rede porém se usuários estiverem utilizando no momento eu fico impossibilitado de substituir o MDB, eu li um artigo que dizia pra fazer alguma coisa assim:

Private Sub Form_Timer()
If Len(Dir("C:\Documents and Settings\fetadeu\Desktop\kickout.txt") > 0) Then
DoCmd.Quit
End Sub

Se no diretório esteficificado tiver o arquivo keckout.txt ele fecha o banco (FE)

Porem da um erro, gostaria de saber se alguém sabe alguma maneira de fazer esse código funcionar ou sabe alguma outra maneira.

[Akuma13]

Consegui!!

Da pra fazer algumas coisas legais mas o código pra funcionar é esse:

If Len(Dir("\\Caminho\KickOut.txt")) Then
DoCmd.Quit

Se existir o arquivo KickOut.txt o bd é fechado permitindo alterações e mudanças caso você necessite fazer isso em rede.

Abraços

[MrMALJ]

Valeu por retornar a solução Akuma... parabens!