Selects Distintos

Ai pessoal,

Tenho no banco uma tabela de clientes com 11 campos, sendo que o último deles

é onde eu os diferencio, gostaria de exibir os (Tipos de Contato 1, 2 ou 3).

Alguém pode me ajudar ?

Pensei em fazer um Select Box para exibir conforme o escolhido, mas não sei, ou coloca-los em 3 links distintos..

Da uma força ai galera

Abraço

ASP [/tr][tr]<% ' Conexão DataBase

Set Conn = Server.CreateObject("ADODB.CONNECTION")

Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=E:\asp\databaseall.mdb"

' Objeto RECORDSET

Set rs = Server.CreateObject("ADODB.RECORDSET")

rs.CursorType = adOpenKeyset

	rs.Open "SELECT * FROM Contatos order by Nome", Conn

	%>

<table width="100%" border="0" cellspacing="0" cellpadding="0">

 <tr>

 <td><img src="img/erico_contatos.jpg" width="174" height="40"></td>

 </tr>

</table>

<br>

<br>

 

	<%

	'

	Do While Not rs.eof

	%>

 

<table width="100%" border="0" cellspacing="0" cellpadding="0">

 <tr>

 <td height="18"><div align="left"><span class="style7"><%=rs("Nome")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Telefone Residencial1")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Telefone Residencial2")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Telefone Celular")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Telefone Comercial1")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Endereço")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("Web Site")%></span></div></td>

 <td><div align="left"><span class="style7"><%=rs("E-mail")%></span></div></td>

 </tr>

</table>

 

	<%

	rs.Movenext

	Loop

	' Libro Memória no Server

	rs.close

	'Fecho Conexão

	Conn.Close

	Set Conn = Nothing

	%>

[/tr]

Essa é a exibição sem distinção

Abraços e Obrigado