[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-win32-admin
Subject:    Re: let users create users?
From:       "Bill S Naftel" <bsnaft () solutia ! com>
Date:       1999-10-29 12:25:25
[Download RAW message or body]

This solution is from just a simple journeyman type who does love Perl.

Run a server service under an id with the muscle to create new users.
hang a ChangeNotify on a dir share which can only be accessed by authorized 
users.
The authorized user script creates a text file, a request, with the new 
logon info in this share - this provides an audit if the text file 
incorporates the authorized user's logon.

when the request file lands in the shared dir the service grabs it & 
creates the new user. Perhaps afterwards it sends some mail to the 
authorized user and/or others.  Perhaps saves the request file to some 
protected area.

This way the authorized user needs nothing special or tricky, just access 
enough to write the request file to the share.

of course in the service the change notify is in a recursive subroutine - 
what was NOT immediately obvious to this peasant is that before resetting
the $notify->wait it is wise to first check to see if any MORE request 
files have appeared.

simply,
 bill

---
You are currently subscribed to perl-win32-admin as: [perl-win32-admin@progressive-comp.com]
To unsubscribe, forward this message to
         leave-perl-win32-admin-90393O@lyris.activestate.com
For non-automated Mailing List support, send email to  
         ListHelp@ActiveState.com

[prev in list] [next in list] [prev in thread] [next in thread]