Recordset no conectado

[mazingerz]

Hola a todos, una consulta que no he encontrado gogleando.
Hice una componente (dll) que lee el registro de windows y me trae una serial key, con algunos datos, luego genero una array bi-dimensional
+------------+----------------------------------------+
|id_key1 |Value_regedit 1 |
+------------+----------------------------------------+
|id_key2 |Value_regedit 2 |
+------------+----------------------------------------+

El problemas es que al tratar de cargarlo desde <%@Language=JScript%>

var objKey = Server.CreateObject("TerminalKey.Key");
var NewArray = objKey.rModel();

Sorpresa el Arreglo viene undefined....
si lo cargo con VBScrip ningun problema. Bueno el sitio esta enterito con JScript. Asi que ando buscando como retornar de la dll un recordset, que no esta Conectado a una Base de Datos, asi retorno el recordset y no este Array es asi como en NET crear un dataset desconectado.
Espero haber sido claro.
Saludos.

[mazingerz]

Auto Respuesta:

Public Function rModel() As Recordset
'First Create an a Recordset Object
Set rsShared = New ADODB.Recordset
rsShared.CursorLocation = adUseClient
rsShared.Fields.Append "Modelo", adVarChar, 255
rsShared.Fields.Append "Key", adVarChar, 255
rsShared.Fields.Append "Now", adVarChar, 255
rsShared.Open
'After this point, programming is identical
'to manipulating any other type of
'ADO Recordset object

rsShared.AddNew
rsShared.Fields("Modelo") = "Tu Modelo del KEY REGISTRY"
rsShared.Fields("Key") = "Tu Nombre del KEY VSLUE"
rsShared.Fields("Now") = "0 Por decir algo"
rsShared.Update

Set rModel = rsShared

End Function


esta funcion te devuelve un recordset con el registro que agregamos manual.

Saludos, y al moderador si lo lee, que lo agreguen mas bonito en las FAQS del Foro, ya que no esta documnetado este Append to recordset dynamic.