Northern Shine - Live Band

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsGigInfo__MMColParam rsGigInfo__MMColParam = "1" If (Request.QueryString("GigID") <> "") Then rsGigInfo__MMColParam = Request.QueryString("GigID") End If %> <% Dim rsGigInfo Dim rsGigInfo_numRows Set rsGigInfo = Server.CreateObject("ADODB.Recordset") rsGigInfo.ActiveConnection = MM_NorthernShineData_STRING rsGigInfo.Source = "SELECT * FROM Gigs WHERE GigID = " + Replace(rsGigInfo__MMColParam, "'", "''") + "" rsGigInfo.CursorType = 0 rsGigInfo.CursorLocation = 2 rsGigInfo.LockType = 1 rsGigInfo.Open() rsGigInfo_numRows = 0 %> Northern Shine - Live Band

Northern Shine at

<%=(rsGigInfo.Fields.Item("Venue").Value)%>
<%=(rsGigInfo.Fields.Item("Address1").Value)%>
<%=(rsGigInfo.Fields.Item("Address2").Value)%>
<%=(rsGigInfo.Fields.Item("Address3").Value)%>
<%=(rsGigInfo.Fields.Item("Address4").Value)%>

On

<%= DoDateTime((rsGigInfo.Fields.Item("GigDate").Value), 1, 1033) %>

" target="_blank">Map

<% rsGigInfo.Close() Set rsGigInfo = Nothing %>