<% fno=request.querystring("fno") fregname=request.querystring("fregname") jholdername=request.querystring("jholdername") regadd=request.querystring("regadd") emailid=request.querystring("emailid") fdate=request.querystring("fdate") agree=request.querystring("agree") HTMLBody = "" HTMLBody = HTMLBody & "" HTMLBody = HTMLBody & "" HTMLBody = HTMLBody & "" if regadd<>"" then HTMLBody = HTMLBody & "" end if HTMLBody = HTMLBody & "" if date<>"" then HTMLBody = HTMLBody & "" end if HTMLBody = HTMLBody & "" HTMLBody = HTMLBody & "
Registered Folio or
DP id - Client Id
" & fno & "
Name of 1st Registered holder " & fregname & "
Name of Joint Registered holder(s) " & jholdername & "
Registered Address " & regadd & "
Email " & emailid & "
Date " & fdate & "
Mode " & agree & "
" Set Mail = CreateObject("CDO.Message") Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="smtp.gmail.com" Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1 Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "indiaglycolsonline@gmail.com" Mail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "greeninitiative" Mail.Configuration.Fields.Update Mail.Subject = "Auto Request - Green Initiative in the Corporate Governance" Mail.From = "indiaglycolsonline@gmail.com" Mail.To = "compliance.officer@indiaglycols.com" Mail.HTMLBody=HTMLBody Mail.Send Set Mail = Nothing Response.Redirect("green_initiative_thank_you.htm") %>