• ベストアンサー

SWbemDateTimeの使い方

Windows2000+VBA(ACCESS97)です。 WbemScripting.SWbemDateTimeのオブジェクトを使いたいと思っているのですが、CreateObjectで「ActiveXがつくれない」とエラーになります。 オブジェクトブラウザで見てみたところたしかにSWbemDateTimeが中にでてきません。参照設定が不足しているのでしょうか。ちなみに「Windows WMI Scripting V1.1 Library」は参照設定しています。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.2

>Windows2000+VBA(ACCESS97)です。 XP以降でしかだめですね。 http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/swbemdatetime.asp

その他の回答 (1)

  • taka_tetsu
  • ベストアンサー率65% (1020/1553)
回答No.1

実際に記述したCreateObjectの行を書いてください。

papy_moon
質問者

補足

実際のコーディングです。 Set objSWbemDateTime = CreateObject("WbemScripting.SWbemDateTime")

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • Outlook に参照設定できない

    アクセスからアウトルックに参照設定したいのですが とあるファイルで Microsoft Outlook 14.0 Object Library へ参照設定しようとすると 「この名前は既にあるモジュール、プロジェクト、オブジェクト ライブラリで使われています」 と言うエラーになります。 ファイル１.accdbでは参照設定できるのに、 ファイル２.accdbでは参照設定できるのに、 だと上記のエラーが発生します。 vbaコードに問題があるのかと思い、 全てのコードをコメントアウトしましたが同じエラーが発生します。 現在すでに参照設定しているのは、 VBA Access stdole DAO だけです。

  • 「SHDocVw」の意味

    VBAでInternetExplorerオブジェクトを使いたかったので、 参照設定で「Microsoft Internet Controls」にチェックすると、 オブジェクトブラウザの「SHDocVw」というライブラリーが表示されますがどういう意味なんでしょう？ と言うのも、ずっと、 オブジェクトブラウザのライブラリーでＶＢＡやＥＸＣＥＬのように 「InternetExplorer」的な名前を探してたのですが なかなかなくて、やっと見つけて疑問に思いました。

  • オブジェクトブラウザの「stdole」とは？

    エクセルもアクセスも オブジェクトブラウザに全てのライブラリに「stdole」があります。 これは参照設定のどこにチェックをいれたがために表示されるものなのでしょうか？

  • WMIの使い方

    ＶＢスクリプトでＷＭＩを使ってＰＣのハードウェア情報を 取り込むプログラムを作りました。 しかし、前提としてＶＢのツール/参照設定で 　　「Microsoft WMI Scripting v1.2 Libray」 にチェックを入れる必要があります。 これを明示的にプログラムの中で設定してしまう方法は ないものでしょうか。

  • エクセルVBAについて

    現在Excel2010を使っています。 以前に使っていたACCESSのデータを移すという話になり、 こちらを頼りに何とかコードまで打ち込みました。 ただ、実行に問題点があるようなので以下の２点について聞きます。 http://okwave.jp/qa/q3333180.html 質問１ このコードは標準モジュールというところに書いてますが、 書く場所はここでいいのでしょうか。 commandbutton1というオブジェクトを作ってもデバッグにすら入ってくれません。 質問２ ツール→参照設定で Microsoft ActiveX Data Object 2.x Library Microsoft Scripting Runtime にチェックを入れておいてくださいとありますが、 2010ではどこに設定があるのでしょう。

  • ＩＥではなくファイアフォックスを指定することは

    ＶＢＡでブラウザを開く場合、 ＩＥではなくファイアフォックスを指定することは可能ですか？ 既定のブラウザはＩＥにしています。 Sub test1() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.Application") objIE.Navigate "http://www.ocn.ne.jp/" objIE.Visible = True Set objIE = Nothing End Sub の Set objIE = CreateObject("InternetExplorer.Application") の部分を Set objIE = CreateObject("firefox.exe") に変えてみたら、 【ActiveX コンポーネントはオブジェクトを作成できません。(Error 429)】 になりました。

  • EXCEL「Dictionaryオブジェクト」宣言

    ＥＸＣＥＬ ＶＢＡにて Ｄｉｃｔｉｏｎａｒｙオブジェクトを利用しようと思い ネット検索して調べていると・・・ 1）Dim MyDic As Object Set MyDic=CreateObject("Scripting.Dictionary") 2) Dim MyDic As Scripting.Dictionary Set MyDic = New Scripting.Dictionary 3) Dim MyDic Set MyDic=CreateObject("Scripting.Dictionary") 4) Dim myDic As New Scripting.Dictionary 上記の４パターンが出てきました。 いずれも「連想配列」を使うものなのですが、 オブジェクト型、バリアント型、Ｎｅｗキーワードで宣言・・・ 4つの違いがイマイチ理解できません。 違いを教えてください。

  • Access コントロール(Listbox or Combobox)へのデータ貼り付け

    OS:Windows2K Pro Access Version:2000 参照設定: Microsoft ActiveX Data Objects 2.5 Library Microsoft ActiveX Data Objects Recordset 2.5 ibrary Microsoft ADO EXT. 2.5 for DDL and Security Microsoft Jet and Replication Objects 2.5 Library リンクテーブルを一切使わずに、ADOだけでフォームを作成しようと思っているのですが、壁に突き当たってしまったので、質問させてください。 リストボックスやコンボボックスに"Table/Query"でデータを表示したいのですが、可能なのでしょうか？ 参考にしている本では、 me!Listbox.recordset = adoRST.Clone でRecordsetを貼り付けられる、旨の記述があるのですが、実行すると、 「エラー番号 : 438 　エラー内容 : オブジェクトは、このプロパティまたはメソッドをサポートしていません。」 とエラーが返ってきます。 私なりに調べた限りでは、「Access2000ではADOによるRecordsetをコントロールへ貼り付けられない」との記事を見かけたのですが...Access2002(両方インストールしています)で試したところ、同様のエラーが発生してしまいました。 また、表示するデータが多く、「値リスト」は利用できません。 教授いただけませんでしょうか？ よろしくお願いいたします。

  • Accessファイルバージョンの取得

    教えてください とあるサイトで、以下のAccessファイルのバージョンを所得するVBAを発見し、実行しましたが、 CurrentProject.FileFormat のステートメントで、「オブジェクトが必要です」エラーが発生します。 何か解決方法はありますでしょうか？ 環境はwinXP+Access97です。 どうかご教授お願いいたします。 'File形式を判別します。 Select Case CurrentProject.FileFormat Case acFileFormatAccess97 strFormat = "Access 97" Case acFileFormatAccess2000 strFormat = "Access 2000" Case acFileFormatAccess2002 strFormat = "Access 2002-2003" End Select 参照設定は次の通り設定しあります。 Visual Basic For Application Microfoft Access 8.0 Object Library OLE Automation Microsoft ActiveX Data Objects 2.1 Library よろしくお願いいたします

  • コードで参照設定をする方法

    ＶＢのコード内で、オブジェクトへの「参照設定」をさせる方法を教えていただけませんでしょうか。 目的は、自分のコンピュータでは参照設定してあるオブジェクトでも、ほかのパソコンではされていると限らないため、アプリ（実際はエクセルブック）の起動時に参照設定を強制したい。参照設定がないと、そのオブジェクト変数の宣言文がコンパイルエラーとなってしまいますよね・・・。 ＶＢＡのヘルプによればこちらのメソッド（object.AddFromGuid(guid, major, minor) As Reference）を使うといいような気がするのですが、参照設定したい先（具体的には「Microsoft Scripting Runtime(scrrun.dll)」）の「ＧＵＩＤ」がわかりません。レジストリを探さないといけないのでしょうか・・・。探し方がわかりません。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する