<%@LANGUAGE="VBSCRIPT"%> <% on error resume next %> <% ' FileName="Connection_ado_conn_string.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="false" ' Catalog="" ' Schema="" Dim MM_connHAIRSTYLESDESIGN_STRING MM_connHAIRSTYLESDESIGN_STRING = "Driver={MySQL ODBC 3.51 Driver}; Server=alpha.nrjdesign.net; Database=hairstylesdesign_net; UID=hairstylesdesign; PWD=pass260313;Option=3" %> <% Dim rsCAT Dim rsCAT_numRows Set rsCAT = Server.CreateObject("ADODB.Recordset") rsCAT.ActiveConnection = MM_connHAIRSTYLESDESIGN_STRING rsCAT.Source = "SELECT * FROM tblcat ORDER BY sNAME ASC" rsCAT.CursorType = 0 rsCAT.CursorLocation = 2 rsCAT.LockType = 1 rsCAT.Open() rsCAT_numRows = 0 %> <% Dim HLooper1__numRows HLooper1__numRows = -4 Dim HLooper1__index HLooper1__index = 0 rsCAT_numRows = rsCAT_numRows + HLooper1__numRows %> Hairstyles Design.net | The Web's Hairstyle & Beauty Resource

   Home
   Directory
   Articles
   Resources

Contact
Site Map

Submit Article

Please forward your article in a Word or Text format to: info @ hairstylesdesign.net. Please include your name and website adress for article credits.

IMPORTANT NOTE: Please submit authorized publications and orginal content. Hairstylesdesign.net and it's affiliates are not responsible for copyright violations or "stolen" material.

<% rsCAT.Close() Set rsCAT = Nothing %>