Modifier la date et heure système

Salut à Tous
Je voudrais savoir comment afficher le formulaire Windows permettant de modifier la date et l'heure ainsi que le faisceau horaire à partir d'une procédure Access 2000 . Merci

Bonsoir,

Ci-dessous une procédure qui fonctionne sous Windows XP:

Code:

---

1 2 3 4 5 6 7

Sub AfficherDateHeureSystem() Dim oShell As Object   Set oShell = CreateObject("Shell.Application") oShell.SetTime Set oShell = Nothing End Sub

---

A+

Bonsoir,

Il est possible d'afficher les outils du panneau de configuration en appelant le fichier .cpl concerné

Par exemple pour le panneau date/heure:

Code:

---

Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,0", vbNormalFocus)

---

et pour le panneau fuseau horaire:

Code:

---

Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,1", vbNormalFocus)

---

la liste de tous les outils est ici

Salutations.

Merci