お世話になっております。徐です。

VBでADOを使って、MS　SQL　Seｒverに定義したバイナリデータを
GetChunkで取り出そうとしましたが、”このコンテキストで操作は許可されていませ
ん。”
というエラーが出て、取得出来ませんでした。
Onlineヘルプなどを調べましたが、Filed.Attributesが120になっていて、
adFldLongがFalseでした。

adFldLongをTrueになるために、どこで設定する必要がありますか？
（Filed.Attributesは読み取り専用）
またはGetChunkでバイナリデータを取り出せるため、何かコードを入れなければ
ならないでしょうか？　

お願い致します。


テーブルNHKTの項目定義：
　　　nhk_nhhjcd　smallint ,
      nhk_nhmdno smallint,
      nhk_nhnbit   binary(2000)

VBでCAｌｌ部分ソース：

   ' Open a connection.
   Set cnn1 = New ADODB.Connection
      strCnn = "Provider=sqloledb;" & _
      "Data Source=nhk-s01;Initial Catalog=pss;User Id=nhk;Password=nhk; "
   cnn1.Open strCnn

   ' Open the pub_info table
   Set rstPubInfo = New ADODB.Recordset
   rstPubInfo.CursorType = adOpenKeyset
   rstPubInfo.LockType = adLockOptimistic
   rstPubInfo.Open "NHKT", cnn1, , , adCmdTable

   ' Prompt for a logo to copy.

   ' Copy the logo to a variable in chunks.
   rstPubInfo.Filter = "((nhk_nhhjcd=1200) AND (nhk_nhmdno=10))"
   lngLogoSize = rstPubInfo!nhk_nhnbit.ActualSize
   Do While lngOffset < lngLogoSize
     MsgBox rstPubInfo!nhk_nhnbit.Attributes
      varChunk = rstPubInfo!nhk_nhnbit.GetChunk(conChunkSize)
      varLogo = varLogo & varChunk
      lngOffset = lngOffset + conChunkSize
   Loop
…