Fonctions ASP couramment utilisées : GetRsRows()
Auteur:Eve Cole
Date de mise à jour:2009-06-26 18:06:27
<%
Fonction GetRsRows(oRs)
Dim aArray
ReDim aArray(0, -1)
Si TypeName(oRs) = "Recordset" Alors
Si ce n'est pas le cas, ors.BOF, alors ors.MoveFirst
Si ce n'est pas le cas, ors.EOF, alors aArray = ors.GetRows()
Fin si
GetRsRows = aArray
Fonction de fin
%>