3.<% 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\hyderabadpage\hyderabadpage.com\www\db\db1.mdb" %> Hyderabad Business Directory, Yellow Pages.
Welcome To Hyderabad Page
Home | About Us | Contact Us
 
Hyderabad Business Directory , Hyderabad Yellow Pages , Hyderabad Suppliers and Manufacturers

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

Hyderabadpage Networks, Inc provides specialized web, software and outsourcing services to accountants, CPAs and financial advisors. Hyderabadpage 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.

Model
 
Home | About Us | Contact Us
© Copyright 2005 Hyderabadpage.com. All rights reserved.
Hyderabadpage - Provide you Information Hyderabad Business Directory and Hyderabad Yellow Pages. Get Information on Hyderabad Yellow Pages and Hyderabad Business Directory from www.hyderabadpage.com.