<% 'Applies only to the home page Dim dbH 'DB object Dim strSQLH 'DB SQL query Dim cmdH 'DB Command Dim strConnH 'DB string connection Dim arrPagesH 'DB pages table Set dbH = Server.CreateObject("ADODB.Connection") Set arrPagesH = Server.CreateObject("Scripting.Dictionary") strConnH = "Provider=SQLOLEDB; Data Source = 192.168.180.53; Initial Catalog = SD_CMS; User Id = sd_cms_client; Password=SD_CMS_1atfF4p9" dbH.Open strConnH strSQLH = "Select * from CMS_Content WHERE user_id='144'" set objRsH = dbH.execute(strSQLH) if not objRsH.EOF then do while not objRsH.EOF pageNameH = trim(objRsH("page_name")) pageContentH = trim(objRsH("page_content")) arrPagesH.Add pageNameH,pageContentH objRsH.Movenext loop End If arrkeysH = arrPagesH.Keys If Err.Number <> 0 Then response.write "Error connecting to the database" Response.End End If %> Boston Limos | Limo Service Boston - Limousine
Talk Now LiveHelp Text Now
Join Newsletter
Boston Limo - Limo service in Boston Boston Limo - Limo Service Boston Boston Limo - Boston Limo Service Boston Limo - Boston Limo Service
Welcome to Affordable Limo
Name

Occasion Occasion Date

Pick Up Location Destination Location
Reservation Start Time:
Reservation End Time:
Passengers:
Your Email Address Phone Number

- -
Message

Please fill in the word below in the box:

Want to make a Reservation?

Use the form to the left and we will contact you to confirm your reservation. If you have any specific or special requests, please be sure to use the Message field on the form to indicate your requirements.

 

 

 

 

Click on the “Talk Now” button to contact us immediately via telephone or click on the “Live Help” button to chat with our online receptionist.

 

Our online receptionist is standing by Monday to Friday from 9 AM to 8 PM (EST).

0