How to open computer management from a command (Access 2000)

[dibbers]

I have a software audit database and wanted a quick access button to computer management, so i can check peoples hardware against my list.

I have tried ;

Dim stAppName As String

stAppName = "c:winntsystem32compmgmt.msc"
Call Shell(stAppName, 1)

and recieve message 'invalid procedure call or argument'


also would it be possible to take the computers network name which is in a text box 'compname' and automatically connect to this computer using computer management.

Have created a button that opens the default admin share

Dim stAppName As String

stAppName = "C:WINNTexplorer.exe"
stAppName = stAppName & " " & CompName & "c$"
Call Shell(stAppName, 1)

but the computer management seems to be abit beyond me at the moment

[MarkD]

You can't run Computer Management by itself, you have to specify the associated application, Microsoft Management Console (MMC). (See att'd screen shot.) Example using Shell function to open program:

Public Sub TestShell()

Dim dblShell As Double
dblShell = Shell("C:WINDOWSSYSTEM32MMC.EXE C:WINDOWSSYSTEM32COMPMGMT.MSC", vbNormalFocus)

End Sub

Above example is on WIN XP (Home), modify as necessary for your version of Windows.

HTH

[MarkD]

PS: Another option, use Hyperlink to Computer Mgmt, do not need to specify path to MMC.EXE. Example:

Application.FollowHyperlink "../../../../WINDOWS/SYSTEM32/COMPMGMT.MSC"

However, when using hyperlink (as shown above, or with command button, etc) you get warning msg as illustrated in attd graphic. At least in AXP/WIN XP you do....

HTH