% Dim username, password, errMsg errMsg = "" if request("login") <> "" then username = request("username") password = request("password") call checkLogin(username, password) errMsg = "Login Unsuccessful" end if %>
Unauthorised use of this server is a criminal offence and will lead to prosecution.