Solved

Howto delete AccountExpirationDate

Posted on 2009-07-12
2
642 Views
Last Modified: 2012-05-07
I know how to set the AccountExpirationDate, but I do not know how to delete it? (I tried to set the Date to nothing, but that does not work.)

Dim Fieldname As String = "AccountExpirationDate"

        Dim dt As Date = _getDate(fieldname)

        Dim type As Type = mCurUsr.NativeObject.GetType

        If value.Ticks = 0 Then

            If Not dt.Ticks = 0 Then

                _setModified()

                type.InvokeMember(Fieldname, BindingFlags.SetProperty, Nothing, mCurUsr.NativeObject, New Object() {value})

                mF &= ", " & Fieldname

            End If

        Else

            If Not dt.Ticks = 0 Then dt.AddDays(-1)

            If Not value.Date = dt.Date Then

                _setModified()

                type.InvokeMember(Fieldname, BindingFlags.SetProperty, Nothing, mCurUsr.NativeObject, New Object() {value})

                mF &= ", " & Fieldname
 

            End If

        End If

Open in new window

0
Comment
Question by:ofnet
2 Comments
 
LVL 31

Accepted Solution

by:
Henrik Johansson earned 50 total points
ID: 24835623
To set the user to never expire, the AccountExpires attribute is set to 9223372036854775807 (January 1st, 1601)
0
 

Author Closing Comment

by:ofnet
ID: 31602602
The Date 1/1/1601 did not work, but 1/1/1970 did work. Greate. Thx.
0

Join & Write a Comment

Suggested Solutions

A short article about problems I had with the new location API and permissions in Marshmallow
Resolve DNS query failed errors for Exchange
This tutorial will walk an individual through the process of transferring the five major, necessary Active Directory Roles, commonly referred to as the FSMO roles from a Windows Server 2008 domain controller to a Windows Server 2012 domain controlle…
This tutorial will walk an individual through the process of transferring the five major, necessary Active Directory Roles, commonly referred to as the FSMO roles to another domain controller. Log onto the new domain controller with a user account t…

744 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

9 Experts available now in Live!

Get 1:1 Help Now