IBM OS/2 LAN Server REXX Utility DLL


Inf-HTML [About][Toc][Index] 0.9b (c) 1995 Peter Childs


NETEXPIREPASSWORD Expire password


The function expires a password for a userid.   
Syntax 

MyRc = NetSetInfo(NETEXPIREPASSWORD, SrvName, UserId)

  
Parameters 
The parameters specified are: 
SrvName           The computer name of the domain controller 
UserId            The userid to expire password on 
  
Note 
The server computer name can be specified as '' for a local domain 
controller.   
Example   

/* Expire password for a userid */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETEXPIREPASSWORD = 400
DcName            = '\\ILIDC'
Userid            = 'DEPT001'

myRc = NetSetInfo(NETEXPIREPASSWORD, DcName, Userid)

if myRc <> '0' then do
 say 'Got error from NetSetInfo() ' myRc
 call DropLsRxutFuncs
 exit 9
end

say 'Password expired successfully for ' Userid

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit 0

  
Example Output   

Password expired successfully for  DEPT001



Inf-HTML End Run - Successful