Pues... mmm, creas un form con un textbox para que el usuario meta el mail , llamémoslo "email" en la siguiente linea cambias
 
sDestinatario="
[email protected]" 
por 
sDestinatario=Request.Form("email") 
y en las variables Scuerpo metes los Rs("Algo") es decir los recordset que quieras. 
SAludos     
<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>