




<%
OPTION EXPLICIT

Dim dbConn, MdbFilePath, SQL_query, results

Set dbConn = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("table_article.mdb")
dbConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
SQL_query = "SELECT * FROM tbl_people"

if (Request.QueryString("sort")) then
	SQL_query=SQL_query & " ORDER BY lastname"
end if

Set results = dbConn.Execute(SQL_query)

%>
<html>
<head>
	<link rel="stylesheet" type="text/css" href="http://www.greggriffiths.org/style.css">

	<script language="javascript" type="text/javascript">
		function personRecord(firstName,lastName)
		{
			this.firstName=firstName;
			this.lastName=lastName;
		}

		// Create new main array.
		var personArray = new Array();

		<%
			Dim count
			count=0

			do while not results.EOF

				response.write("personArray[" & count & "] = new personRecord('" & results("firstname") & "','" & results("lastname") & "');")

				count=count+1

				results.movenext
			loop
		%>

		function buildIndex()
		{
			var swapit=0; // do we need to do a swap

			// create some temporary variables to store the data when we do the swapping
			var temp_first_name="";
			var temp_last_name="";

			// set a local variable equal to the length of the array
			var maxPeople=personArray.length;

			// Bubble sort by Last Name alphabetically
			for (i=0;i<maxPeople;i++)
			{
				if ((i+1)<maxPeople)
				{
					for (j=(i+1);j<maxPeople;j++)
					{
						swapit=0; // reset the swap flag

						if (personArray[i].lastName > personArray[j].lastName)
						{
							swapit=1;
						}

						// if we need to do the swap
						if (swapit==1)
						{
							temp_first_name=personArray[i].firstName;
							temp_last_name=personArray[i].lastName;
							personArray[i].firstName=personArray[j].firstName;
							personArray[i].lastName=personArray[j].lastName;
							personArray[j].firstName=temp_first_name;
							personArray[j].lastName=temp_last_name;
						}
					}
				}
			}
		}

		function printTable()
		{
			for  (i=0;i<personArray.length;i++)
			{
				document.write("<tr>");
				document.write("	<td>" + personArray[i].firstName + "</td>");
				document.write("	<td>" + personArray[i].lastName + "</td>");
				document.write("</tr>");
			}
		}

		function processQS(field2find)
		{
			// check for Parameters
			if (document.location.search.toString().length>0)
			{
				var QS = document.location.search.substring(1);

				var argname=null;
				var argvalue=null;
				var pairs = QS.split('&');

				for (i=0;i<pairs.length;i++)
				{
					var pos=pairs[i].indexOf('=');

					if (pos!=-1)
					{
						var argname=pairs[i].substring(0,pos);
						var argvalue=pairs[i].substring(pos+1);

						if (argname.toLowerCase()==field2find.toString().toLowerCase())
						{
							return(unescape(argvalue));
						}
					}
				}

				// if we get here we have no match
				return "";
			}
		}

		if (processQS("sorted"))
		{
			buildIndex();
		}

	</script>

</head>
<body>
	<table class="default">
		<tr>
			<th>First Name</th>
			<th>Last Name</th>

		</tr>
		<script language="javascript" type="text/javascript">
			printTable();
		</script>
	</table>
	<p>
	Sort <a href="demo10.asp?sorted=true">Alphabetically</a><br/>

	<a href="demo10.asp">Return to Initial order</a>
</body>
</html>