<% 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" %> Indore Suppliers, Indore Manufacturers.
Welcome To Indore Page
Home | About Us | Contact Us
 
Indore Business Directory , Indore Yellow Pages , Indore Suppliers and Manufacturers

www.Indorepage.com
 
 
ABOUT US
This website is owned and operated by India Business Directory.

Indorepage Networks, Inc provides specialized web, software and outsourcing services to accountants, CPAs and financial advisors. Indorepage Networks also operates network of websites related to Portal and Directories to enable discussion on the issues and challenges of Portal and Directories.

Please browse through the sites and give your view, comments and feedback.

The purpose of this site is to provide directory, resources and discussion forum about the company Portal and Directories. Thank you for visiting this website and using the resources available here.
mosel
 
Home | About Us | Contact Us
© Copyright 2005 indorepage.com. All rights reserved.
Indorepage- Get Information on Indore Suppliers and Indore Manufacturers. Get Information on Indore Manufacturers and Indore Suppliers from www.indorepage.com.