<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim NextGig
Dim NextGig_numRows
Set NextGig = Server.CreateObject("ADODB.Recordset")
NextGig.ActiveConnection = MM_KennyBall_STRING
NextGig.Source = "SELECT * FROM tbl_Gigs WHERE GigDate >= Date() ORDER BY GigDate"
NextGig.CursorType = 0
NextGig.CursorLocation = 2
NextGig.LockType = 1
NextGig.Open()
NextGig_numRows = 0
%>
Kenny Ball and his Jazzmen - Photo Gallery
<%
NextGig.Close()
Set NextGig = Nothing
%>