Gönderen: 02-Ekim-2006 Saat 12:35 | Kayıtlı IP

Merahabalar arkadaşlar

Mail server kullanılmadan DNS üzerinden mail gönderiliyormuş bu nu aşagıdaki mail server kullanılarak yapılmış yazılıma uygularmısınız.

<%
 Dim objMailKelebek, strMailServer
 Set objMailKelebek = Server.CreateOBject( "JMail.Message" )
 objMailKelebek.ContentType = "text/html"
 objMailKelebek.From = yollayan
 objMailKelebek.Subject = sahin
 objMailKelebek.AddRecipient sahin1
 objMailKelebek.body = mesaj
 strMailServer = "192.168.xx.xx"
 on Error Resume Next
 objMailKelebek.Send(strMailServer)
 SET  objMailKelebek =  Nothing
 %>