<% If Session("BlnLoggedIn") <> True Then Response.Redirect("index.asp") End If %> About Sinsational Features

About Sinsational Features

Sinsational Features is the newest and most up-and-coming Feature Booking Agency in the adult industry. Having been in business since September 2012, Sinsational Features has already made enormous leaps and bounds in proving their ability to provide the best in adult feature entertainment to clubs and venues all over the country.

Sinsational Features received 2013 Agency of the Year” award at the Ponderosa Sun Club’s “Miss Nude Entertainer of the Year”, “Miss Nude North America”, and “Miss Nude Galaxy” Award shows.

Co-Owners, Thomas Hischak, and former, Award Winning, National Touring Feature Entertainer, Dakota Skye®, have a combined total of 10 years’ experience in the adult feature industry. “This is not a 9 to 5 industry and we believe neither should your agents be. We are available 24/7 to provide club owners, managers and entertainers with the help and support they need. We are an Agency you can count on all day, every day. Strong ethics and thorough communication with club venues and our entertainers allows our Agency to build long term relationships based on integrity and trust.” – Thomas Hischak & Dakota Skye®

Sinsational Features provides what a club and entertainer needs to succeed that no other agency provides. This new dynamic will provide you, our client, an unprecedented level of service and commitment dedicated to the success of your event. If you are a club owner or manager and would like to book and entertainer or event in your venue, contact us, you won’t be disappointed.

We represent the top names in adult entertainment. We strive to keep our website updated with the most recent and popular entertainers. However, there may be entertainers who have not yet been added to our site. If there is someone specific you are looking for, please inquire, chances are we can get that entertainer booked at your venue.

** Click Here To Show Inquiry Form **

<% If Request("action")="validate" Then Response.Write("

") Response.Write("") If Request("contact")="Any" Then Response.Write("Thank you, "&Request("name")& " for your inquiry. A representative will contact you shortly.") End If If Request("contact")="Email" Then Response.Write("Thank you, "&Request("name")& " for your inquiry. A representative will contact you via email at: " &Request("email") & ".") End If If Request("contact")="DayPhone" Then Response.Write("Thank you, "&Request("name")& " for your inquiry. A representative will contact you at your daytime phone number: " &Request("daytimephone") & ".") End If If Request("contact")="EveningPhone" Then Response.Write("Thank you, "&Request("name")& " for your inquiry. A representative will contact you at your evening phone number: " &Request("eveningPhone") & ".") End If Response.Write("") Dim mbody mbody = "
The following inquiry was submitted through SinsationalFeatures.com:

" mbody = mbody & "

" mbody = mbody & "Name: " mbody = mbody & (Request("name")) mbody = mbody & "
" mbody = mbody & "Address: " mbody = mbody & (Request("address")) & ", " & (Request("city")) & ", " & (Request("state")) & " " & (Request("zip")) mbody = mbody & "
" mbody = mbody & "Email: " mbody = mbody & (Request("email")) mbody = mbody & "
" mbody = mbody & "Daytime Phone: " mbody = mbody & (Request("daytimephone")) mbody = mbody & "
" mbody = mbody & "Evening Phone: " mbody = mbody & (Request("eveningPhone")) mbody = mbody & "
" mbody = mbody & "Contact via: " mbody = mbody & (Request("contact")) mbody = mbody & "
" mbody = mbody & "Heard of Sinsational from: " mbody = mbody & (Request("origin")) mbody = mbody & "
" mbody = mbody & "Other/Source: " mbody = mbody & (Request("source")) mbody = mbody & "

" mbody = mbody & "Question/Inquiry: " mbody = mbody & (Request("add_info")) Set oCdoMail = Server.CreateObject("CDO.Message") Set oCdoConf = Server.CreateObject("CDO.Configuration") sConfURL = "http://schemas.microsoft.com/cdo/configuration/" with oCdoConf .Fields.Item(sConfURL & "sendusing") = 2 .Fields.Item(sConfURL & "smtpserver") = "relay-hosting.secureserver.net" .Fields.Item(sConfURL & "smtpserverport") = 25 .Fields.Update end with with oCdoMail .From = "inquiry@SinsationFeatures.com" .To = "sinsationalfeatures@hotmail.com" .Subject = "You have a question/inquiry from SinsationalFeatures.com!" .HTMLBody = mbody end with oCdoMail.Configuration = oCdoConf oCdoMail.Send Set oCdoConf = Nothing End If %>