<% set my_conn= Server.CreateObject("ADODB.Connection") my_conn.Open ConnString strSQL = "Select * from clinics" set rsClinics = my_conn.Execute (strSQL) %> <%While not rsClinics.eof %> <% rsClinics.MoveNext() Wend %>

" target="_blank"> <%=rsClinics("CLINICNAME")%>

<%rsClinics.close set rsClinics=nothing%>