<%@LANGUAGE="VBSCRIPT"%> <% set future_gigs = Server.CreateObject("ADODB.Recordset") future_gigs.ActiveConnection = MM_conn_soulstation_db_STRING future_gigs.Source = "SELECT * FROM future_gigs_vw where public=True or private_booking=True ORDER BY gig_date" future_gigs.CursorType = 0 future_gigs.CursorLocation = 2 future_gigs.LockType = 3 future_gigs.Open() future_gigs_numRows = 0 %> <% 'Dim o_Conn, strSQL 'Set o_Conn = CreateObject("ADODB.Connection") 'o_Conn.Open "DATABASE=soulstation_db;UID=;PWD=;DSN=soulstation_db" 'strSQL = "INSERT INTO SoulStationHits (http_user_agent,remote_addr,remote_host) VALUES ('" & _ ' Request.ServerVariables("http_user_agent") & "','" & Request.ServerVariables("remote_addr") & _ ' "','" & Request.ServerVariables("remote_host") & "')" 'o_Conn.Execute strSQL %> <% Dim Repeat2__numRows Repeat2__numRows = -1 Dim Repeat2__index Repeat2__index = 0 future_gigs_numRows = future_gigs_numRows + Repeat2__numRows %> <% function DoDateTime(str, nNamedFormat, nLCID) dim strRet dim nOldLCID strRet = str If (nLCID > -1) Then oldLCID = Session.LCID End If On Error Resume Next If (nLCID > -1) Then Session.LCID = nLCID End If If ((nLCID < 0) Or (Session.LCID = nLCID)) Then strRet = FormatDateTime(str, nNamedFormat) End If If (nLCID > -1) Then Session.LCID = oldLCID End If DoDateTime = strRet End Function %> Soul Shakers - Joyce

  Joyce "The Voice" Allensen (Vocals)

Considered one of the leading blues/soul vocalists in Western Canada, Joyce Allensen, known as "The Voice" to her musical peers, is an incredibly powerful vocalist as well as being a vibrant stage personality which she has honed over the last 30 years as lead singer for such notable acts as 605, Double Image, Mr. Puffy and Victoria's popular R&B band, Soul Station.

Home The Demo The Band The Contact
 
<% future_gigs.Close() %>