Hola,
<%Set conexion=server.createobject("ADODB.connectio n")
conexion.connectionstring=("El nombre de tu ODBC")
conexion.mode=3 'Lectura y escritura
conexion.open
conexion.beginttrans
Query=("Select * from Tu_Tabla")
Set consulta=conexion.execute(Query)
If not consulta.eof then
variable1=consulta.fields("nombre del campo1")
variable2=consulta.fields("nombre del campo2")
etc..
End if
'Aqui puedes concatenar todas las variables para formar el cuerpo de tu e-mail
Set mail=server.createobject("CDONTS.newmail" ;)
mail.from="
[email protected]"
mail.to="
[email protected]"
mail.body= variable_concatenada
mail.send
Y listo!
Te sirvió? Me avisas