What are you using for the "LDAP://OU=Users,DC=YourDomain,DC=com"; line?
-----Original Message----- From: Weatherly, Rob [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 15, 2003 10:35 AM To: NT 2000 Discussions Subject: RE: Active Directory query Actually I lied It does not write out the last logon time sorry -------------------------------- Rob Weatherly -------------------------------- -----Original Message----- From: Weatherly, Rob Sent: Tuesday, July 15, 2003 11:31 AM To: NT 2000 Discussions Subject: RE: Active Directory query If I change 'User.LastLogin' to 'User.LastLogon' It works -------------------------------- Rob Weatherly -------------------------------- -----Original Message----- From: Weatherly, Rob Sent: Tuesday, July 15, 2003 11:29 AM To: NT 2000 Discussions Subject: RE: Active Directory query No, I get an error at Line: 5 Char: 3 Error: Object doesn't support this property or method: 'User.LastLogin' -------------------------------- Rob Weatherly -------------------------------- -----Original Message----- From: Evans Chris - cevans [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 15, 2003 11:25 AM To: NT 2000 Discussions Subject: RE: Active Directory query Does this work for you? You will need to change the first line to whatever OU your users are in. On Error Resume Next Dim OU Set OU = GetObject("LDAP://OU=Users,DC=YourDomain,DC=com";) For Each User in OU Wscript.Echo User.LastLogin & "," & User.distinguishedName & "," & user.name NEXT -----Original Message----- From: Weatherly, Rob [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 15, 2003 10:03 AM To: NT 2000 Discussions Subject: RE: Active Directory query Using the original code from before (below) I get the following error Error: Line: 13 Char: 6 Error: the directory property cannot be found in the cache Code: 8000500D Source: Active Directory '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("User") For Each User in Container 'Wscript.Echo User.name & " " & User.LastLogin File.Writeline User.name & "," & user.LastLogin Next -------------------------------- Rob Weatherly -------------------------------- -----Original Message----- From: Evans Chris - cevans [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 15, 2003 10:47 AM To: NT 2000 Discussions Subject: RE: Active Directory query Right. They are all users not corps. :-) a little humor there. Although I sometimes think some of mine are corpse. -----Original Message----- From: Roger Seielstad [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 15, 2003 9:40 AM To: NT 2000 Discussions Subject: RE: Active Directory query You are. The filter is meant to filter by object type, not by container. If you want it by container, you can't use the ADSI style binding (i.e. WINNT://) Comment out the on error resume next line and try it again. You're probably not binding to the domain correctly. Is the NetBIOS name of your domain 'handleman' or is it something else? -------------------------------------------------------------- Roger D. Seielstad - MTS MCSE MS-MVP Sr. Systems Administrator Inovis Inc. > -----Original Message----- > From: Weatherly, Rob [mailto:[EMAIL PROTECTED] > Sent: Tuesday, July 15, 2003 10:33 AM > To: NT 2000 Discussions > Subject: RE: Active Directory query > > > 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&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=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=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=&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=&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=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=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=&lang=english To unsubscribe send a blank email to [EMAIL PROTECTED]
