質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.35%
VBScript

VBScript(Visual Basic Scripting Edition)はMicrosftが開発したスクリプト言語であり、Visual Basicのサブセットです。

Q&A

0回答

412閲覧

VBS実行時の成否の表示について

kst02w

総合スコア8

VBScript

VBScript(Visual Basic Scripting Edition)はMicrosftが開発したスクリプト言語であり、Visual Basicのサブセットです。

0グッド

0クリップ

投稿2021/02/17 09:41

元々、データのバックアップを取るためのVBSがあり、そのVBSを実行したときに、
成功か失敗かをMessageBoxに表示させたいと思っています。

具体的な処理の流れは以下のようになると想定しているのですが、
ネットで情報を調べてもどのように記述すればよいかがわからず手詰まりの状況です。

フロー例
①BackupのVBSを実行
②ファイルの更新日時を取得 ※対象のファイルが更新されたかを確認
③現在時刻を取得
④現在日時とファイルの更新日時を比較
⑤2つの時間の間隔が1分以上だった場合はエラー表示
⑥2つの時間の間隔が1分以内だった場合は成功表示

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

BeatStar

2021/02/17 10:18

何が分からないのでしょうか。 フローの例の部分をコード化すればいいだけでは?
kst02w

2021/02/17 10:53

フローのコード化の部分が全く初めての為、下記の状態で詰まってしまっております。 ①~③までは、下記のように書いてみました。 ②、③を比較するところが下記のサイトでできると思って試してみているのですが、 具体的な記述をどのようにすればいいのかが全く分からなくなってしまっている状況になります。 https://www.kanaya440.com/contents/script/vbs/function/date/date_diff.html ------------------ ①BackupのVBSを実行※ここは手動で実行します。 Set objWSHShell = CreateObject("WScript.Shell") objWSHShell.run "cmd.exe /c c:\zPO\zPO_Bak.bat", 7 ②ファイルの時間を取得 Dim fs Dim fn Set fs = WScript.CreateObject("Scripting.FileSystemObject") Set fn = fs.GetFile("C:\Users\PC1\Desktop\test.txt") ③今の時間を取得 strNow = Now ------------------
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだ回答がついていません

会員登録して回答してみよう

アカウントをお持ちの方は

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.35%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問