VB 6.0에서 Recordset의 Value 가져오기

예상외로 난해함. 필드명이나 제일 상단 Value는 가져오나 index로 가져오기 어려움.

일단 쿼리를 통해 Recordset을 가져왔다는 가정하에서 진행.

myRectSet As New ADODB.Recordset 를 통해 myRectSet로 테이블을 가져왔음.

Dim var As Variant
var = myRectSet.GetRows(myRectSet.RecordCount)
For i =0 To UBound(var, 2)
     MsgBox (var(0, i))
 Next
myRectSet.Close

이게 다임. GetRows시 i를 넣어서 가져오는 줄 알았으나 전체 갯수를 가져와야 됨.
이 후 UBound를 통해 다시 전체갯수를 알아올수 있는 듯.
MsgBox에 var()를 통해, 첫번째는 필드, 두번째는 Record 인덱스가 됨.
현재 코드는 0번째 필드에 i번째 Record 데이터를 띄우는 것 임.