I have the following email script that I created and it gives me a syntax error on this line
"<td width=""51%""><input name=""email"" type=""text"" id=""email"" readonly=""true"" value=""" & theemail & """ size=90 maxlength=100></td>" & _
I don't see what the problem is. Can someone see something I am missing?? Here is my completed code.
Dim ssn as String
ssn = fidssn.text
Dim thename as String
thename = name.text
Dim theemail as String
theemail = emailaddress.text
Dim thefund as string
thefund = fund.SelectedItem.Value
Dim thebroker as String
thebroker = brokerage.text
Dim theinfo as String
theinfo = requestinfo.SelectedItem.Value
Dim otherinfo as String
otherinfo = other.text
Dim objMailMessage As MailMessage
Dim strHTMLBody As String
strHTMLBody = "<html>" & _
"<head>" & _
"<title>WC Occurrence Report</title>" & _
"<body>" & _
"<table width=""45%"" border=""3"" cellpadding=""0"" cellspacing=""0"" class=""forms"" bordercolor=""#000066"">" & _
"<tr><td width=""49%"" height=""40"">What is your Federal ID or Social Security Number?</td>" & _
"<td width=""51%""><p>" & _
"<input name=""FID/SSN"" type=""text"" id=""FID/SSN"" readonly=""true"" value=""" & ssn & """ size=90 maxlength=100>" & _
"</p></td></tr><tr>" & _
"<td width=""49%"">What is your name?</td>" & _
"<td width=""51%""><input name=""name"" type=""text"" id=""name"" readonly=""true"" value=""" & thename & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What is your e-mail address?</td>"
"<td width=""51%""><input name=""email"" type=""text"" id=""email"" readonly=""true"" value=""" & theemail & """ size=90 maxlength=100></td>" & _
"</tr><tr> <td width=""49%"">What is the name of the fund you have questions about?</td>" & _
"<td width=""51%""><input name=""fund"" type=""text"" id=""fund"" readonly=""true"" value=""" & thefund & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What is the name of your brokerage firm if you use one?</td>" & _
"<td width=""51%""><input name=""broker"" type=""text"" id=""broker"" readonly=""true"" value=""" & thebroker & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What information are you requesting?</td>" & _
"<td width=""51%""><input name=""request"" type=""text"" id=""request"" readonly=""true"" value=""" & theinfo & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width="49%">Request other information.</td>" & _
"<td width=""51%""><textarea name=""other"" cols=""40"" rows=""10"" id=""other"" readonly=""true"" value=""" & otherinfo & """ wrap=""virtual"">
"</tr><tr></tr></table>"
objMailMessage = New MailMessage
objMailMessage.From= "comments@am1st.com"
objMailMessage.To= "comments@am1st.com"
objMailMessage.Subject = "Comments From Investor Services Web Site"
objMailMessage.Body = strHTMLBody
objMailMessage.BodyFormat = MailFormat.HTML
objMailMessage.Priority = MailPriority.High
SmtpMail.Send( objMailMessage )
End If
"<td width=""51%""><input name=""email"" type=""text"" id=""email"" readonly=""true"" value=""" & theemail & """ size=90 maxlength=100></td>" & _
I don't see what the problem is. Can someone see something I am missing?? Here is my completed code.
Dim ssn as String
ssn = fidssn.text
Dim thename as String
thename = name.text
Dim theemail as String
theemail = emailaddress.text
Dim thefund as string
thefund = fund.SelectedItem.Value
Dim thebroker as String
thebroker = brokerage.text
Dim theinfo as String
theinfo = requestinfo.SelectedItem.Value
Dim otherinfo as String
otherinfo = other.text
Dim objMailMessage As MailMessage
Dim strHTMLBody As String
strHTMLBody = "<html>" & _
"<head>" & _
"<title>WC Occurrence Report</title>" & _
"<body>" & _
"<table width=""45%"" border=""3"" cellpadding=""0"" cellspacing=""0"" class=""forms"" bordercolor=""#000066"">" & _
"<tr><td width=""49%"" height=""40"">What is your Federal ID or Social Security Number?</td>" & _
"<td width=""51%""><p>" & _
"<input name=""FID/SSN"" type=""text"" id=""FID/SSN"" readonly=""true"" value=""" & ssn & """ size=90 maxlength=100>" & _
"</p></td></tr><tr>" & _
"<td width=""49%"">What is your name?</td>" & _
"<td width=""51%""><input name=""name"" type=""text"" id=""name"" readonly=""true"" value=""" & thename & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What is your e-mail address?</td>"
"<td width=""51%""><input name=""email"" type=""text"" id=""email"" readonly=""true"" value=""" & theemail & """ size=90 maxlength=100></td>" & _
"</tr><tr> <td width=""49%"">What is the name of the fund you have questions about?</td>" & _
"<td width=""51%""><input name=""fund"" type=""text"" id=""fund"" readonly=""true"" value=""" & thefund & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What is the name of your brokerage firm if you use one?</td>" & _
"<td width=""51%""><input name=""broker"" type=""text"" id=""broker"" readonly=""true"" value=""" & thebroker & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width=""49%"">What information are you requesting?</td>" & _
"<td width=""51%""><input name=""request"" type=""text"" id=""request"" readonly=""true"" value=""" & theinfo & """ size=90 maxlength=100></td>" & _
"</tr><tr><td width="49%">Request other information.</td>" & _
"<td width=""51%""><textarea name=""other"" cols=""40"" rows=""10"" id=""other"" readonly=""true"" value=""" & otherinfo & """ wrap=""virtual"">
"</tr><tr></tr></table>"
objMailMessage = New MailMessage
objMailMessage.From= "comments@am1st.com"
objMailMessage.To= "comments@am1st.com"
objMailMessage.Subject = "Comments From Investor Services Web Site"
objMailMessage.Body = strHTMLBody
objMailMessage.BodyFormat = MailFormat.HTML
objMailMessage.Priority = MailPriority.High
SmtpMail.Send( objMailMessage )
End If