[リストへもどる]
一括表示

投稿時間:2004/05/17(Mon) 17:04
投稿者名:くるりん
Eメール:
URL :
タイトル:
カレントレコードの値取得
こんにちは、たびたびお世話になっております。

カレントレコードの中身全部をファイルに書き出し、をしたいのですが
ヘルプを探してみてもそれっぽいのが見つからないのでご助言お願いいたします・・・。
レコードの中が58列もあるので、レコード名("item1")&レコード名("item2")・・・・
とやるのはさすがに回避したいもので・・・。
ヘルプがところどころ灰色になって見れないのはインストールしなおした方がよろしいのでしょうか・・・。

レスをつけるとスレッドはあがってしまうんですね。。

投稿時間:2004/05/17(Mon) 23:41
投稿者名:魔界の仮面弁士
Eメール:
URL :
タイトル:
Re: カレントレコードの値取得
> レコードの中が58列もあるので、レコード名("item1")&レコード名("item2")・・・・

Dim F As Field
For Each F In RS.Fields
  Debug.Print F.Name "=" F.Value
Next

とか。

> ヘルプがところどころ灰色になって見れないのはインストールしなおした方がよろしいのでしょうか・・・。
MSDNライブラリを
・アクティブ サブセットを変更している場合
・カスタムセットアップした場合(未確認)
・Visual Studioではなく、単体の言語製品を使っている場合(未確認)
などには、キーワード検索の一部の項目が淡色表示されるようです。

投稿時間:2004/05/18(Tue) 09:09
投稿者名:くるりん
Eメール:
URL :
タイトル:
Re^2: カレントレコードの値取得
おはようございます。レスどうもありがとうございます〜。

> Dim F As Field
> For Each F In RS.Fields
>   Debug.Print F.Name "=" F.Value
> Next
やっぱりループ処理を使うしかないのですね。。

> MSDNライブラリを
> ・アクティブ サブセットを変更している場合
> ・カスタムセットアップした場合(未確認)
> ・Visual Studioではなく、単体の言語製品を使っている場合(未確認)
> などには、キーワード検索の一部の項目が淡色表示されるようです。
前の人のをそのまま使ってるので、どれだかわからないです・・・。
おとなしくインストールしなおしてみますね。
どうもありがとうございました〜。

投稿時間:2004/05/18(Tue) 10:42
投稿者名:魔界の仮面弁士
Eメール:
URL :
タイトル:
Re^3: カレントレコードの値取得
> > Dim F As Field
> > For Each F In RS.Fields
> >   Debug.Print F.Name "=" F.Value
> > Next
> やっぱりループ処理を使うしかないのですね。。

私は、「その方法しかない」とは、一言も書いていませんよ。(^-^;
状況によっては、他の手法が得られる事もあります。

たとえば、ADODB.Recordsetで、現在のレコードセットの内容をファイル化したいなら、
GetStringメソッドで文字列化するとか、SaveメソッドでXMLテキスト化するなんて手もありますし。


ただ、最初の質問を見ただけでは、「どのような形式でファイルに書き出したいのか」とか
「今使っているミドルウェア(ADOとかDAOとかRDOとかoo4oとか)は何なのか」といった
付加情報が分からなかったので、さしさわりの無い一般的と思えるコードを回答した次第です。

# …それでも、RS("列1") & RS("列2") & …と58列分書くよりは、ループ処理の方がスマートですよね?(^^;)

投稿時間:2004/05/18(Tue) 14:03
投稿者名:くるりん
Eメール:
URL :
タイトル:
Re^4: カレントレコードの値取得
> やっぱりループ処理を使うしかないのですね。。
せっかくレスを頂いたのに余計なことを書いてしまってすみませんでした;;

> ただ、最初の質問を見ただけでは、「どのような形式でファイルに書き出したいのか」とか
> 「今使っているミドルウェア(ADOとかDAOとかRDOとかoo4oとか)は何なのか」といった
> 付加情報が分からなかったので、さしさわりの無い一般的と思えるコードを回答した次第です。
DAOでmdbに接続して処理をしてました。テキストファイルに書き出し、をしようと思っていたのです。

書き方が足らない上に言葉たらずでほんとうにすみませんでした