|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Banco de Dados)
|
|
 |
Título da Dica: Reparando Banco de Dados Access Corrompido
|
 |
|
|
|
Postada em 21/2/2003 por Fábio/SP
Antes vc precisa adicionar a referência a biblioteca DAO
If Err = 3224 Then
MsgBox "Banco de Dados Corrompido! Pressione Ok para Reparar", vbCritical,app.path
DBEngine.RepairDatabase (app.path & "\banco.mdb")
End if
|
|
|
|
|
