%@ Language=VBScript %>
<% Set Username = Request.Form("Username") Set Password = Request.Form("Password") If (Username <> "oscar.staudt") or (Password <> "whatever") then %> <% else Session.Contents.Item("AccessToken") = "OpenSesame" %> <% end if %>