Sistemimizde yüklü olan CDOSYS bileşenini kullanarak, ASP üzerinden e-posta gönderebiliriz. Böyle bir işlemde dikkat etmeniz gereken şey, sistemlerimiz relay'e izin vermediği için, kimlik doğrulama (Authentication) kullanmanız gerekmektedir. Aşağıda yer alan örnek bir e-posta gönderme ASP kodunda, kalın olarak işaretlenmiş satırları kullanarak kimlik doğrulama sağlayabilirsiniz.

Set TestMesaji = CreateObject("CDO.Message")
TestMesaji.Subject = "E-posta Gonderme Testi"
TestMesaji.Sender = "test@alanadi.com"
TestMesaji.From = "test@alanadi.com"
TestMesaji.To = "adres@deneme.com"
TestMesaji.TextBody = "E-posta Test Icerigi"
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "test@alanadi.com"
TestMesaji.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "epostasifreniz"
TestMesaji.Configuration.Fields.Update
TestMesaji.Send