Solved

Microsoft VBScript compilation error '800a0409'

Posted on 2009-07-01
6
1,078 Views
Last Modified: 2012-08-14
What am I missing in the .asp code?   I keep getting this error:

Microsoft VBScript compilation error '800a0409'

Unterminated string constant

/indigo_privatedining.asp, line 31

Mailer.AddRecipient "TEST","rickardp@guestservices.com,
--------------------------------------------------------^

 but cannot see what I am missing
<%  
Response.Buffer = true
Dim body 
body = "" 
body = body & "Today's Date:   " & Request.Form("Date") &vbcrlf &vbcrlf 
body = body & "First Name:     " & Request.Form("FirstName") &vbcrlf &vbcrlf 
body = body & "Last Name:      " & Request.Form("LastName") &vbcrlf &vbcrlf
body = body & "Callback No:    " & Request.Form("Phone") &vbcrlf &vbcrlf
body = body & "Email:          " & Request.Form("EmailFrom") &vbcrlf &vbcrlf 
body = body & "Fax No.:        " & Request.Form("Fax") &vbcrlf &vbcrlf 
body = body & "Date of Event:  " & Request.Form("EventDate") &vbcrlf &vbcrlf
body = body & "Time of Event:  " & Request.Form("EventTime") &vbcrlf &vbcrlf
body = body & "Estimated No. People: " & Request.Form("EstimatedNumberPeople") &vbcrlf &vbcrlf
body = body & "Type of Event:  " & Request.Form("EventType") &vbcrlf &vbcrlf
body = body & "Yes, Send me Info:  " & Request.Form("Yes_I_want_info") &vbcrlf &vbcrlf 
body = body & "Visited Indigo Before?:   " & Request.Form("VisitIndigoBefore") &vbcrlf &vbcrlf 
body = body & "How Learned about Indigo: " & Request.Form("How_Did_You_Learn_About_Indigo") &vbcrlf &vbcrlf 
body = body & "Other:          " & Request.Form("Other") &vbcrlf &vbcrlf 
body = body & "Comments:       " & Request.Form("Comments") &vbcrlf &vbcrlf
 
'Response.write body
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName= Request("rickardp@guestservices.com")
Mailer.ReplyTo= Request("EmailFrom") 
Mailer.FromAddress= Request("EmailFrom")
Mailer.CC= Request("EmailFrom")
Mailer.RemoteHost = "mail-fwd"
'mailer.qmessage = true
 
 
Mailer.AddRecipient "TEST","rickardp@guestservices.com,
Mailer.AddBCC "Web Marketing Analyst","floreroc@guestservices.com"
Mailer.Subject    = "Indigo Landing Private Dining Inquiry"
Mailer.BodyText   = body
if Mailer.SendMail then
 response.Redirect("http://www.indigolanding.com/indigo_thankyouprivate.htm")
else
  Response.Write "Mail send failure. Error was " & Mailer.Response
end if
%>

Open in new window

0
Comment
Question by:RickardP_GSI
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 3
6 Comments
 
LVL 4

Expert Comment

by:jpg526
ID: 24754962
you may try add a " symbol at the end of "rickardp@guestservices.com


Mailer.AddRecipient "TEST","rickardp@guestservices.com"
0
 

Author Comment

by:RickardP_GSI
ID: 24754998
That actually worked.  Out of curiosityi - because I have never had this problem before - what does the symbol do?
0
 
LVL 4

Expert Comment

by:jpg526
ID: 24755054
the double quotation mark should be in pair
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 

Author Comment

by:RickardP_GSI
ID: 24755091
I just don't see where the quotation marks are wrong.  Maybe I went on vacation for too long - ha
0
 
LVL 4

Accepted Solution

by:
jpg526 earned 250 total points
ID: 24755179
Line 31
Mailer.AddRecipient "TEST","rickardp@guestservices.com,

rickardp@guestservices.com  -- only 1 double quote at the beginning of this string

Line 32
Mailer.AddBCC "Web Marketing Analyst","floreroc@guestservices.com"

floreroc@guestservices.com  -- there're double quote at the beginning and the end of this string
0
 

Author Closing Comment

by:RickardP_GSI
ID: 31598785
Thank you
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Welcome back!  My apologies for taking so long to write part two of this series; it's been a long time coming!  As I promised in Part 1, this article will focus on how to locate those elusive AD properties that you are searching for.  Why is this us…
Not long ago I saw a question in the VB Script forum that I thought would not take much time. You can read that question (Question ID  (http://www.experts-exchange.com/Programming/Languages/Visual_Basic/VB_Script/Q_28455246.html)28455246) Here (http…
Finding and deleting duplicate (picture) files can be a time consuming task. My wife and I, our three kids and their families all share one dilemma: Managing our pictures. Between desktops, laptops, phones, tablets, and cameras; over the last decade…
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question