Funciones ASP de uso común: GetRsRows()
Autor:Eve Cole
Fecha de actualización:2009-06-26 18:06:27
<%
Función GetRsRows(oRs)
Dim aArray
ReDim aArray(0, -1)
Si TypeName(oRs) = "Recordset" Entonces
Si no es ors.BOF, entonces ors.MoveFirst
Si no es ors.EOF, entonces aArray = ors.GetRows()
Terminar si
GetRsRows = una matriz
Función final
%>