Yup - DN isn't exposed through the ADSI interface. That's what I thought. -------------------------------------------------------------- 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 11: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&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&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=&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]
