script layout

Subject: Script Layout

' initial conditions will take us to registration page
setWebPage "Register: Mercury Tours", "Register: Mercury Tours"
maximizeBrowser()
Private const SUCCESS_SCENARIO = 0
Private const VALIDATE_USERNAME = 1
Private const VALIDATE_PASSWORDS = 2
Private const VALIDATE_GENERAL = 3
Private const VALIDATE_EMAIL = 4
Private const VALIDATE_ZIP = 5
Private const VALIDATE_PHONE = 6
Private const RE_REGISTRATION = 7

Function registerUser(testType, submitType)
' code calls lib function to populate form and submit
End Function
Function verifyLogin()
' verify registered user can login
End Function
Function verifyProfile()
' verify user profile
End Function

registerUser SUCCESS_SCENARIO, TRUE
registerUser VALIDATE_USERNAME, TRUE
registerUser VALIDATE_PASSWORDS, TRUE
registerUser VALIDATE_GENERAL, FALSE
registerUser VALIDATE_EMAIL, TRUE
registerUser VALIDATE_ZIP, TRUE
registerUser VALIDATE_PHONE, TRUE
registerUser RE_REGISTRATION, TRUE




private m_webBrowser
private m_webPage
function setWebPage(browserTitle, pageTitle)
Set m_webBrowser = Browser("Title:=" & browserTitle)
Set m_webPage = m_webBrowser.Page("Title:=" & pageTitle)
end function
function maximizeBrowser()
If (IsObject(m_webBrowser)) Then
m_webBrowser.FullScreen
else
MsgBox "Browser is not set"
End If
end function