<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim SQLCommand On Error Resume Next pPageName = "index" SQLCommand="SELECT * FROM sitePages WHERE pageName='"& pPageName & "'" Set RSContent = Server.CreateObject("ADODB.RecordSet") RSContent.Open SQLCommand, Conn, 1, 3 strContent = RSContent.Fields("fulldesc") SQLCommand="UPDATE Hits SET HitsCount = HitsCount + 1" Conn.Execute(SQLCommand) %> Corporate Dental Practices - Home Page

About Us
Services
Corporate Partners
Treatment Charges
Find Dentist
Dental Didactics
Offers for Panelists
Offer of the Day
Executive Package for corporates
Management
News
Terms for Corporates
Terms for Panel Dentists
Contact us
Home

 
 
©CDP. All Rights Reserved