作成者	カテゴリ	返答の対象		公開
コリー 08/05/2008 03:48 PM		ﾋﾞｭｰで選択した文書をそのまま取得したい

横から失礼します。。。

NotesViewEntryを使ったばあい、フィールド名で値をとるのではなく、列数を指定して値をとります。

ヘルプでColumnValues使用例を見ると、「最初の列を取得」というように、以下のように使っています。
-- 抜粋 --
　Set entry = view.GetEntryByKey("Sports car", False)
　Messagebox entry.ColumnValues(0),, "Column 1"

ですから、この場合 x(0)が 最初の列の値ということですね。


参考URLに載せていただいたサンプルをちょっと拝借しますと、
-- 引用 -------------
While Not(doc Is Nothing)
　count = count + 1
　Set entry = vc.GetEntry(doc)
�@x = entry.ColumnValues
�AForall y In x
　　Print count, y
　End Forall
　Set doc = dc.GetNextDocument(doc)
Wend
---------
�@x：Variant型の配列。要素は列数分ある。
�Ay：列の値・・・ループ一回目の y は イコール "x(0)"と同じ。
おまけ：count = 処理している文書数

ですから、何列目に何のデータを表示しているかを考えてyを使えばよいわけです。
もし、列数が固定であれば、
　x = entry.ColumnValues
　tmp1 = x(0)
　tmp2 = x(1)
というように、セットしても良いと思います。