Электронная почта не проходит, если содержит URL-адрес ASP

Question

У нас есть сайт типа каталога, размещенный на godaddy.com, разработанный в классическом asp. Очень простые и без колоколов. Среди других функций у нас есть небольшой бит кода, используемый для того, чтобы рекомендовать элемент в каталоге другу, который довольно прямолинейный.

Эта функция внезапно прекратила работу, и рекомендации по электронной почте не исчезли, даже если никаких изменений кода не было сделано. Также не возвращается сообщение об ошибке или сообщения электронной почты!

Никакой прогресс с поддержкой godaddy, но теперь удалось определить проблему, и кажется, что это встроенный url/link в теле сообщения msg, вызывающего его.

Любые идеи о том, как я могу обойти любые ограничения или решить эту проблему?

спасибо!

Dim objNewMail, sBody 

Set objNewMail = Server.CreateObject("CDO.Message") 
objNewMail.From = Request.Form("Your email address") 
objNewMail.Cc = Request.Form("Your email address") 
objNewMail.To = Request.Form("Email to") 
objNewMail.Subject = "Interesting property sent by " & Trim(Request.Form("Your name")) 

sBody = Trim(Request.Form("Your name")) & " wants to show you an interesting property listed by " & vbcr & vbcr 
sBody = sBody & "Example Properties Ltd, Malta" & vbcr & vbcr 
sBody = sBody & "Click the following link to see the property :" & vbcr & vbcr & "http://www.example.com/default.asp?pid=" & Request.Form("pid") 

If Request.Form("Message") <> "" Then 
    sBody = sBody & vbcr & vbcr & "Message from : " & Request.Form("Your Name") & vbcr & vbcr & Request.Form("Message") 
End If 
objNewMail.TextBody = sBody 

' GoDaddy SMTP Settings 
objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 
objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="relay-hosting.secureserver.net" 
objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25 
objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
objNewMail.Configuration.Fields.Update 
objNewMail.Send 

'After the Send method, NewMail Object become Invalid 
Set objNewMail = Nothing 

Answer 1

Похоже, проблема не с кодом или URL-адрес в теле электронной почты сбщ, но упоминается в URL конкретного сайта, который должен быть каким-то образом оказался на какой-то черный список! Извините за ложную тревогу и оставив это здесь, если это полезно для кого-то другого.