Yes You Can Sing!

<% Public Function navBar(navtab) Dim tab(12,1) 'Tab array which will contain the tab value and the URL to be loaded. Dim temp 'Temporary variable used to carry the HTML throughout the routine Dim curFolder 'Carries the Loaded URL page info Dim spacer 'Serves as just a HTML Spacer. 'Reading the passed argument curFolder = navtab 'Constructing the Navigation Array tab(0,0) = ("home") tab(0,1) = ("index.asp") tab(1,0) = ("about") tab(1,1) = ("about.asp") tab(2,0) = ("bios") tab(2,1) = ("bios.asp") tab(3,0) = ("individual") tab(3,1) = ("individual.asp") tab(4,0) = ("advanced") tab(4,1) = ("advanced.asp") tab(5,0) = ("workshops") tab(5,1) = ("workshops.asp") tab(6,0) = ("corporate") tab(6,1) = ("corporate.asp") tab(7,0) = ("parties") tab(7,1) = ("party.asp") tab(8,0) = ("photos") tab(8,1) = ("photos.asp") tab(9,0) = ("contact") tab(9,1) = ("contact.asp") tab(10,0) = ("testimonials") tab(10,1) = ("testimonials.asp") tab(11,0) = ("gifts") tab(11,1) = ("vouchers.asp") 'Start building the Navigation Array temp = "" else temp = temp + spacer temp = temp + " "&tab(i,0)&" " end if Next temp = temp +"" temp = temp +"

" For i = Lbound(tab) to UBound(tab) spacer = "

" If i = LBound(tab) then spacer = "" end if if curFolder = tab(i,0) then temp = temp + spacer temp = temp + " "&tab(i,0)&"

" 'Write the Array to the browser navBar = Response.Write(temp) End Function %> Yes You Can Sing!

<%navBar("home")%>

Are you afraid of singing or have been told you can't?
Can you sing already but want to discover your 'own voice'?
Do you want to learn to sing to your full potential?
Do you want to increase your confidence in public speaking job interviews or in life?

Yes! You Can Sing! Will help you…

You will improve your singing voice and expression
You will increase your vocal power, range, colour, expression and emotion!

Build confidence ~ de-stress ~ have fun!