%@LANGUAGE="VBSCRIPT"%>
<%
' *** Validate request to log in to this site.
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString <> "" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername = CStr(Request.Form("username"))
If MM_valUsername <> "" Then
Dim MM_fldUserAuthorization
Dim MM_redirectLoginSuccess
Dim MM_redirectLoginFailed
Dim MM_loginSQL
Dim MM_rsUser
Dim MM_rsUser_cmd
MM_fldUserAuthorization = ""
MM_redirectLoginSuccess = "Owners/OwnerInformation.asp"
MM_redirectLoginFailed = "Owners/OwnerLogInFailed.asp"
MM_loginSQL = "SELECT OwnerName, OwnerPW"
If MM_fldUserAuthorization <> "" Then MM_loginSQL = MM_loginSQL & "," & MM_fldUserAuthorization
MM_loginSQL = MM_loginSQL & " FROM OwnerLogIn WHERE OwnerName = ? AND OwnerPW = ?"
Set MM_rsUser_cmd = Server.CreateObject ("ADODB.Command")
MM_rsUser_cmd.ActiveConnection = MM_DSN_MailingList_STRING
MM_rsUser_cmd.CommandText = MM_loginSQL
MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param1", 200, 1, 50, MM_valUsername) ' adVarChar
MM_rsUser_cmd.Parameters.Append MM_rsUser_cmd.CreateParameter("param2", 200, 1, 50, Request.Form("password")) ' adVarChar
MM_rsUser_cmd.Prepared = true
Set MM_rsUser = MM_rsUser_cmd.Execute
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username") = MM_valUsername
If (MM_fldUserAuthorization <> "") Then
Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
Else
Session("MM_UserAuthorization") = ""
End If
if CStr(Request.QueryString("accessdenied")) <> "" And false Then
MM_redirectLoginSuccess = Request.QueryString("accessdenied")
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>
The Resort On Cocoa Beach - Orlando's Closest Beach
|
|
|
|
Make your Reservations Today!
|
|
  |
Overlooking the ocean in Cocoa Beach, The Resort on Cocoa Beach offers a vacation getaway as active or as relaxing as you choose to make it. Enjoy a full array of outdoor entertainment, including water sports,sailing, golfing, surfing, fishing and much more. The Resort is 15 minutes from the Kennedy Space Center, and all of the Central Florida attractions, such as the Walt Disney World Resort and UNIVERSAL Orlando, are just 50 minutes away. No matter what you're looking for, it's right at your doorstep.
|
Home | Around The Resort | Owner
Information | Rental Information
Employment | In
The Cinema | Activities & The
Area
Location | Virtual Tours | Join Our E-Club | Contact
Us
The Resort On Cocoa Beach
1600 N. Atlantic Avenue
Cocoa Beach, FL 32931
321-783-4000
|
|
| |
|
|
|
Production & Hosting By
|
|
|
Copyright 2010©The Resort On Cocoa Beach
All rights reserved.