Access - Sincronizar Fecha com Servidor

Nuevamente recurro a la lista por um pequeño problema que tengo, tengo una MDB en un servidor al qual accedem varios ordenadores, para registro de datos mi problema es que uno de los campos es la fecha e otro la hora, que yo necessitada sinconizar de modo a que me dea la fecha e hora del servidor e no del puesto de trabajo.

Alguno de vosotros sabe como hacer esto.
Gracias
Saludos deste Portugal

Una solucion posible

sub UpdateDateTime(ByVal cNameServer as String)
shell("NET TIME \\" & cNameServer & " /SET /YES")
end Sub

Saludos