ADODB.RECORDSETを使った非接続型、オンメモリの仮想テーブルの作成方法

ado_db_recordset.vbs

option explicit

dim rs
set rs = CreateObject("ADODB.Recordset")
with rs.Fields
	.Append "IDX", 3 ' integer
	.Append "VAL", 200, 50 ' varchar(50) 文字列は長さ指定必要
end with
rs.Open
dim idx

for idx = 0 to 10
rs.AddNew
rs.Fields("IDX") = idx
rs.Fields("VAL") = "Hello" & idx
rs.Update
next

rs.Filter = "IDX > 5"
rs.Sort = "VAL DESC, IDX DESC"

rs.MoveFirst
do while not rs.EOF and not rs.BOF
    MsgBox rs("IDX") & "=" & rs("VAL")
	rs.MoveNext
loop

rs.Close

msgbox "done"