According to the Scripting Guy article linked below there also is a property AccountExpirationDate.

I don't have AD here @ home so I cant test but as far as I can see this should work (altered Shawn's code a bit).

 Code:
Break On

$= SetOption("WrapAtEol","On")

$User = GetObject("WinNT://@LDOMAIN/@USERID,user")

If @ERROR = 0
	$Date = $User.AccountExpirationDate
	If @ERROR = 0
		?"Your account will expire on " + $Date
	EndIf
EndIf

If @ERROR
	? "Error @ERROR : @SERROR"
EndIf

Exit 0

Hey, Scripting Guy! How Can I Return a List of All the Users Whose User Account Never Expires?

Edited by Mart (2007-06-20 07:25 PM)
Edit Reason: D#mn those typo's.
_________________________
Mart

- Chuck Norris once sold ebay to ebay on ebay.