<%
DIM strEmail, strSubject, strComments
strEmail = Request.Form("Email")
strSubject = Request.Form("Subject")
strComments = Request.Form("Comments")
IF strEmail <> "" AND strSubject <> "" AND strComments <> "" THEN
' Process the form as you like here
' For example enter form to your database or send it via email
ELSE
Response.Write "Please click back on your browser and complete the following fields:
"
IF strEmail <> "" THEN
ELSE
Response.Write "• Email
"
END IF
IF strSubject<> "" THEN
ELSE
Response.Write "• Subject
"
END IF
IF strComments <> "" THEN
ELSE
Response.Write "• Comments
"
END IF
END IF
%>