几年前,我在 ASP 中创建了一个“sendmail”脚本,包括电子邮件格式验证和 CAPTCHA 验证。它运作良好。
我已经有一段时间没有通过表格收到任何询问了,所以我想自己测试一下联系页面。瞧,脚本似乎不再起作用。
有谁知道我的方法(请参见下文)在过去几年中是否已经过时?!现在在(经典)ASP 中有不同的推荐方式吗?
这是我脚本的第一部分(为保护隐私而更改了电子邮件地址):
<%
Dim mail
Dim msgtext
Set mail = CreateObject("CDO.Message")
mail.To = "abcdef@ymail.com"
mail.Cc = "abcdefg@gmail.com"
mail.From = Request.Form("From")
mail.Subject = "Enquiry from website"
mail.TextBody = "From: " & Request.Form("Fname") & vbCRLF & "Message: " & Replace(Request.Form("Body"),vbCrLf ,"") & vbCRLF & "Telephone: " & Request.Form("Phone") & vbCRLF
if not IsEmpty(Request.Form("btnTest")) then
if TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) then
else
msgtext = "c"
end if
end if
mail.Send()
'Destroy the mail object!
Set mail = nothing
msgtext = "y"
%>