ServerView System Monitor

Fujitsu.Servers.PRIMERGY.Windows.ServerViewSystemMonitor.Task (ConsoleTask)

Launch the default browser locally to access Fujitsu ServerView System Monitor on the remote PRIMERGY Server

Element properties:

TargetFujitsu.Servers.PRIMERGY.Windows.Server
Application"\%SystemRoot\%\System32\rundll32.exe"
WorkingDirectory\%HOMEDRIVE\%\%HOMEPATH\%
isRequireOutputFalse
AccessibilityPublic
EnabledTrue

Source Code:

<ConsoleTask ID="Fujitsu.Servers.PRIMERGY.Windows.ServerViewSystemMonitor.Task" Accessibility="Public" Enabled="true" Target="Fujitsu.Servers.PRIMERGY.Windows.Server" RequireOutput="false">
<Assembly>Res.Fujitsu.Servers.PRIMERGY.Windows.ServerViewSystemMonitor.Task</Assembly>
<Handler>ShellHandler</Handler>
<Parameters>
<!--
<Argument Name="WorkingDirectory">"%HOMEDRIVE%%HOMEPATH%"</Argument>
<Argument Name="Application">"%SystemRoot%\System32\mshta.exe"</Argument>
<Argument>vbscript:Execute("...............................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................")(window.close)</Argument>
<Argument>vbscript:Execute("sSrv=""$Target/Property[Type="FTSLIB!Fujitsu.ServerView.Server"]/NetworkName$"": sURL=""https://"" &amp; sSrv &amp; "":3172/ssm/desktop"": sV=Right(""$Target/Property[Type="Fujitsu.Servers.PRIMERGY.Windows.Server"]/MonitoringAgents$"", 7): If sV &lt; ""7.00.00"" Or LCase(sV)=""n/a"" Then: MsgBox ""ServerView SystemMonitor (V"" &amp; sV &amp; "") is not available for server "" &amp; sSrv, vbOKOnly, ""ServerView SystemMonitor"": Else: set objShell=CreateObject(""WScript.Shell""): objShell.run(sURL): End If")(window.close)</Argument>
<Argument>vbscript:Execute("sSrv=""$Target/Property[Type="FTSLIB!Fujitsu.ServerView.Server"]/NetworkName$"": sURL=""https://"" &amp; sSrv &amp; "":3172/ssm/desktop"": sV=""$Target/Property[Type="Fujitsu.Servers.PRIMERGY.Windows.Server"]/MonitoringAgents$"": If sV &lt; ""7.00.00"" Or LCase(sV)=""n/a"" Then: MsgBox ""ServerView SystemMonitor is not available for server "" &amp; sSrv, vbOKOnly, ""ServerView SystemMonitor"": Else: set objShell=CreateObject(""WScript.Shell""): objShell.run(sURL): End If")(window.close)</Argument>
-->
<Argument Name="WorkingDirectory">%HOMEDRIVE%%HOMEPATH%</Argument>
<Argument Name="Application">"%SystemRoot%\System32\rundll32.exe"</Argument>
<Argument>url.dll,FileProtocolHandler https://$Target/Property[Type="FTSLIB!Fujitsu.ServerView.Server"]/NetworkName$:3172/ssm/desktop</Argument>
</Parameters>
</ConsoleTask>