http://www.wni.co.jp/cww/

サンプルno132の指定したURLをhtmlファイルに保存する方法ですが、上記のＵＲＬ
でやるとなぜか完全に保存がされません。原因、また解決方法をご教授いただけると
幸いです。
よろしくお願いします。

http://www.bcap.co.jp/hanafusa/VBHLP/urltodl.htm

> サンプルno132の指定したURLをhtmlファイルに保存する方法ですが、上記のＵＲＬ
> でやるとなぜか完全に保存がされません。

何が保存されないのでしょうか？
まさか、画像ファイル！　　
Htmファイルと画像ファイルは別物ですよ。

# 不必要なコードは（ここのサイトに掲載されているもの）掲示板にそのままペーストしないで
　下さい。リンクを張るか、タイトルを記入して頂ければ解りますので。

> サンプルno132の指定したURLをhtmlファイルに保存する方法ですが

No.132のサンプルは、「指定のURLのHTMLファイルをダウンロードする」です。
”指定したURLをhtmlファイルに保存する”　ではありません。
このような間違いをされるとサンプルに問題があるように受け取られかねませんので。

> http://www.wni.co.jp/cww/
こちらの環境では、問題なく取得されたようです。(VB6/SP5, XP Pro/SP1, IE6/SP1)

そちらの環境が、VB5(SP1以下)だったり、VB6(SP3以下)だったりはしませんか?
http://support.microsoft.com/default.aspx?scid=kb;ja;171828
http://support.microsoft.com/default.aspx?scid=kb;ja;232194

>        'これでもよさそうだが一部文字化けをおこした
>        'Put #intFileNo, , Inet1.OpenURL(strURL, icByteArray)
直接渡すと、先頭に 12バイトのバイナリデータが付加される事になりますね。

これは、OpenURL の戻り値が「Byte配列」ではなく、「内部形式がByte配列のVariant型」だからです。

先頭 2バイトは、Variantのデータ型を示す値が入ります。
# 今回の場合は、バイト配列なので、CInt(vbByte Or vbArray)、すなわち &H2011 です。

さらに続いて、配列のサイズ識別用に、「2 + 8 * 配列の次元数」の領域が取られます。
# これの内訳は、最初の2バイトが「次元数」を意味しています。
# その後、各次元ごとに 4バイトの「要素数」、4バイトの「配列の下限値」と続きます。