環境
OS：Windows7 64bit Pro
VB：VB6.0(SP3)

MediaDet.WriteBitmapBitsメソッドを使用して動画のサムネイルを取得している部分について
avi,mpg(mpeg-1)などのサムネイルは取れるのですが
mpeg(mpeg-2),mp4のサムネイルを取ろうとするとエラーが出てしまいます。
mpeg(mpeg-2),mp4のサムネイルを取れるようにするにはどのようにすればよいでしょうか？

以下がソースとエラー内容です。
・サムネイル取得部分のソース（MyPath & TmpNameででファイルを指定しています。）
objMediaDet.WriteBitmapBits 0, 107, 101, MyPath & TmpName

・mpeg(mpeg-2),mp4を指定した時に出るエラー
Err.Number    -2147220992
Err.Description    オートメーション エラー

宜しくお願いします。

回答ではありません。 何方からもレスがないようなので...。
もう少し問題を切り分けて質問されてはいかがでしょうか？

> VB：VB6.0(SP3)
VB6.0 の最終的なサービスパックは、SP6 です。
開発環境で使用するなら必ず、最新のパッチが当たっている状態で使用して下さい。
(特に VB6.0 のサービスパックでは、多くの部分で改善・修正等がされているので)
SP3 のような状態で使っていると、元々のバグとコード上のバグ等の区別が付き難い。
今回の原因でなくても、SP3 で開発したプログラムを最新のOS上に配布したりすると
トラブルが発生する可能性がありますし、他のプログラム等の開発でもバグ等が発生する
可能性があります。

> OS：Windows7 64bit Pro
VB6.0 での開発は、せいぜい、Windows Vista (できれば XP)までにして下さい。
Windows7 上での開発は、色々問題がありますし、私は、64bit 版で使った事がないので
詳しくは解りませんが、64bit なら余計に色々問題が発生する可能性があります。

  サポートされる Windows オペレーティング システム バージョン
  http://msdn.microsoft.com/ja-jp/vstudio/ms788708.aspx  の中程

  VB6.0 をWindows 7 上で使用した場合の不具合
　http://www.hanatyan.sakura.ne.jp/patio/read.cgi?no=272


従って、VB6.0 のサービスパックを SP6 に更新して、Windows XP もしくは、Vista 等の
VB6.0 に合った環境で試してから再度質問される方がいいかと思います。
そもそも、手動でなら再生ができる環境にあるのでしょうか？
http://drang.s4.xrea.com/program/tips/other/wmp_playmp4.html

又、コードを掲載されるなら、他の人も試せる(事象を確認できる)ようなコードを掲載されないと
多くの方にレスを頂く事はできないかと思います。
(貴方と同じ環境で、同じようなコードを使用して同じような経験をした方でないと的確な回答は
できないかと思いますので。)

VB6の環境のSP3は間違いで、正確にはSP6でした。すみません。
やはり7,64bitでは未知の問題が起こる可能性があるようなので、環境については後日XPで整えて実行してみたいと思います。

手動でmp4,mpeg2のファイルを再生できる環境ではあります。
作成したVBのプログラム上でも再生はできるのですが
MediaDet.WriteBitmapBitsメソッドでサムネイルを取得した時にエラーが発生してしまいます。
サムネイル取得部分の MediaDet.WriteBitmapBitsメソッドを拡張子がmpeg2とmp4の場合は通らないようにし、作成したプログラム上で指定したデフォルトサムネイル画像を使用すればプログラム上で再生可能です。
またどこかでmpeg2,mp4は動画ファイルとして認識されず音声ファイルとして認識してしまうためサムネイルが取れないと聞いた（読んだ）記憶があるのですが・・・正確には覚えていません。


現在手元に環境が無いもので、実際に試せるのは月曜日以降になります。

OS：Windows XP SP3 Pro
VB：VB6 SP6
上記の環境でも試してみましたが、ステップ実行で
objMediaDet.WriteBitmapBits 0, 107, 101, MyPath & TmpName
を実行したときに7環境の時と同様エラートラップに飛んでしまいました。