ExecutarSQL

Setembro 23, 2008 at 3:06 pm (Access)

Public Function ExecutarSQL(strSQL As String)

‘Desabilitar menssagens de execução de comando do access
DoCmd.SetWarnings False

DoCmd.RunSQL strSQL

‘Abilitar menssagens de execução de comando do access
DoCmd.SetWarnings True

End Function

Comente