27 lines
819 B
Plaintext
27 lines
819 B
Plaintext
<!--#INCLUDE file="head.html"-->
|
|
<%
|
|
newuser=request.form("newuser")
|
|
passwordA=request.form("passwordA")
|
|
passwordB=request.form("passwordB")
|
|
userrights=request.form("userrights")
|
|
|
|
if request.form("update.x")>0 then
|
|
if passwordA<>passwordB or len(passwordA)<5 then%>
|
|
<h2>Wachtwoord fout</h2>
|
|
<%else
|
|
set filepath = directory.CreateTextFile(userdir+"/"+newuser+".txt",8,true)
|
|
filepath.writeline(passwordA)
|
|
filepath.writeline(userrights)
|
|
filepath.close
|
|
set filepath=nothing
|
|
set directory=nothing%>
|
|
<h2>Gebruiker aangemaakt</h2>
|
|
<%end if
|
|
else
|
|
if (directory.fileexists(userdir+"/"+newuser+".txt"))=true then
|
|
directory.deletefile(userdir+"/"+newuser+".txt")%>
|
|
<h2>Gebruiker verwijderd</h2>
|
|
<%else%>
|
|
<h2>Gebruiker bestaat niet</h2>
|
|
<%end if
|
|
end if%> |