<% REM Column Span Value %> <% HTML_CS = 3 %> <% HTML_INDENT = FALSE %>

	Customer Listing
<%If Not IsEmpty(Session("ItemCount")) Then iCount = Session("ItemCount") Else iCount = 0 End If If iCount > 0 Then%> <%End If%>	<% Set RS = Conn.Execute("SELECT * FROM Customers") %> <% Do While Not RS.EOF %> <% RS.MoveNext Loop RS.close Set RS = Nothing %> Company Name Contact Name E-mail address City State/Province <%=RS("CompanyName")%> <%=RS("ContactLastName") & ", " & RS("ContactFirstName")%> "><%=RS("EmailAddress")%> <%=RS("City")%> <%=RS("StateOrProvince")%>