I've checked your code and it works OK provided that you supply values for the variables. Below is your code that I slightly changed, in which I received an email after running it.
<%@LANGUAGE="VBSCRIPT"%>
<%
Dim whorespond, strEmail, fname, lname, responsetocomments
whorespond =...