SitePoint Sponsor

User Tag List

Results 1 to 9 of 9
  1. #1
    SitePoint Zealot blackinwhite's Avatar
    Join Date
    Feb 2001
    Location
    Istanbul/Turkey
    Posts
    127
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Mailform with ASPEMAIL

    How can I prepare a mailform with ASPEMAIL component.

  2. #2
    SitePoint Wizard iTec's Avatar
    Join Date
    May 2001
    Location
    Sydney, Australia
    Posts
    2,243
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    what part of preparing it do you need help with???

  3. #3
    SitePoint Zealot blackinwhite's Avatar
    Join Date
    Feb 2001
    Location
    Istanbul/Turkey
    Posts
    127
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    I normaly use CDONTS for mailforms.
    I have changed my host,and since it only supports ASPEMAIL, I have to use ASPEMAIL.

    can anyone help me with this?
    thanks

  4. #4
    SitePoint Wizard iTec's Avatar
    Join Date
    May 2001
    Location
    Sydney, Australia
    Posts
    2,243
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    this is pretty much so just the code i use.

    Code:
    Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
    Mailer.FromName   = Request("Name")
    Mailer.FromAddress= Request("email")
    Mailer.RemoteHost = "mail host"
    Mailer.AddRecipient "Name of recipient", "recipients email address"
    Mailer.Subject    = Request("Subject")
    Mailer.BodyText   = Request("Message")
    if Mailer.SendMail then
      Response.Write "Thank you for contacting us."
    else
      Response.Write " an error has occured please try again "
    end if
    help can be found here

  5. #5
    SitePoint Zealot blackinwhite's Avatar
    Join Date
    Feb 2001
    Location
    Istanbul/Turkey
    Posts
    127
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    I'll have a look at both the code and the address.,
    thank you

  6. #6
    SitePoint Zealot blackinwhite's Avatar
    Join Date
    Feb 2001
    Location
    Istanbul/Turkey
    Posts
    127
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    ok, it gives me this error now:

    Server object error 'ASP 0177 : 800401f3'

    Server.CreateObject Failed

    /mailform/sendmail.asp, line 2

    Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.

  7. #7
    ALT.NET - because we need it silver trophybronze trophy dhtmlgod's Avatar
    Join Date
    Jul 2001
    Location
    Scotland
    Posts
    4,836
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Ooooh, the dreaded 0177 error!

    This can mean 2 things.

    1 (and the dreaded one for COM developers) The COM object has an error in ir

    and

    2 (the most likely) it isn't installed



    Hope that helps

  8. #8
    SitePoint Enthusiast
    Join Date
    Jun 2001
    Posts
    87
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Just a thought, but http://aspemail.com has a fairly good manual you can download. It has helped me. I did find that on page 2/12 the correct reference is:

    mail.Host = "Mail.mycompany.com"

  9. #9
    SitePoint Zealot blackinwhite's Avatar
    Join Date
    Feb 2001
    Location
    Istanbul/Turkey
    Posts
    127
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    thank you all,
    I have came across this a code and modified it a bit. If anyone needs anytime, here is the code:

    Code:
    <%
    
    strBody = "Bu ileti http://www.bulentsenver.com/bh adresinden" & Now() & " tarihinde gönderildi" & vbCrLf & vbCrLf
    strBody = strBody & "Ziyaretçi IPsi: " & Request.ServerVariables("REMOTE_ADDR") & vbCrLf 
    strBody = strBody & "Host: " & Request.ServerVariables("REMOTE_HOST") & vbCrLf 
    strBody = strBody & "Kullandigi program: " & Request.ServerVariables("HTTP_USER_AGENT") & vbCrLf & vbCrLf
    strBody = strBody & "Name: " & Request.Form("frmName") & vbCrLf & vbCrLf 
    strBody = strBody & "Eposta Adresi: " & Request.Form("frmFromEmail") & vbCrLf 
    strBody = strBody & "Telefon No.: " & Request.Form("frmAccountNumber") & vbCrLf 
    strBody = strBody & "İl: " & Request.Form("frmIl") & vbCrLf 
    strBody = strBody & "İlçe: " & Request.Form("frmIlce") & vbCrLf 
    strBody = strBody & "Hangi Konuda Hazir?: " & Request.Form("frmkonudahazirim") & vbCrLf 
    strBody = strBody & "Yorumlar: " & Request.Form("frmComments") & vbCrLf 
    
    set mail = server.createObject("Persits.MailSender")
    mail.Host = "mail.yourhost.com"
    
    mail.From = Request.Form("frmFromEmail") 
    
    mail.FromName = Request.Form("frmName") 
    
    mail.AddAddress "your email"
    
    'mail.AddCC Request.Form("frmFromEmail")
    
    mail.Subject = "Your Subject"
    
    mail.Body = strBody
    
    mail.Send
    
    Response.Write "<HTML>"
    Response.Write "<HEAD>"
    Response.Write "<TITLE>.."
    ...
    ..
    %>


Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •