Paste into an html file. Click on the "click" at bottom of frame. It connects.
Click Me
Just demonstrates that the CGI responds,
This is what is responding:
#Login User
($action eq "LoginUser") && do {
#Attempt the login
manageusers::OpenConnection();
warn("Opening The Login Usr Query: $query");
my ($result, $login_timeout) = LoginUser($query);
if ($result == 0){
manageusers::CloseConnection();
warn("Login failed. Creating response.");
CreateLoginUserFailedForm("The Login User Name or Password
+is invalid. Please try again or contact the office.");
return; #exit;
}
|