Well all of my users are in a OU named corp
If I am thinking the wrong thing, I will change it back
With Container.Filter = Array("Corp")
The following line works
FILE.Writeline User.name & "," & user.LastLogin
When I add user.dn as follows
FILE.Writeline User.name & "," & User.dn & "," & user.LastLogin
It does not
When I change
Container.Filter = Array("Corp")
To
Container.Filter = Array("User")
It still writes out a 0 byte csv file
--------------------------------
Rob Weatherly
--------------------------------
-----Original Message-----
From: Evans Chris - cevans [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 15, 2003 10:23 AM
To: NT 2000 Discussions
Subject: RE: Active Directory query
Container.Filter = Array("Corp") should read Container.Filter =
Array("User")
-----Original Message-----
From: Weatherly, Rob [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 15, 2003 9:20 AM
To: NT 2000 Discussions
Subject: RE: Active Directory query
Ok I added it
The whole script is below
When I run it, it creates the file but buts nothing in the file When the
script finished I have a 0 byte file named LastLogon.csv
On Error Resume Next
Dim Container
Dim ContainerName
Dim User
Dim File
Set FSO = Wscript.CreateObject("Scripting.FileSystemObject")
Set File = FSO.CreateTextFile("LastLogin.csv")
ContainerName = "handleman"
Set Container = GetObject("WinNT://" & ContainerName)
Container.Filter = Array("Corp")
For Each User in Container
'Wscript.Echo User.name & " " & User.LastLogin
FILE.Writeline User.name & "," & User.dn & "," & user.LastLogin
Next
--------------------------------
Rob Weatherly
--------------------------------
-----Original Message-----
From: Roger Seielstad [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 15, 2003 10:14 AM
To: NT 2000 Discussions
Subject: RE: Active Directory query
Although asthetically, I'd put user.dn before user.lastlogin
--------------------------------------------------------------
Roger D. Seielstad - MTS MCSE MS-MVP
Sr. Systems Administrator
Inovis Inc.
> -----Original Message-----
> From: Evans Chris - cevans [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 15, 2003 10:14 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
>
> You got it.
>
> -----Original Message-----
> From: Weatherly, Rob [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 15, 2003 9:12 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
>
> So the line should read
> FILE.Writeline User.name & "," & User.LastLogin & "," & user.dn
>
> Ok here is a stupid question
> Where do I find these on my own?
> I know there are so many objects that can be users
> Is there any references or libraries where I can get a
> listing of some/all
> of them
>
> --------------------------------
> Rob Weatherly
> --------------------------------
>
> -----Original Message-----
> From: Evans Chris - cevans [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 15, 2003 10:04 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
> Sure, use User.dn
>
> -----Original Message-----
> From: Weatherly, Rob [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 15, 2003 9:02 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
>
> One other thing
> Is there a way I can add an output column that would show
> there container or
> full path to there OU/user account
>
> --------------------------------
> Rob Weatherly
> --------------------------------
>
> -----Original Message-----
> From: Weatherly, Rob
> Sent: Tuesday, July 15, 2003 8:52 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
> Thank you guys that worked great
> I have exactly what I need
> Again thanks a lot
>
> --------------------------------
> Rob Weatherly
> --------------------------------
>
> -----Original Message-----
> From: Roger Seielstad [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, July 15, 2003 7:10 AM
> To: NT 2000 Discussions
> Subject: RE: Active Directory query
>
> Change the file name to .csv ?? ;)
>
> Actually, change the .txt to .csv, and replace the " " with ","
>
> --------------------------------------------------------------
> Roger D. Seielstad - MTS MCSE MS-MVP
> Sr. Systems Administrator
> Inovis Inc.
>
>
> > -----Original Message-----
> > From: Weatherly, Rob [mailto:[EMAIL PROTECTED]
> > Sent: Monday, July 14, 2003 4:38 PM
> > To: NT 2000 Discussions
> > Subject: RE: Active Directory query
> >
> >
> > Actually I have it running now
> > Instead of Set File = FSO.CreateTextFile("AllLastLogin.txt")
> > Is there a way I can output to a CSV file instead?
> >
> > --------------------------------
> > Rob Weatherly
> > --------------------------------
> >
> > -----Original Message-----
> > From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]
> > Sent: Monday, July 14, 2003 4:43 PM
> > To: NT 2000 Discussions
> > Subject: RE: Active Directory query
> >
> > Just a warning this will only find last logins for the DC that you
> > logged into. If you have more then one DC other users may
> be logging
> > into other DC's and the last login time is not replicated
> to the other
>
> > DC's If you only have more than one DC which you should
> you will want
>
> > to check each one. I you don't know how to manipulate the script
> > below I may be able to help ya out.
> >
> > shaun gillissen
> >
> >
> >
> >
> >
> >
> > To:
> "NT 2000
> > Discussions" <[EMAIL PROTECTED]>
> > cc: (bcc:
> > Shaun Gillissen/ANR/MS/PHILIPS)
> >
> > Subject: RE:
> > Active Directory query
> >
> >
> > Evans Chris - cevans
> > Classification:
> >
> > <[EMAIL PROTECTED]>
> >
> >
> >
> > Sent by:
> >
> > [EMAIL PROTECTED]
> >
> > .com
> >
> >
> >
> > 07/14/2003 04:23 PM
> >
> > Please respond to "NT 2000
> >
> > Discussions"
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > On Error Resume Next
> > Dim Container
> > Dim ContainerName
> > Dim User
> > Dim File
> > Set FSO = Wscript.CreateObject("Scripting.FileSystemObject")
> > Set File = FSO.CreateTextFile("AllLastLogin.txt")
> > ContainerName = "Your Domain Here"
> > Set Container = GetObject("WinNT://" & ContainerName)
> Container.Filter
>
> > = Array("User") For Each User in Container
> > Wscript.Echo User.name & " " & User.LastLogin
> > FILE.Writeline User.name & " Last logged on " & User.LastLogin
> > Next
> >
> > -----Original Message-----
> > From: Weatherly, Rob [mailto:[EMAIL PROTECTED]
> > Sent: Monday, July 14, 2003 3:02 PM
> > To: NT 2000 Discussions
> > Subject: Active Directory query
> >
> >
> >
> >
> > Does any one have a script or know where I can find a
> script that will
>
> > show me users that have not logged on in the last 30 days
> Must work on
> > windows 2000 with active directory
> >
> >
> > --------------------------------
> > Rob Weatherly
> > --------------------------------
> >
> > ------
> > You are subscribed as [EMAIL PROTECTED]
> > Web Interface:
> > http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
> > t_mode=&la
> > ng=e
> > nglish
> > To unsubscribe send a blank email to %%email.unsub%%
> >
> >
> >
> >
> >
> >
> >
> >
> **********************************************************************
> > The information contained in this communication is confidential, is
> > intended only for the use of the recipient named above, and may be
> > legally privileged. If the reader of this message is not
> the intended
> > recipient, you are hereby notified that any dissemination,
> > distribution, or copying of this communication is strictly
> > prohibited. If you have received this communication in error,
> > please re-send this communication to the sender and
> > delete the original message or any copy of it from your
> > computer system. Thank You.
> >
> >
> > ------
> > You are subscribed as [EMAIL PROTECTED]
> > Web Interface:
> > http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
> t_mode=&la
> ng=english
> To unsubscribe send a blank email to %%email.unsub%%
>
>
>
>
>
> ------
> You are subscribed as [EMAIL PROTECTED]
> Web Interface:
> http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
> t_mode=&la
> ng=english
> To unsubscribe send a blank email to %%email.unsub%%
>
> ------
> You are subscribed as [EMAIL PROTECTED]
> Web Interface:
> http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
> t_mode=&la
> ng=e
> nglish
> To unsubscribe send a blank email to %%email.unsub%%
>
> ------
> You are subscribed as [EMAIL PROTECTED]
> Web Interface:
> http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
> t_mode=&la
> ng=english
> To unsubscribe send a blank email to %%email.unsub%%
>
> ------
> You are subscribed as [EMAIL PROTECTED]
> Web Interface:
> http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&tex
t_mode=&la
ng=english
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=e
nglish
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=english
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=e
nglish
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=e
nglish
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=english
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=e
nglish
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&la
ng=english
To unsubscribe send a blank email to %%email.unsub%%
------
You are subscribed as [EMAIL PROTECTED]
Web Interface:
http://intm-dl.sparklist.com/cgi-bin/lyris.pl?enter=nt2000&text_mode=&lang=english
To unsubscribe send a blank email to [EMAIL PROTECTED]
