<% '===================================================== '| | '| MEMBERS MENU | '| | '===================================================== %> <% '------------ Variable Definition ------------- Dim parMemberMenu '------------ Constants Declaration ----------- '------------ Variable Init ------------------- 'parMemberMenu = QStrPar("membermenu") '---------------------------------------------- %> <%Sub Member_Menu( SSmenu )%> <%' Views submenu%> <%If SSmenu = "views" Then%> <%End If%> <%' Views submenu%> <%If SSmenu = "my details" Then%> <%End If%>

	Personal View
	Public View
	My Details
	Account Details
	Change Password
	My Roles

<%End Sub%>