この人頭いいなと思ったエピソード

VB初心者です。
VB6で以下のコードのCreateObjectがエラー になってしまいます。
何が原因と考えられますか?

Dim objFileSys As Object

CheckFileExist = False


'ファイルの有無を確認する
Set objFileSys = CreateObject("Scripting.FileSystemObject")
  ↑
  ここで、エラーが発生

CheckFileExist = objFileSys.FileExists(S_strFileFull)
Set objFileSys = Nothing

  エラーメッセージが
  「オートメーションエラーです。
   ライブラリが登録されてません。」

  と出てしまいます。何が原因と考えられますか?
  よろしくお願いします。

A 回答 (1件)

FileSystemObjectがないのではないでしょうか。


一度、FileSystemObjectを参照設定されてみては如何でしょうか。
    • good
    • 0
この回答へのお礼

回答ありがとうございます。
原因は、scrrun.dll が登録されていなかったためです。
regsvr32 scrrun.dll
で、現象でなくなりました。
なぜ、scrrun.dllが登録しないといけなくなったかは不明ですが?
とりあえず、先に進めます。

お礼日時:2011/02/17 14:05

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


おすすめ情報