alert('Thank you for subscribing to our newsletter! ');"; } ?>
  Nebraska Hunting Company - Premier Statewide Outfitter
J. Scott Croner, President - (402) 304-1192
Email:
scott@nebraskahunting.net
 
     
   
 

<% if request("task") = "" then %>

 Book Your Hunt Today!

                                                                   

First Name (required)
Last Name (required)
Email (required)
Address (required)
Address (continued)
City (required)
State (required)
Zip Code (required)
Phone
Fax
Select your hunt. (required)
Comments / Message

Deposit:

A 50% USD deposit is required to hold a date. This deposit is non-refundable. If the hunter finds an acceptable replacement, the deposit is transferable. The balance of the hunt price is due 30 days prior to the opening day of the hunt and is also non-refundable. We will send a letter of notification regarding this final payment prior to the due date. We will not chase hunters down for this final payment. No exceptions. If final payment is not received by the due date, the hunt spot and deposit will be forfeited.
 We strongly recommend that the hunter purchase travel cancellation insurance to cover ill health, business, or family that may cause the hunter to cancel the hunt.

<% end if %> <% if request("task") = "add" then firstname=(request("firstname")) lastname=(request("lastname")) email=(request("email")) streetaddress=(request("streetaddress")) streetaddress2=(request("streetaddress2")) city=(request("city")) state=(request("state")) zip=(request("zip")) phone=(request("phone")) fax=(request("fax")) package=(request("package")) message=(request("message")) todaydate=now() 'timestamp the email if firstname="" then blank="yes" end if if lastname="" then blank="yes" end if if email="" then blank="yes" end if if streetaddress="" then blank="yes" end if if city="" then blank="yes" end if if state="" then blank="yes" end if if zip="" then blank="yes" end if if package="" then blank="yes" end if if blank = "yes" then response.write "YOU HAVE LEFT A REQUIRED FIELD BLANK
" response.write "Click Here to TRY AGAIN
" else '*************************** 'SEND MAIL '*************************** IP = Request.ServerVariables("REMOTE_ADDR") Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From = email objMail.Subject = "BOOK-A-HUNT REQUEST -- NEBRASKA HUNTING COMPANY -- AUTOMATED" objMail.To = "scott@binary.net" objMail.bcc = "eric@ericbehrend.com" objMail.Body = "Sent by: " & firstname & " " & lastname & vbcrlf & vbcrlf &_ streetaddress & vbcrlf &_ streetaddress2 & vbcrlf &_ city & " " & state & " " & zip & vbcrlf &_ "------------------------------------------------" & vbcrlf &_ " Email: " & email & vbcrlf &_ "Phone: " & phone & vbcrlf &_ " Fax: " & fax & vbcrlf &_ "------------------------------------------------" & vbcrlf &_ "Package: " & package & vbcrlf &_ "------------------------------------------------" & vbcrlf &_ "Message: " & message & vbcrlf & "------------------------------------------------" & vbcrlf &_ "Sent by ip address " & IP objMail.Send 'You must always do this with CDONTS set objMail = nothing response.write "

Thank You for Booking Your Hunt with Nebraska Hunting Company!

" response.write "

Please Confirm Your Booking with a 50% Deposit of the Estimated Total Cost of Your Package

" response.write "Click Here to see our Photo Gallery
" response.write "

------------------------------------------------------------------------------------------------------------------

" '***************************** 'end send mail stuff '***************************** end if end if %>
 
     
 
:: copyright © 2005 - J. Scott Croner - all rights reserved ::