<%Option Explicit%> ..:: LogHomeList - Search Page ::.. <% Dim dcnDB Dim rsState Dim rsCategory Dim strSQLState Dim strSQLCategory Dim state_ Dim state_v Dim category_ dim connectstring Set dcnDB = Server.CreateObject("ADODB.Connection") Set rsState = Server.CreateObject("ADODB.Recordset") Set rsCategory = Server.CreateObject("ADODB.Recordset") ' setup the connection string ConnectString = "DRIVER={MySQL ODBC 3.51 Driver};" _ & "SERVER=localhost;" _ & "PORT=3307;" _ & "DATABASE=gnosis;" _ & "UID=util;" _ & "PWD=ut!l;" Set dcnDB = Server.CreateObject("ADODB.Connection") Set rsState = Server.CreateObject("ADODB.Recordset") Set rsCategory = Server.CreateObject("ADODB.Recordset") ' open the database connection With dcnDB ' Establish DSN-less connection .ConnectionString = ConnectString .ConnectionTimeout = 10 .CursorLocation = 1 .Open End With strSQLState="SELECT * FROM State WHERE site_id = '340'" 'Returns state names and abbreviations strSQLCategory="SELECT * FROM JobCategory WHERE site_id = '340' ORDER BY Category" 'Returns job categories rsState.Open strSQLState,dcnDB 'opens recordset with given sql statement (basically sticks filtered data into an accessable object) rsCategory.Open strSQLCategory,dcnDB 'opens recordset with given sql statement (basically sticks filtered data into an accessable object) %>
Search Log Home Directory  job search  Featured Log Homes  job search  Add A Listing  job search Contact Us
 

 

 









  Quick Search

  Select a State/Province:

 

 

  Select a Category:  
   

                                               


Your directory to buying or building a log home. Find log home vendors, learn
how to maintain your log  home, locate rustic furnishings that suit log homes,
and even learn to build your own home by attending a log home raising or
school.

Visit our Featured Log Homes:
/


Flint River Log Homes
Brainbridge, MO

 


Midwest Log Home Services
Jonesville, MI
 


Taron Design
Everson, WA

 


Woodstock Log
Home Services

Nationwide Service, FL 
 
 

Copyright © 2006 JobKite, Inc.

 

<% rsState.Close rsCategory.Close dcnDB.Close %>