pues es muy facil, simplemente las mismas variables que usas para actualizar el recordset las usas para componer el mail.
La forma de enviar el mail depende si usas, ASPemail, cdonts, jmail , etc.
ejemplo:
' declaramos la conexion, abrimos el recodset, etc, etc
rs("nombre")=varnombre
rs("email")=varemail
rs.update
rs.close
' y aqui el codigo del email, depende de lo que uses (ejemplo con Jmail)
<%
Set JMail = Server.CreateObject ("JMail.SMTPMail")
' This is my local SMTP server
JMail.ServerAddress = "smtp.tuservidor.com:25"
' This is me....
JMail.Sender = "
[email protected]"
JMail.Subject = "Tu registro en tusitio..."
' Get the recipients mailbox from a form (note the lack of a equal sign).
JMail.AddRecipient varemail
' The body property is both read and write.
' If you want to append text to the body you can
' use JMail.Body = JMail.Body & "Hello world! "
' or you can use JMail.AppendText "Hello World! "
' which in many cases is easier to use.
JMail.Body = "Gracias por registrarte, "& nombre &" Esperamos que disfrutes de tu estancia" & vbCrLf &_
"Tu Nombre de usuario es: " & nombre & " Tu Paswword es: " & password
' 1 - highest priority (Urgent)
' 3 - normal
' 5 - lowest
JMail.Priority = 1
JMail.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")
JMail.Execute
%>