aqui tienes un ejemplo sencillo usando cdonts
los valores de que envies del formulario los puedes recoger dentro de este codigo con un request.
ej
destinatario = request.form("destinatario")
y en mail to pones '"&destinatario&"'
<%
'Creamos el Objeto del mail.
Set Mail = Server.CreateObject ("CDONTS.Newmail")
'nuestra direccion de correo.
Mail.From = "
[email protected]"
'direccion del destinatario.
Mail.To = "
[email protected]"
'El asunto del mensaje a enviar.
Mail.Subject = "Asunto del email"
'Todo el texto que queremos mandar.
Mail.Body = "Cuerpo central del mensaje a enviar"
'Envio del mail....
Mail.Send
'Limpiamos el objeto.
Set Mail = Nothing
%>
ok