何回も質問して悪いのですが，どうしても分からなかったの
また書き込んでしまいました。
データグリッドにレコードセットを読み込んで一覧を表示
させます。（CSV，DBからの読み込みはできました）
その後，その内容をCSVファイルとして保存したいのですが，
いまいち分かりません。
もし，よろしければ教えていただけないでしょうか。
いまはＶＢ6.0をしていて，ＡＤＯによって接続を
行っています。
ベタなやり方ですが、基本に忠実に
Dim objRs As ADODB.Recordset
Dim objFld As ADODB.Field
Dim intF As Integer
Set objRs = ｘｘｘ ←適当なレコードセットを入れる
intF = FreeFile
Open "適当なファイル名" For Output As #intF
Do While Not objRs.EOF
For Each objFld In objRs.Fields
Write #intF,objFld.Value;
Next
Print #intF,""
objRs.MoveNext
Loop
Close #intF
なんか、カンマが一つ多く入ってしまうみたいなので
そこはうまく作り直して下さい。
あくまでも例として見て下さい。
そのままコピペして動きませんとか文句を言わないように。