<% Dim IsLogin
IsLogin = Session("status")
if IsLogin<>1 then
response.redirect("login.asp?login=no")
end if
Dim admin
admin = Session("admin")
if admin<>1 then
response.redirect("dalej.asp")
end if
%>
Moduł administracyjny wirtyny AGS
<%
Dim blad
blad=Request("blad")
if blad="1" then %>
Jest już użytkownik o takim loginie.
Wybierz inny login.
<%end if
if blad="2" then %>
Imię lub nazwisko, login i hasło nie mog± być puste.