crear un e-mail y mandarselos

[HPNeo]

Cambia:

<% SET conexion=server.createobject("ADODB.connection")
conexion.open "nombre de mi alias no?¿"
sql="select * from nombre;"
SET tabla=conexion.execute(sql)

%>

Por...

Código:

<% Set conexion = Server.CreateObject("ADODB.Connection")
   conexion.Open "alias"
    sql = "select * from nombre"
    Set tabla = Server.CreateObject ("ADODB.RecordSet")
    tabla.Open sql, conexion
%>

En esto si soy un experto:

Código:

 <%
DO WHILE NOT tabla.EOF
tabla.FIELDS("nombre")
tabla.MOVENEXT
     LOOP
tabla.CLOSE
    conexion.CLOSE
%>