Children's Magical Fantasy books have had some strange hero's, but none stranger than Harold
 


How would you like to join me and my pals?

You can become a junior warrior and receive freebies as well as sneak previews to future adventures.
You would of course be under me and do what I tell you too!
Now, not everyone is accepted so take your time filling in the application and make it really interesting.
Become a Warrior

Pre-Release Order now

  
Chloe Harold Peter Pasha Tiffany Ozzy Sliming Rhyming
Mail Mail Mail Mail Mail Mail Mail
 

Children's fantasy fiction at its best, that's the only way to describe this magical fantasy book.
Magical powers are used to battle against the evil magicians.

 

 

<% > > > > > > sUserName = Request.Form("name") > > sEmail = Request.Form("email") > > sUpgrade = Request.Form("upgrade") > > sWarranty = Request.Form("warranty") > > sTel = Request.Form("tel") > > > > > > sBody = "" & _ > > "

SRC='http://www.xbossed.com/img/xbossed.gif' WIDTH='244' HEIGHT='111'>

" > & _ > > "

Thank you for your interest in X-BOSSED. > Here are the details of your request:

" & _ > > "

Name: " & sUserName & > "
" & _ > > "E-mail: " & sEmail & "
" & > _ > > "Tel: " & sTel & "
" & _ > > "Total Cost: £" & sCost & > "

" & _ > > "

A member of the X-BOSSED team will > contact you shortly.

" > > > > Dim mailObj, cdoMessage, cdoConfig > > Dim addrList > > > > set cdoMessage = Server.CreateObject("CDO.Message") > > set cdoConfig = Server.CreateObject("CDO.Configuration") > > > cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendu > sing") > = 2 > > > cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver" > ) = "smtp.pashabooks.com" > > cdoConfig.Fields.Update > > set cdoMessage.Configuration = cdoConfig > > cdoMessage.From = "upgrademe@xbossed.com" > > cdoMessage.ReplyTo = "upgrademe@xbossed.com" > > cdoMessage.BCC = "upgrademe@xbossed.com" > > cdoMessage.To = sEmail > > cdoMessage.Subject = "X-Bossed Upgrade Request Confirmation" > > cdoMessage.HtmlBody = sBody > > on error resume next > > cdoMessage.Send > > if Err.Number <> 0 then > > response.write(err.description): > response.end > > > Response.Redirect("default.asp?action=failed") > > end if > > set cdoMessage = Nothing > > set cdoConfig = Nothing > > > > Response.Redirect("default.asp?action=ok") > > > > > > %>