<% Dim cnnSimple Dim rstSimple Dim strDBPath strDBPath = Server.MapPath("../access_db/THpupDatabase.mdb") Set cnnSimple = Server.CreateObject("ADODB.Connection") cnnSimple.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";" %> Premier directory of puppy and dog web sites.

Free Listing Signup

Note:  We do require a link back to us for all new FREE listings!!


Before you fill out the form below, please read the following notes:
-- You must have a website to have a listing! We are a website directory
-- Your site must be Family Friendly!
-- Please do not type your submission in ALL CAPS.
-- Please double-check your site URL and email address.
-- When entering the description, please make sure it is less than 50 words.

 

Name:
Email:
Site Name:
Site URL:
Which directory?:
Breed (if applicable):
State or Country:
Free Description:
How did you find us?:
Additional Comments:
If you have problems with the form, please email your site information to admin@TreeHousePuppies.com. Thanks!