Open time/date in control panel from MS-access2000?

[Roel Castro]

Hello everyone, Could somebody help me how to open time/date item in
Control panel by codes in access form modules? Taking in consideration
the operating system which is Windows 98, Windows 2000 and windows XP.

[Joerg Glissmann]

On 6 Nov 2003 01:18:13 -0800, Roel Castro <ra********@yahoo.com> wrote:

Hello everyone, Could somebody help me how to open time/date item in
Control panel by codes in access form modules? Taking in consideration
the operating system which is Windows 98, Windows 2000 and windows XP.

Hi there,

try

Dim result
result = Shell("rundll32 shell32.dll,Control_RunDLL timedate.cpl",
vbNormalFocus)

works for me under WinXP (the user needs to have the appropriate rights to
change date/time, though).

See the OH for the Shell command for more information on what to do with
its return value..

HTH,

Joerg

--
Joerg Glissmann

remove pants to reply..

[Pieter Linden]

ra********@yahoo.com (Roel Castro) wrote in message news:<75**************************@posting.google. com>...

Hello everyone, Could somebody help me how to open time/date item in
Control panel by codes in access form modules? Taking in consideration
the operating system which is Windows 98, Windows 2000 and windows XP.

from www.mvps.org/vbnet

Date & Time Properties

module: TIMEDATE.CPL

command: rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,0
result: displays Set Date & Time properties tab

command: rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,1
result: displays the Time Zone properties tab

[Lyle Fairfield]

ra********@yahoo.com (Roel Castro) wrote in
news:75**************************@posting.google.c om:

Hello everyone, Could somebody help me how to open time/date item in
Control panel by codes in access form modules? Taking in consideration
the operating system which is Windows 98, Windows 2000 and windows XP.

While I have been known to write API stuff from time to time (or even more
often than that) I have largely stopped doing so for procedures normally
associated with explorer.

Instead I set a reference to:

Microsoft Shell Controls and Automation

which exposes all or most of the power explorer:

opening control items can then be done as per this example:

Dim s32 As Shell32.Shell
Set s32 = New Shell32.Shell
s32.ControlPanelItem "timedate.cpl"
Set s32 = Nothing

I doubt that the last line is necessary ....

--
Lyle
(for e-mail refer to http://ffdba.com/contacts.htm)