• View Communities
    • Citrix Developer Network
      The place for unfiltered straight talk on Citrix products. Blogs, code downloads, best practices, APIs, and more can all be found here.
    • Citrix Ready Community Verified
      Does it work with Citrix? Application compatibility questions are a thing of the past with the new Citrix Community Verified site.
    • Blogs
      Learn the latest from the Citrix employees who are building application delivery infrastructure technologies.
    • Blogosphere
      The Citrix Blogosphere is a window into the thousands of conversations taking place about Citrix and Application Delivery.
  •  Sign In
XenApp Developer Network
compared with
Current by Vishal Ganeriwala
on Aug 18, 2008 21:57.


 
Key
These lines were removed. This word was removed.
These lines were added. This word was added.

View page history


There are 0 changes. View first change.

 {excerpt}List all servers a user is logged on to. {excerpt}
  
 h2. Description
  
 This sample script uses MFCOM session object to  list all servers a user is  logged on to.  you can extend this script to get IP address and other user properties.
 \\
  
 h2. Download
  
  [cdn:download here.|^WhereIs.wsf]
  
 h2. Code Snippet
  
 {code}
 <package>
  <job id="WhereIs">
  <comment>
  File: WhereIs.wsf
  Description: List all servers a user is logged on to.
  Requirements: WSH 5.5 or higher.
  
  Copyright (c) 2002 Citrix Systems, Inc.
  </comment>
  <runtime>
  <description>
  This sample script uses MFCOM session object to list all servers a user is
  logged on to. you can extend this script to get IP address and other
  user properties.
  
  </description>
  <example>
  CScript WhereIs.wsf username
  </example>
  
  </runtime>
  <reference object="MetaFrameCOM.MetaFrameFarm"/>
  <script language="VBScript">
  
  Dim UserName, theFarm, aSession, SessionList
  '
  ' Get user name
  '
  Set Args = WScript.Arguments
  If Args.Count < 1 Then
  WScript.Echo "Usage: WhereIs UserName"
  WScript.Quit
  End If
  UserName = Args(0)
  '
  ' Initialize the farm object.
  '
  Set theFarm = CreateObject("MetaFrameCOM.MetaFrameFarm")
  if Err.Number <> 0 Then
  WScript.Echo "Can't create MetaFrameFarm object"
  WScript.Echo "(" & Err.Number & ") " & Err.Description
  WScript.Echo ""
  WScript.Quit Err.Number
  End if
  '
  ' Initialize the farm object.
  '
  theFarm.Initialize MetaFrameWinFarmObject
  '
  ' Get all sessions in the farm.
  '
  Set SessionList = theFarm.Sessions
  '
  ' For each session, print out the name of the server on which
  ' the given user has a session.
  '
  For Each aSession In SessionList
  If aSession.UserName = UserName Then
  WScript.Echo aSession.ServerName
  End If
  Next
  </script>
  </job>
 </package>
 {code}
 \\
  
 {rate:title=User Rating|theme=dynamic}
  
 h2. Disclaimer
  
 These software applications are provided to you as is with no representations, warranties or conditions of any kind. You may use and distribute it at your own risk. CITRIX DISCLAIMS ALL WARRANTIES WHATSOEVER, EXPRESS, IMPLIED, WRITTEN, ORAL OR STATUTORY, INCLUDING WITHOUT LIMITATION WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NONINFRINGEMENT. Without limiting the generality of the foregoing, you acknowledge and agree that (a) the software application may exhibit errors, design flaws or other problems, possibly resulting in loss of data or damage to property; (b) it may not be possible to make the software application fully functional; and (c) Citrix may, without notice or liability to you, cease to make available the current version and/or any future versions of the software application. In no event should the code be used to support of ultra-hazardous activities, including but not limited to life support or blasting activities. NEITHER CITRIX NOR ITS AFFILIATES OR AGENTS WILL BE LIABLE, UNDER BREACH OF CONTRACT OR ANY OTHER THEORY OF LIABILITY, FOR ANY DAMAGES WHATSOEVER ARISING FROM USE OF THE SOFTWARE APPLICATION, INCLUDING WITHOUT LIMITATION DIRECT, SPECIAL, INCIDENTAL, PUNITIVE, CONSEQUENTIAL OR OTHER DAMAGES, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. You agree to indemnify and defend Citrix against any and all claims arising from your use, modification or distribution of the code.
Related Links