%@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
|
|
|
Contact us

|
For comments or related inquiries, please forward to info @ hairstylesdesign.net
|
|
|
|
Copyright © 2005-2007 HairstylesDesign.net. All Rights Reserved. |
|
<%
rsCAT.Close()
Set rsCAT = Nothing
%>