XMLを読み込むには？

解決

よる 2007-05-19 01:50:44 No: 136435

vb6.0でxmlファイルを読み込みたいのですが下記のコードでは
「ユーザー定義型は定義されていません。」とコンパイルエラーが出てしまいます。
なにが足りないのでしょうか？

Private Sub Command1_Click()
    Dim rs As New ADODB.Recordset
    rs.Open "sample.xml"
    List1.Clear
    Do Until rs.EOF
        List1.AddItem rs("Name") & " " & rs("No")
        rs.MoveNext
    Loop
    rs.Close
End Sub

特攻隊長まるるう 2007-05-23 01:26:12 No: 136436

>「ユーザー定義型は定義されていません。」
エラーの起こる行も特定してください。

> Dim rs As New ADODB.Recordset
の行で起こってるなら、ADODB が見つからないのでしょう。
参照設定しましたか？

よる 2007-05-23 22:16:56 No: 136437

＞特攻隊長まるるうさん

ご指摘の通り参照設定にて解決しました。

自分の説明不足の指摘も含め
ありがとうございました。