i think your problem maybe that you need to have your requst.form enclosed by " and " for some reason this would not work:
.To = variableemailaddress
but this would:
.To = "&variableemailaddress&"
so try changing you're code to this:
.To = "&Request.Form('recipient')&"
or if that don't work try:
toaddress = Request.Form("recipient")
.To = "&toaddress&"
I think this will be the case also for .From
Hope this helps