[THIN] Re: Determining modem users

  • From: "Foote, Eric" <EFoote@xxxxxxx>
  • To: <thin@xxxxxxxxxxxxx>
  • Date: Tue, 3 Jan 2006 10:18:30 -0500

This could be adjusted to collect repeatedly and report to a text file.
 
Eric

-----Original Message-----
From: thin-bounce@xxxxxxxxxxxxx [mailto:thin-bounce@xxxxxxxxxxxxx]On Behalf Of 
Peterson David
Sent: Tuesday, January 03, 2006 10:13 AM
To: thin@xxxxxxxxxxxxx
Subject: [THIN] Re: Determining modem users


Thanks for these suggestions, just getting back in the office to look at this. 
The problem is that these look to only capture who is currently logged in 
through dialin, we're looking to see if we can get more historical data. I 
looked at the security log and didn't see anything to indicate whether they 
logged in by modem. We have an Acceleport RAS 4 installed.

  _____  

From: thin-bounce@xxxxxxxxxxxxx [mailto:thin-bounce@xxxxxxxxxxxxx] On Behalf Of 
Foote, Eric
Sent: Monday, December 26, 2005 5:42 AM
To: thin@xxxxxxxxxxxxx
Subject: [THIN] Re: Determining modem users


David,
Try this script, you will need the MFCOM SDK from CDN installed on the 
workstation that you run it from.
 
Thankfully, I don't have any modem connections to test it on ;)
 
Eric
 
 
'******************************************************************************
'Script to Count the number of users on Modem Connections
'Author: Eric Foote
'Date: 12/26/2005
'******************************************************************************
 
On Error Resume Next
'Initialize global constants and variables.
Set objFarm = CreateObject("MetaFrameCOM.MetaFrameFarm")
Counter=1
 
'Initialize MFCom Object
objFarm.Initialize(1)
'Check each session in the farm to see if IP address matches IP Address from 
input file
For Each objSession In objFarm.Sessions
 If Not ObjSession.ClientModemName="" Then
  'Modem Connection
  If objSession.SessionState=1 Then
   'Active Modem Connection
   WScript.Echo Counter & Chr(9) & ObjSession.ClientModemName & Chr(9) & 
ObjSession.ClientName & Chr(9) & ObjSession.UserName
   Counter=Counter+1
  End If
 End if
'Next Session
Next
Set Counter=Nothing
Set ObjFarm=Nothing
WScript.Quit


-----Original Message-----
From: thin-bounce@xxxxxxxxxxxxx [mailto:thin-bounce@xxxxxxxxxxxxx]On Behalf Of 
Peterson David
Sent: Friday, December 23, 2005 5:56 PM
To: thin@xxxxxxxxxxxxx
Subject: [THIN] Determining modem users


Is there an easy way to determine which users logon to a Citrix server through 
direct Dialin? This is on Windows 2000 SP4 and Presentation Server 4 Standard. 
We want to see how many users dial directly in regularly. 
 
Thanks


NOTICE: This electronic mail transmission from the law firm of Dinsmore & Shohl 
may constitute an attorney-client communication that is privileged at law. It 
is not intended for transmission to, or receipt by, any unauthorized persons. 
If you have received this electronic mail transmission in error, please delete 
it from your system without copying it, and notify the sender by reply e-mail, 
so that our address record can be corrected. 

Other related posts: