<%@LANGUAGE="VBSCRIPT"%> <% Dim MM_connDB_STRING MM_connDB_STRING = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/db/database.mdb") Dim Recordset__MMColParam Recordset__MMColParam = "1" If (Request.QueryString("ID") <> "") Then Recordset__MMColParam = Request.QueryString("ID") End If %> <% Dim Recordset Dim Recordset_cmd Dim Recordset_numRows Set Recordset_cmd = Server.CreateObject ("ADODB.Command") Recordset_cmd.ActiveConnection = MM_connDB_STRING Recordset_cmd.CommandText = "SELECT * FROM q_players WHERE ID = ?" Recordset_cmd.Prepared = true Recordset_cmd.Parameters.Append Recordset_cmd.CreateParameter("param1", 5, 1, -1, Recordset__MMColParam) ' adDouble Set Recordset = Recordset_cmd.Execute Recordset_numRows = 0 %> Lofthouse 2000 Brass Band Band Members
_photo.jpg" align="left" />

<%=(Recordset.Fields.Item("FirstName").Value)%> <%=(Recordset.Fields.Item("LastName").Value)%>

<%=(Recordset.Fields.Item("Position").Value)%>

Age: <%=(Recordset.Fields.Item("Age").Value)%>

Occupation: <%=(Recordset.Fields.Item("Occupation").Value)%>

Biography:
<%=(Recordset.Fields.Item("Biography").Value)%>

Highlight: <%=(Recordset.Fields.Item("Highlight").Value)%>

Favourite Piece To Play: <%=(Recordset.Fields.Item("FavPiecePlay").Value)%>

Favourite Piece To Listen To: <%=(Recordset.Fields.Item("FavPieceListen").Value)%>

 

Join Our E-Club

Be the first to hear about upcoming events and learn more about what's going on at Lofthouse Brass Band.


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