Exotic Pets and Primates

<% ' change to address of your own SMTP server strHost = "localhost" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.AddAddress "webinfo@exoticpetco.com" Mail.AddCC "" Mail.AddBcc "" Mail.From = Request("From") ' From address Mail.FromName = Request("FromName") ' optional ' message subject Mail.Subject = Request("Subject") ' message body Mail.Body = Request("Body") strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %> Exotic Pets and Primates

Today is

Home

Large Mammals

Small Mammals

Primates

Birds Reptiles

Hoof Stock

Available Animals

Contact us

We are looking forward hearing from you!

Please give us a call if you are interested in purchasing any of our animals. We also are happy to assist you if you need an animal for photo or film projects. Please call us between 8am and 6pm central time or email us using the link below. We can either arrange transport or you may arrange pickup from one of our facilities.

<% If strErr <> "" Then %>

Error occurred: <% = strErr %>

<% End If %> <% If bSuccess Then %>

Thank you. Your message has been sent.

<% End If %> <% If not bSuccess Then %>

Please submit your inquiry:

<% End If %>

You can also call us at:
Exotic Pets and Primates
(504) 259-0884