home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / dialog / email.txt < prev    next >
Encoding:
Text File  |  1999-07-26  |  426 b   |  16 lines
  1. <%
  2. Dim objCDO
  3. Set objCDO = Server.CreateObject("CDONTS.NewMail")
  4.  
  5. objCDO.To = "ramesh@huiyang.net"
  6. objCDO.From = "neethan@home.com"
  7. objCDO.cc = "ramesh_thiru@yahoo.com,ramesh_thiru@hotmail.com"
  8.  
  9. objCDO.Importance = 2 '0 - Low, 1 - Normal, 2 - High
  10. objCDO.Subject = "Song admin page"
  11. objCDO.AttachFile ("c:\neethan\new.jpg","new.jpg")
  12. objCDO.Body = "Hey it's ok now ! I can add new songes ..." 
  13. objCDO.Send
  14. %> 
  15.  
  16.