Jeg vil ikke give den fulde kode ud sådan bare unden videre....det ku jo være at du modtog den gratis og benyttede den til noget hvor du tjente penge på det script.
Den eneste måde du kan gøre det på er at bruge ADSI. Og du siger at du kender én der kan kode det... så er her lidt hjælp til at gå igang.
IIS Admin object referencer til ADpath finder du her:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/iisref/html/psdk/asp/aore94th.aspMed den i hånden kan du pille ved alt i metabasen. (husk lige backup af den inden i leger :-))
Her er det eks. jeg bruger til at oprette brugeren:
sub CreateUser(Full_Name,username,email,expires)
Dim Container
Dim NewUser
Dim CurrentDate
Dim ExpireDate
Dim HomeDir
HomeDir = \"d:\\web\\users\\\" & username
CurrentDate = DateSerial(Year(Now),Month(Now),Day(Now))
ExpireDate = DateAdd(\"d\",45,CurrentDate)
Set Container = GetObject(\"
WinNT://Navnet_PÅ_Din_NTBox\")
Set NewUser = Container.Create(\"user\", username)
NewUser.FullName = Full_Name
NewUser.Description = email
NewUser.AccountExpirationDate = ExpireDate
NewUser.HomeDirectory = HomeDir
NewUser.SetInfo
NewUser.SetPassword(username)
Response.write \"<h5>The users account will expire on \" & ExpireDate & \"</h5>\"
expires = ExpireDate
end sub
- \"username\" requester du feks fra en form
- AccountExpirationDate behøver du jo ik at have med, så den ka du bare rem\' ud
men ellers kig på
http://www.hostingcontroller.com/english/index.html