|
The following is a selective list of participants from across the U.S. and around Asia/Pacific who attended the APBO 2008 Conference. To sort the participant list by a particular column, please click the column header. <% 'Dimension variables Dim adoCon 'Holds the Database Connection Object Dim rsParticipants 'Holds the recordset for the records in the database Dim strSQL 'Holds the SQL query to query the database 'Create an ADO connection object Set adoCon = Server.CreateObject("ADODB.Connection") 'Set an active connection to the Connection object using a DSN-less connection adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("fpdb/apbo2008.mdb") 'Create an ADO recordset object Set rsParticipants = Server.CreateObject("ADODB.Recordset") If Request.QueryString.Count = 0 Then orderCriterion = "lastName" Else orderCriterion = Request.QueryString("sortCriterion") End If 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT participants.firstName, participants.lastName, participants.jobTitle, participants.affiliation, participants.country FROM participants ORDER BY " + orderCriterion +" ASC;" 'Open the recordset with the SQL query rsParticipants.Open strSQL, adoCon count = 0 'Loop through the recordset Response.Write("
|