<%@ Language=VBScript %>
<%
Dim sMailBody
Dim NewMailBody
Dim requeston1
Dim requeston2
email1 = Request("emailaddress")
requeston1 = "Following is the mail ID for the subscription of newletter: " & email1
requeston2 = "Dear Visitor,
Thank you for visiting the official website of Mehar Baba Charitable Trust (MBTRUST.ORG). You are now subscribed to the regular newsletters from Mbtrust.org.
Please DO NOT reply to this mail as it is automatically generated.
Sincerely yours,
For Mehar Baba Charitable Trust
System Administrator mbtrust.org"
Set NewMailObj = CreateObject("CDONTS.NewMail")
NewMailObj.From = email1
NewMailObj.To = "support@gianiji.com"
NewMailObj.Subject = "Email address to be included for Newsletter..."
NewMailObj.MailFormat = CdoMailFormatMime
NewMailObj.BodyFormat = CdoBodyFormatText
NewMailObj.Body = requeston1
NewMailObj.Send
Set NewMailObj = Nothing
Set NewMailObj = CreateObject("CDONTS.NewMail")
NewMailObj.From = "autoresponder@mbtrust.org"
NewMailObj.To = email1
NewMailObj.Subject = "Thank you for visiting MBTRUST.ORG"
NewMailObj.MailFormat = CdoMailFormatMime
NewMailObj.BodyFormat = CdoBodyFormatText
NewMailObj.Body = requeston2
NewMailObj.Send
Set NewMailObj = Nothing
%>
::: Mehar Baba Charitable Trust :::
Search:
Subscribe Newsletter :
Thank
you for subscribing Mehar Baba Charitable Trust Newsletter... Once we verify your email-id
<%=email1%> , you will start receiving our regular activity updates.
We thank you for visiting MBTRUST.ORG and hope you will continue your
regular visits to our site. Your feedback, suggestions and donations are precious to
us and will help us reach more needy individuals around the globe.
Best Regards,
for Mehar Baba Charitable Trust
Kothi #55, Sector-2, Chandigarh-160 001, India
Phone: +91-172-274 2823 Facsimile: +91-172-274 0493
Email: mbct2005@yahoo.com
Thank
you for subscribing Mehar Baba Charitable Trust Newsletter... Once we verify your email-id
<%=email1%> , you will start receiving our regular activity updates.