<<
include "parseEmailAddr.incl";
local submit_status;
local Name, mailfrom, Address, City, State, Zip, Phone, Comments, lid;
iff undefined(Name) then Name = "";
iff undefined(mailfrom) then mailfrom = "";
iff undefined(Address) then Address = "";
iff undefined(City) then City = "";
iff undefined(State) then State = "";
iff undefined(Zip) then Zip = "";
iff undefined(Phone) then Phone = "";
iff undefined(Comments) then Comments = "";
local email_check = goodEmailAddress(mailfrom);
function printForm (err_cond)
err_msg = "";
if err_cond then
err_msg = "
" &
((mailfrom = "") ? "• Please include an e-mail address so that your request may be processed properly. Thank you." : email_check) &
"";
end if;
<<
|
For Experienced and Personalized Service
|
Complete this form to request being added to Tim's newsletter e-mail list
Any personal information that you submit with this form will be
used only to respond to your request for information. Your e-mail
address will not be sold or distributed to anyone else.
|
|
|
>>
end function;
function sendRequest ()
if mailfrom != "" && email_check = "" then
the_message = "This visitor to your web site would like to be added to your newsletter list" &
(defined(lid) ? " (after viewing listing #" & lid & ")" : "") & ":
Name: " & Name & "
Address: " & Address & "
" & City & " " & State & " " & Zip & "
E-mail: " & mailfrom & "
Phone: " & Phone & (Comments != "" ? "
" & Name & " had these comments:
" & Comments : "");
sendEmail("riddler.homes-magazine.com", "tim@timbryan.com", mailfrom, "Newsletter Request", the_message);
<<
Thank you for your interest, {Name}. Your request has been e-mailed to
Tim and you will be added to his e-mail newsletter list.
>>
else
printForm(1);
end if;
end function;
>>
Paso Robles Real Estate - Land - Tim Bryan - Realtor
<<
if undefined(submit_status) then
printForm(0);
else
sendRequest();
end if;
>>