• ベストアンサー

VBSで指定した時刻にメッセージを出力したい。

タイトル通りの処理を行いたいのですが、訳あってタスクスケジューラと フリーソフト等は使用したくないので、VBSでどうにかしたいと思っています。 ちなみにOSはWindows98なのでATコマンドは使えません。

  • mlk
  • お礼率25% (15/59)

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

  • ベストアンサー
  • SHIMAPEE
  • ベストアンサー率75% (154/203)
回答No.1

WSH VBScriptでしたら例えば下記のような感じでしょうか。おすすめはフリーソフトを使うことですけれども。 Windows XP SP2で確認しましたがWindows98でも動くと思います。 ----- Option Explicit Dim WshShell, Alerm Set WshShell = WScript.CreateObject("WScript.Shell") Alerm = "5:00" '★ 時刻の指定 While CDate(Alerm)>Time 'WshShell.Popup "ただいま " & Time & " です。",3 '3秒表示 WScript.Sleep 10*1000 '10秒待つ Wend WshShell.Popup Alerm & " を過ぎました。",,"時間ですよ",48 -----

mlk
質問者

お礼

ありがとうございました! Windows98で動作を確認致しましたが、私が思い描いていたものが できそうです。

関連するQ&A

  • schtasksによりリモートでタスク登録したVBSの動作

    schtasksで以下のようにしてVBSをタスクスケジューラに登録しました。 schtasks /create /tn テスト /tr テスト.vbs /sc daily /st 00:00:00 /ru SYSTEM /s \\COMPUTER VBSは実行されているようですが、MsgBoxで表示しているポップアップが表示されません。 試しに同じVBSを手動でタスク登録してみたのですが、その場合は正常に表示されます。 ATコマンドで/interactiveにすれば可能ですが、今後の管理のことも考えると、できればATは使いたくありません。 schtasksでは同様のことはできないのでしょうか? どなたかよろしくお願いします。

  • OpenByThisExplorer.VBSの使いかたを教えてくださいませんか?

    エクスプローラの左側(階層)で選択したHTMLファイルを右側で見られたら便利だと思い ベクターで検索したら「OpenByThisExplorer.VBS」が出てきたのですが、 使えるようにする方法が分かりません。 いろいろ調べたのですが、プログラムの関係するものしか見つけられず、そういうのが全く分からないので利用することが出来ず、 こちらで質問させていただきます。 また、このソフトでなくても、希望するようなフリー(もしくは安価)ソフトがあれば教えてくださいませんでしょうか? ちなみに同じベクターにあった「CAN-viewer Ver4.10 … 通称:きゃん・びゅ~」 というフリーソフトは「runtime error 217 at 0007C5C3」という エラーが出て使えませんでした・・・

  • vbsからCPU名などを得る方法

    vbsから、コンピュータのプロパティにあるコンピュータ名、CPU名を取得して使用したいと思っています。ざっと見たところ、vbsの関数にはないようなのですが、vbsから使用できるテキストで取得できるライブラリとか、フリーソフトとかないでしょうか?

  • VBSの内容をJavaスクリプトで記述するとどうなりますか?

    タイトルの通り、VBスクリプトでWindows2000リソースキットなどにあると言われている、reboot.vbsやlogoff.vbsやpoweroff.vbsなどをJavaスクリプトではどのように記述したらよいのでしょうか?例えば社員が使用するPCの起動時に、ある文書をブラウザー起動で表示させ、その内容に同意するか、しないかを選択させ、同意しない場合は、PCを強制ログオフさせようと考えています。また、同じようなことを実際別な方法で実施しているという方がいらっしゃいましたら、是非お知恵を貸してください。よろしくお願い致します。

  • 特定のフォルダに入れたファイルを一定時間が経過したら削除する方法 VBS ?

    特定のフォルダ >>例えば..\\a\folderに入れたファイルを一定時間が経過したら削除する方法を教えてください。 イメージとしてはタスクスケジューラなどで15分毎にバッチファイルが動作するように設定しておき、 そのバッチからvbsなどをキックして現在の時間と保存されているファイルの時間差を確認してvbs内で入力してある一定の時間を経過していたら削除というようなものにしたいと思っています。 動作のイメージは湧くのですが、いざvbsを書こうと何から手をつけていいのかもわからず、参考になるサイトや簡単なものであるのであれば作成のアドバイスを頂けたらと思い投稿いたしました。 またそのようなことを実現するフリーソフトなどあれば教えてください。よろしくお願いします。

  • すでに開いているブックのマクロを起動させるvbsを教えてください

    お願いします。 00時から23時54分まで 常時開いていて、温度の数値をロギングしているexcelブックがあります。 1分おきにロギングし、10分おきに表に記録し、グラフ化しています。 エクセルを開き、閉じてOSを再起動、またエクセルを開く、を365日繰り返すものです。 基本的に常時無人です。 印刷、保存など、計7個の作業を Application.OnTime にて Workbook Open時にタイマーとしてマクロをかけてたのですが、 実行の信頼度が高くない(実行しない日がある)ので、 タスクスケジューラにて行おうとしました。 マクロを実行させるvbs Option Explicit Dim objxlsm Set objxlsm=CreateObject("Excel.Application") objxlsm.Workbooks.Open ("ブックパス) objxlsm.Run "Module11.DB保存" objxlsm.DisplayAlerts=False objxlsm.quit Set objxlsm = Nothing 以上を行うと、 今開いているブックではなく、保存されたブックを別で開き、そこのマクロを処理してしまいます。 現在開いているブックに処理をかける場合はどうしたらよいのでしょうか? このブックはリアルタイム(表内に1分おきに数値を更新します)に動いている表グラフなので、 なんとか、開いている(表示している)ブックで外部からマクロを実行したいのですが。。 ご教授ください。 ちなみに、このブックは、タスクスケジューラでvbsにて開いています。(関係ありますか?) おねがいします。

  • 指定時刻の自動シャットダウン(強制終了)について

    指定した時間になると自動的にシャットダウン(強制終了)できるものを教えてください。 タスクスケジューラ内で以下の記述を入れると動くのですが、通常の終了になってしまいます。 %windir%\system32\shutdown.exe -s -t 5 “強制終了”はできないものでしょうか。 フリーソフトで強制終了をかけるものがあるのですが、パソコン起動時にこのソフトを立ち上げて指定時刻を毎回入力しなければならず不便です。 終了をかける時刻は毎日決まっており、変わることはありません。 そして通常終了ではシャットダウンできません。 PCのOSはWindowsXP(pro)SP3です。

  • PCを指定時間に休止状態にしたり復帰させたりする方法

    PCを指定時間に休止状態にしたり、復帰させたりしたいと思っています。 復帰はタスクスケジューラで、休止状態はrundll32.exeを使ってできることとが分かったのですが、rundll32で休止状態にすると、タスクスケジューラでの自動起動ができないようです。(どこかのサイトにも書かれていました) そこで、rundll32以外の方法で休止状態にする方法(コマンド、WindowsAPIなど)をご存知の方がいらっしゃいましたらご教授ください。 会社のPCで、フリーソフトを落としたり持ち込んだりはできないので、コマンドやAPIが存在しているのならば、それを実行するプログラムを作ればいいかと思っています。

  • タスクスケジューラからのバッチ起動

    タスクスケジューラからのバッチ起動で動作せず困っております [環境] ・windows server 2008 システムディスク:C ・共有ディスクをLANにて接続 ネットワークドライブとしてD:に設定 [動作概要] ・バッチ(*.vbs,*.bat)、データ、ログをD:に配置 ・タスクスケジューラに*.vbsを登録 ・*.vbsからD:にある*.batを起動(WScript.Run) [事象] ・*.vbsをGUIよりダブルクリック/エンターキーでは問題なく起動 ・*.vbsをタスクスケジューラから起動するととまってしまう ・*.vbs内の*.batコール箇所をコメントして実行で動作は最後まで終了 ・*.bat単体で動作させても問題なく終了 ・*.batをタスクスケジューラで起動するととまってしまう *.bat内で(>D:)などのディレクトリ移動コマンドを入れてもとまってしまう [原因推測] ・タスクスケジューラからネットワークドライブが認識できない? ・*.vbsで実施するWScript.Runの実行者がsystemで、 ネットワークドライブの認識用の環境情報(unixでいうcshrcみたいなもの)を 読み込まないで動作する? [問] ・上記構成では動作ができないのでしょうか? ・実現可能な方法があればヒントでもほしい 大変複雑な内容になって申し訳ありませんが 何か察することがあればコメントください

  • 時刻表示がおかしいです

    パソコンに詳しい方、教えてください。 パソコンを起動すると必ず 右下の時刻表示のところの時間が 数時間遅れて表示されます。 現在はSakura Watchというフリーソフトで 時間を合わせてなんとか使っています。 起動→時間遅れ発見→フリーソフトで修正 の繰り返し。 この時刻表示はどうしたら正常になりますか? 使用しているOSはWindows98SEです。 よろしくお願いします。