ADSI problem

yeewaitu · January 5th, 2004, 09:30 PM

Hi guys and gals!

Not sure if this question belongs here, but I would ask it anyway.

I am using ADSI to find out the last login information for my windows users. However, I am getting the wrong value. Can anyone help me out here?

See below for my code.

Code:

<TABLE BORDER="1" CELLSPACING="0">
<TR bgcolor="#C0C0C0">
    <TD><b>Username</b></TD>
    <TD><b>Name</b></TD>
    <TD><b>Description</b></TD>
    <TD><b>Last Login</b></TD>
    <TD><b>Days</b></TD>
    <TD><b>Password Expiration</b></TD>
    <TD><b>Disabled</b></TD>

</TR>
<%

Dim today, clock, both, numberofdays 'Dim is a keyword to declare variables like var for javascript
today = Date 'Date is a built in VBScript function that returns the current Date 
clock = Time ' Time is a built in VBScript function that returns the current Time 
both = Now ' Now is a built in VBScript function that returns both the Date and the Time
numberofdays = Request.Form("numdays")

Dim sUserInfo

On Error Resume Next

Set oContainer = GetObject("WinNT://Domain name/computername")

For Each oIADs In oContainer

    If (oIADs.Class = "User") Then
        Set oUser = oIADs

        UserName = ""
        FullName = ""
        Descripcion = ""
        LastLogin = ""
        PasswordExpiration = ""
        Disabled = ""

        UserName = oUser.Name
        FullName = oUser.FullName
        Descripcion = oUser.Description
        LastLogin = oUser.LastLogin
        PasswordExpiration = oUser.PasswordExpirationDate
        Disabled = oUser.AccountDisabled 
        Days = dateDiff("d",oUser.LastLogin,today)

%>

<TR>
    <TD><%=UserName%> </TD>
    <TD><%=FullName%> </TD>
    <TD><%=Descripcion%> </TD>
    <TD><%=LastLogin%> </TD>
    <TD><%=Days%> </TD>
    <TD><%=PasswordExpiration%> </TD>
    <TD><%=Disabled%> </TD>

<%    End If%>    
<%Next%>
</TABLE>

I have tried the PDC and BDC computer names, but they reflect differing values. Can anyone help?

Would it make a difference if I coded this in VB?

Thanks! =)

YWT

yeewaitu · January 8th, 2004, 03:41 AM

Is there anyone who can help me out here?

YWT

mega · January 8th, 2004, 04:36 PM

Do you get an error message if you comment out On Error Resume Next?
Which value is wrong?

yeewaitu · January 8th, 2004, 08:43 PM

Hmmmm ... Strangely. It gives me the following error message.

-------
Active Directory (0x8000500D)
The directory property cannot be found in the cache.
-------

I uncommented the "On Error Resume Next and the LastLogin property value is correct and wrong for some. But basically, I cannot use wrong values for this. Anywayz, I tried using VB for this. The result is the same. I get some correct results and I get some wrong results.

Is there any way to resolve this?

Please help. Thanks!

YWT

yeewaitu · January 16th, 2004, 02:59 AM

Well, I will answer my own question then.

The reason for this is that the BDC and PDC have different last login values. Thus, some results and incorrect and some are correct. You would need to compare the lastlogin with the BDC and PDC and capture the latest reading between them and choose to display it.

I suggest that you use VBS to do this rather than ASP. This is because it can be quite time consuming, depending on your number of users.

YWT

aliayen · February 24th, 2004, 03:51 PM

Hello,

This may mean that the user you created did never logged on to the system.

Try changing password by .ChangePassword method, and use LastLogin property.

Txs.

http://www.aliayen.com (Turkish)