<% 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.

Link to Treehousepuppies.com



We appreciate a link on your site to Treehousepuppies.com! You can either use a text link or use one of the banners below.

Step 1) Add HTML to your webpage using one of our banners.


-Or-
Using just a text link: