<%@ LANGUAGE="VBSCRIPT" %> <% Option Explicit %> <% dim txtFirstName dim txtMakes dim txtPutson dim txtOven '------------------------------------------ ' Assign Form Field values to variables; ' Takes off first and last character of the names IF ' that character is an empty space. '------------------------------------------ txtFirstName = RTrim(Request("name")) txtFirstName = LTrim(txtFirstName) txtMakes = (Request("makes")) txtPutson = (Request("putson")) txtOven = (Request("oven")) '--------------------------------- ' Replaces Single Quotes with HTML TAg '--------------------------------- txtFirstName = Replace(txtFirstName,"'","'") %> Community Club: Pizza Activity Answer Page <% doMenu %>

Pizza Maker

See All Books
<% If ((txtMakes = "pizza")and(txtPutson = "sauce")and(txtOven = "hot")) Then%>

Great job!

You learned that:

The pizza maker makes pizza.

The pizza maker puts the sauce on first.

The oven is very hot.

Read Again More Books
<% Else %>
<% If (txtMakes <> "pizza" or txtPutson <> "sauce" or txtOven <> "hot" or txtMakes = "" or txtPutson = "" or txtOven = "") Then%>

Oops

<% End If %> <% If (txtMakes <> "pizza") Then%> <% If (txtMakes = "") Then%>

You did not pick an answer. Click one now.

<% Else %>

The pizza maker does not make <% = txtMakes %>. Try again!

<% End If %>

  1. The pizza maker makes

    <% Else %> <% End If %>
<% If (txtPutson <> "sauce") Then%> <% If (txtPutson = "") Then%>

You did not pick an answer. Click one now.

<% Else %>

The pizza maker does not put on <% = txtPutson %> first. Try again!

<% End If %>

  1. The pizza maker puts on first

    <% Else %> <% End If %>
<% If (txtOven <> "hot") Then%> <% If (txtOven = "") Then%>

You did not pick an answer. Click one now.

<% Else %>

The oven is not <% = txtOven %>. Try again!

<% End If %>

  1. The oven is very

    <% Else %> <% End If %>
<% End If %>
<% doFooter %>