<%
if session("admin")="ok" then u = request.querystring("user")
p = request.querystring("pass")
set oConn=Server.CreateObject("adodb.connection")
oConn.Open "DBQ=" & Server.Mappath("../../db/jewel.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
oConn.execute "INSERT INTO Managers(Username, Password) VALUES ('" & u & "','" & p & "');"
oConn.close
set oConn = nothing
%>
<html dir="rtl">
<body>
<font face="arial" size="5"><p align="center"><b>נוסף מנהל חדש</b></font></p>
</body>
</html>
<% else Response.Redirect "cantlogin.asp"
end if %>
גירסת הדפסה
סגן המנהל
מפקח
Winner
צל"ש
מומחה
