% option explicit '--------------------------------------------------------------------------------------------------- 'FORM MAIL SCRIPT '---------------- 'usage: '
" & vbcrlf response.write "Mail to: " & mailto & vbcrlf response.write "Mail from: " & mailfrom & vbcrlf if len(cc) > 0 then response.write "Cc: " & cc & vbcrlf if len(bcc) > 0 then response.write "Bcc: " & bcc & vbcrlf response.write "Subject: " & subject & vbcrlf & string(80,"-") & "
" & vbcrlf response.write "Mail to: " & mailto & vbcrlf response.write "Mail from: " & mailfrom & vbcrlf if len(cc) > 0 then response.write "Cc: " & cc & vbcrlf if len(bcc) > 0 then response.write "Bcc: " & bcc & vbcrlf response.write "Subject: " & subject & vbcrlf & vbcrlf response.write string(80,"-") & vbcrlf & vbcrlf & "" response.write body & "" & vbcrlf & vbcrlf response.write string(80,"-") & vbcrlf & "**END OF EMAIL**