Conditional Statements in CDONTS

[Mintyman]

Hi,

I have CDONTS working great but have a small problem. There is a question
with a checkbox as answer in the form that generates the email. If it is
ticked, the value is 'yes' in the email, if not, it is blank.

Is it possible to put a conditional statement within CDONTS email body to
say 'if value is blank, write "no" ?

[J.S. \(UltraSuite\)]

If Request.Form("formname") = "" Then
strVal1 = "No"
End If

Then add strVal1 to your body.
--
__________________________________________________ __________________
UltraSuite Extension Packages: [url]http://www.ultrasuite.com/[/url]
The *most popular* Suites of DMX 2004 and DMX Server Behaviors
for ASP, ASP.Net, ColdFusion, JSP, and PHP_MySQL
__________________________________________________ __________________

[Mintyman]

Thanks for this. However, I cannot seem to get it working. Here is the code
once I have entered what you suggested. Can you see why it is not working?

<% If Trim(Request.Form("submit")) <> "" Then %>
<% If Request.Form("hazardous") = "" Then
strVal1 = "no"
End If %>

<%
Set mail = Server.CreateObject("CDONTS.NewMail")

mail.From = "user@domain.com"
mail.To = "user@domain.com"
mail.subject ="Return Authorisation Number Allocated"
mail.body = "<table width=""600"" border=""0"" cellspacing=""0""
cellpadding=""0"">" & "<tr>" & "<font face=Arial size=2>" & "The contact
detailed below has just submitted a request for a RAN. Their details are:" &
"<br><br>" & "</tr>" & "<tr>" & "<b>Name:</b> " &
Trim(Request.Form("contact_name")) & "</tr>" & "<tr>" & "<b>Job Title:</b> "
& Trim(Request.Form("job_title")) & "</tr>" & "<tr>" & "<b>Company:</b> " &
Trim(Request.Form("organisation")) & "</tr>" & "<tr>" & "<b>Email:</b> " &
"<a href=" & """mailto:" & Trim(Request.Form("email")) & """>" &
Trim(Request.Form("email")) & "</a>" & "</tr>" & "<tr>" & "<b>Tel:</b> " &
Trim(Request.Form("tel")) & "</tr>" & "<tr>" & "<b>Address1:</b> " &
Trim(Request.Form("address1")) & "</tr>" & "<tr>" & "<b>Address2:</b> " &
Trim(Request.Form("address2")) &"</tr>" & "<tr>" & "<b>City:</b> " &
Trim(Request.Form("city")) & "</tr>" & "<tr>" & "<b>County:</b> " &
Trim(Request.Form("county")) & "</tr>" & "<tr>" & "<b>Postcode:</b> " &
Trim(Request.Form("postcode")) & "</tr>"& "<tr>" & "<b>Country:</b> " &
Trim(Request.Form("country")) & "</tr>" & "<br><tr>" & "<b>Equipment
Type:</b> " & Trim(Request.Form("equipment_type")) & "</tr>" & "<tr>" &
"<b>Part Number:</b> " & Trim(Request.Form("part_number")) & "</tr>" &
"<tr>" & "<b>Serial Number:</b> " & Trim(Request.Form("serial_number")) &
"</tr>" & "<tr>" & "<b>Failure Date:</b> " &
Trim(Request.Form("failure_date")) & "</tr>" & "<tr>" & "<b>materials
processed:</b> " & Trim(Request.Form("substances")) & "</tr>" & "<tr>" &
"<b>Hazardous?:</b> " & Trim(Request.Form("hazardous")) & Request("strVal1")
& "</tr>" & "<tr>" & "<b>Return Reason:</b> " &
Trim(Request.Form("Returns_Reason")) & "</tr>" & "<tr>" & "<b>Warranty
Claim?:</b> " & Trim(Request.Form("warranty_claim")) & "</tr>" & "</font>" &
"</table>"

mail.MailFormat = 0
mail.BodyFormat = 0

mail.Send
Set mail = nothing
%>
<%End If%>




"J.S. (UltraSuite)" <ultrasuite@nospam.com> wrote in message
news:cuv820$bik$1@forums.macromedia.com...

> If Request.Form("formname") = "" Then
> strVal1 = "No"
> End If
>
> Then add strVal1 to your body.
> --
> __________________________________________________ __________________
> UltraSuite Extension Packages: [url]http://www.ultrasuite.com/[/url]
> The *most popular* Suites of DMX 2004 and DMX Server Behaviors
> for ASP, ASP.Net, ColdFusion, JSP, and PHP_MySQL
> __________________________________________________ __________________
>
>

[J.S. \(UltraSuite\)]

In the body you don't need:
Request("strVal1")
You just need:
strVal1
which has already been defined previously.

--
__________________________________________________ __________________
UltraSuite Extension Packages: [url]http://www.ultrasuite.com/[/url]
The *most popular* Suites of DMX 2004 and DMX Server Behaviors
for ASP, ASP.Net, ColdFusion, JSP, and PHP_MySQL
__________________________________________________ __________________

[Mintyman]

Many thanks :o)

"J.S. (UltraSuite)" <ultrasuite@nospam.com> wrote in message
news:cv0tir$2ha$1@forums.macromedia.com...

> In the body you don't need:
> Request("strVal1")
> You just need:
> strVal1
> which has already been defined previously.
>
> --
> __________________________________________________ __________________
> UltraSuite Extension Packages: [url]http://www.ultrasuite.com/[/url]
> The *most popular* Suites of DMX 2004 and DMX Server Behaviors
> for ASP, ASP.Net, ColdFusion, JSP, and PHP_MySQL
> __________________________________________________ __________________
>
>