CDONTS ile ekli dosya yollamak
 
Kod Alanı:

Dim Postaci, Govde

Set Postaci = Server.CreateObject("CDONTS.NewMail" )
      Postaci.To = "gidecek@email.com" Gidecek kişinin email adresi
      Postaci.From = "yollayan@email.com" Yollayan kişinin email adresi
      Postaci.Subject = "Başlık" Başlık
      Postaci.BodyFormat=0
      Postaci.MailFormat=0

      Postaci.AttachFile Server.MapPath("whocam.txt" ) Virtual yol

      Postaci.AttachFile ("C:inetpubwwwrootshkar.txt" ) Gerçek yol



Govde = "<h1>Merhabalar</h1><br>"
Govde = Govde &"<a href=http://webhocam.net>Buraya klikleyerek</a>sahkar.nete giriş yapabilirsiniz.<br>"
Govde = Govde &"sahkar.netin kurallarını yolluyorum ekte<br>"

     Postaci.Body = Govde
     Postaci.Send
 
 
  Bugün 80 ziyaretçi (95 klik) buradaydı  
 
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol