<% if Request.Form("submitted") = "yes" then Dim fname, lname fname = Request.Form("Fullname") lname = Request.Form("organization") address = Request.Form("address") city = Request.Form("citystatezip") cname = Request.Form("contact") phone = Request.Form("phone") email = Request.Form("email") Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.From = EmailVar objCDO.To = "tfshoo2002@yahoo.com" objCDO.BodyFormat = 1 objCDO.MailFormat = 1 objCDO.Send ConfirmMsg = "Thanks for submitting your name!" end if %> main
Welcome to my brand new Web Page and my
Virtual Website Launch Party!

Like any good party, there are drinks, snacks, entertainment (storytelling, of course!), confetti and a lot of fun people—like you! Please turn on your Willy Wonka Smell-A-Vision for a full sensory experience. If you do not own such a program, please turn on your Imagination.

Rev up your fingers and roam around my website.
Last one to leave turn out the lights!

Contact Form




Name:

Organization:

Address:

City/State/Zip:

Contact:

Phone:

E-Mail:





REFER A FRIEND AND SAVE MONEY!

When you refer a friend and they book a storytelling performance with me, you will receive a 20% discount on the next storytelling performance you book with me.