いつも参考にさせて頂いてます。

このサイトのサンプルにある「スクリーンのスナップショットをクリップボードに保存及
び印刷」が、VBのセットアップしてある環境では正しく動きますが、VBのセットアップし
ていないPC（OSはWinXPPro、Win2KPro共に）では動きません。

エラーは「実行時エラー429　ACTIVEXコンポーネントはオブジェクトを作成できません。」
が出ます、実行環境上手く出来なかったのでしょうか？

セットアップはVB6付属のディストリビューションウイザードで作りました。
Package\Support のディレクトリの中には以下のDLLがありました。
ASYCFILT.DLL
COMCAT.DLL
msvbvm60.dll
OLEAUT32.DLL
OLEPRO32.DLL
STDOLE2.TLB
VB6JP.DLL
VB6STKIT.DLL

どうすればVBの無いPCで印刷できる様になるか、アドバイスお願いします。

ひょっとして下記のせいかもしれません。
OsVer = CreateObject("SysInfo.SYSINFO").OSVersion

OsVer = 5.01  に変更するか（但しWin98 では使用不可）Form に
SysInfo.SYSINFO (SysInfo.ocx) コントロールを貼り付けて、
それを配布して頂ければ解決すると思います。

早速のRESありがとうございます。

> ひょっとして下記のせいかもしれません。
> OsVer = CreateObject("SysInfo.SYSINFO").OSVersion

OsVer = "5.01"  にして上手くいきました。

どうもありがとうございました。

> OsVer = "5.01"  にして上手くいきました。

OsVer = "5.01"  ではなく　　OsVer = 5.01　に設定しておいて下さいね！

Dim OsVer As Single　になっているのなら

花ちゃんさんへ

お世話になります、やちです。
気がつきませんでした、どうもありがとうございます。
すぐ直します。

> > OsVer = "5.01"  にして上手くいきました。
>
> OsVer = "5.01"  ではなく　　OsVer = 5.01　に設定しておいて下さいね！
>
> Dim OsVer As Single　になっているのなら