WindowsXP SP2
VB2005

モノクロのビットマップ画像を読み込み、
FAX送信できる形式(CCITT Group3)のTIFFファイルに変換します。
以下のようにしました。


'ビットマップオブジェクト
Dim bmp As New Bitmap("C:\test.bmp")
'パラメータ
'→CCITT Group3
Dim Para As System.Drawing.Imaging.EncoderParameters = _
                        New System.Drawing.Imaging.EncoderParameters(2)
Para.Param(0) = New System.Drawing.Imaging.EncoderParameter( _
                        System.Drawing.Imaging.Encoder.ColorDepth, 1)
Para.Param(1) = New System.Drawing.Imaging.EncoderParameter( _
                        System.Drawing.Imaging.Encoder.Compression, _
                        Imaging.EncoderValue.CompressionCCITT3)
'コーデック　　　
Dim Codec As System.Drawing.Imaging.ImageCodecInfo
Codec = GetEncoderInfo("image/tiff")

'ファイル出力　　　　
bmp.Save("C:\test.tif", Codec, Para))


これで一応作成はできたのですが、うまくFAX通信できませんでした。
それでTIFFファイルを解析したところ、
タグID：259
タグ名：Compression
タグ値：3（T4Options参照）

で

タグID：292
タグ名：T4Options
タグ値：設定なし

となっていました。

Compressioタグが3の場合、T4Optionsタグが0,1,4,5のいずれかでないとFAX側で正常なファイル
とみなされないようです。

なにかパラメータなどの設定が不足しているのでしょうか？


ちなみにVB6単体でのTIFFファイル出力は分かりませんが、VB6のアクティブレポート
でプレビュー画面からFaxExportCITTメソッドでエクスポートした場合、
T4Optionsタグに"4"がセットされており、正常にFAX送信できました。


TIFFのタグ情報閲覧はフリーソフトのTiffAnalyzerを使用しました。
そのときのタグ情報を画像掲示板に貼り付けます。
よろしくお願いします。