<% Function PCase(sValue) iPos = 1 Do While InStr(iPos, sValue, " ", 1) <> 0 iSpace = InStr(iPos, sValue, " ", 1) sTemp = sTemp & UCase(Mid(sValue, iPos, 1)) sTemp = sTemp & LCase(Mid(sValue, iPos + 1, _ iSpace - iPos)) iPos = iSpace + 1 Loop sTemp = sTemp & UCase(Mid(sValue, iPos, 1)) sTemp = sTemp & LCase(Mid(sValue, iPos + 1)) PCase = sTemp End Function %> <% Dim con Dim rs,rs1 Dim i Set con = server.CreateObject("ADODB.connection") Set rs = Server.CreateObject("ADODB.recordset") Set rs1 = Server.CreateObject("ADODB.recordset") con.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=e:\website\cyberweb\indorepage\indorepage.com\www\db\db2.mdb" %> Apartments in Indore, Reliable Indore Service, service Consultant.
Welcome To Indore Page
Home | About Us | Contact Us
 
Indore Business Directory , Indore Yellow Pages , Indore Suppliers and Manufacturers

www.Indorepage.com
 
 
CONTACT US
Website Created, Maintained and Owned By India Business Directory.
USA :
501 Silverside Rd, Suite 105
Wilmington, DE 19809.
Phone : 866-249-4291.
INDIA BRANCH :
B-207, Patel Shopping Center,
Chandavarkar Road,
Borivali (W),
Mumbai - 400 092.
Phone: 91-22-2864-2711. Fax: 91-22-2864-2718.
 
Home | About Us | Contact Us
© Copyright 2005 indorepage.com. All rights reserved.
Indorepage- Provide you Information on Apartments in Indore and Reliable Indore Service and Indore service Consultant. Get Information on Indore service Consultant and Reliable Indore Service and Apartments in Indore from www.indorepage.com.