<%@ Language = "VBScript" %> <% Option Explicit Response.Buffer = true Response.Expires = -1441 %> <% Dim objRS, strSQL strSQL = "SELECT * FROM client ORDER BY client.clientname" Set objRS = objConn.Execute(strSQL) %> Client List for Unicorn Communications Incorporated
 



Unicorn Communications Client List

<% While Not objRS.EOF Response.Write(Server.HTMLEncode(Trim(objRS("clientname")))) Response.Write("
") objRS.MoveNext Wend %>

©2005 Unicorn Communications Inc. All Rights Reserved