[Resolvido]Comapctar e repara banco de dados 2007

Pessoal...fazendo uma busca aqui no forum por uma forma de compactar e repara o banco de dados aceess 2007 automaticamente ao fechar o mesmo encontrei 2 formas... onde fique na duvida qual das dua funcionaria para o access 2007.
precisava de ajuda para escolhe o codigo certo.

codigo 01

Código:

Dim ws As Object
Set ws = CreateObject("WScript.shell")
ws.SendKeys "%AGO"
Set ws = Nothing

codigo 02

Código:

SendKeys "%(FMC)", False

ja fis um teste com os dois mas não deu para perceber diferença alguma... ou melhor não vi nada acontecer... desde ja sou muito grato pela atenção.

No Access 2003: SendKeys "%(TDC)", False
No Access 2007: SendKeys "%(FMC)", False
No Access 2010: SendKeys "%(YC)", False


Private Sub teubotão_Click()
'2007
SendKeys "%(FMC)", False
End Sub

muito obrigado parceiro pela dica. vou utilizar o que vc me indicou.... muito grato

Obrigado pelo retorno o forum agradece.