×Windows Script Host
スクリプト 行14
文字35
エラー 終了していない文字型の定数です。
コード800A0409
ソースMicrosoft VBScript コンパイルエラー
------------------------------------------------------
以下のスクリプトを実行したら、上記のエラーとなります。どこがおかしいでしょうか。
------------------------------------------------------
strSendKey = "{F13}"
intSleepTime = 290000
strQuery = "Select * FROM Win32_Process WHERE (Caption = 'wscript.exe' OR Caption = 'cscript.exe') AND " _
& " CommandLine LIKE '%" & WScript.ScriptName & "%'"
Set Locator = CreateObject("WbemScripting.SWbemLocator")
Set Service = Locator.ConnectServer
Set Res = Service.ExecQuery(strQuery)
Dim cnt
cnt = 0
If Res.Count > 1 Then
strMsg = "送信処理を停止します。"
If MsgBox(strMsg , vbYesNo + vbQuestion) = vbYes Then
For Each proc In Res
cnt = cnt + 1
If cnt <> Res.Count then
proc.Terminate
End If
Next
End If
WScript.Quit 0
Else
strSleepTime = CStr(intSleepTime/1000)
strMsg = strSleepTime & "秒毎に" & strSendKey &"を送信します。"
If MsgBox(strMsg , vbYesNo + vbQuestion) = vbYes Then
Call StopScript(strSendKey, intSleepTime)
End If
End If
WScript.Quit 0
Sub StopScript(key, sleepTime)
Set WsShell = CreateObject("Wscript.Shell")
Do
WsShell.SendKeys(key)
WScript.Sleep sleepTime
Loop
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) VBAが止まります。 3 2022/08/31 14:09
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) 実行時エラー´5854´ 文字列型パラメーターが長すぎます。 3 2023/06/08 21:17
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) ①ExcelVBAでカレンダーを作り、別のユザーフォームで日付を入力したいのですがエラーになります。 1 2023/02/17 18:39
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
VBscriptが起動しない?
Microsoft ASP
-
ステートメントの末尾が不正です
Windows Vista・XP
-
vbsでは漢字の変数は使えないのでしょうか。
Visual Basic(VBA)
-
-
4
VBScriptで日本語が変です
その他(プログラミング・Web制作)
-
5
VBS実行時エラー オブジェクトがありません 回避方法について
Visual Basic(VBA)
-
6
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
7
exeファイルの中身を見ることは可能ですか?
フリーソフト
-
8
「終了していない文字列型の定数です」とでます
JavaScript
-
9
モーダルフォームとモードレスフォーム
Visual Basic(VBA)
-
10
VBSでテキストファイルを作成
その他(プログラミング・Web制作)
-
11
ステートメントが見つかりません
Microsoft ASP
-
12
VBscriptからバッチに変数を渡すには?
その他(プログラミング・Web制作)
-
13
バッチファイル内のコマンドプロンプトを1つずつ実行するにはどうしたらよいでしょうか?
IT・エンジニアリング
-
14
バッチファイルからVBA実行でエラー
Excel(エクセル)
-
15
VBA+VBSによる別インスタンスBookOpen時のVBSエラーに関して
Excel(エクセル)
-
16
新しいウィンドゥを最大化で立ち上がるようにしたい
JavaScript
-
17
“.vbs”のファイルが実行できない
Windows Me・NT・2000
-
18
TERA TERMを隠す方法
その他(プログラミング・Web制作)
-
19
ASPで画面間のパラメタ受け渡し
Microsoft ASP
-
20
定数配列の書き方
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelマクロでセルに値が入力さ...
-
VBSがコンパイルエラーになりま...
-
教えて下さい。
-
ショッピングカートのカスタマイズ
-
例外処理のフローチャートの記...
-
VBA This Workbookモジュール...
-
モジュールとサブルーチン
-
時間がかかり過ぎたプロセスを...
-
Pythonでタートルが使えません
-
VBでグローバル変数を宣言するには
-
VBAからpythonへの転向について
-
うるう年かどうかを計算するプ...
-
perlスクリプトのブラウザURLか...
-
VBA モジュールで共通に使う変...
-
エクセルVBAでシートモジュール...
-
Apache2 静的・動的モジュール...
-
Excel VBA 定義されたプロージ...
-
Excel VBAで、ユーザーフォーム...
-
グラフのX,Y座標を取得したい
-
Excelで時刻になったら知らせて...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBSがコンパイルエラーになりま...
-
教えて下さい。
-
perlをバージョンアップしたら...
-
【python】requestsでdataとし...
-
POSTで送信するとエラーになる
-
WebClientの文字列送信にてエラー
-
SWI-Prologでのエラーに関して
-
メールアドレスについて
-
erf(x)とerfc(x)のカタカナ読み...
-
VBscriptのエラーメッセージの...
-
データベースが返すエラー文字...
-
ラズパイ4からGmailへの...
-
windows7のperlでaccdb接続でエ...
-
VBからブラウザの表示状態(リ...
-
英字のみを検索する正規表現に...
-
逆行列(Maxima)
-
LWPでtimeoutがうまくいかない
-
w3cの検証エラー?
-
Pythonプログラミングでエラー
-
powershellで引数受け取り時に...
おすすめ情報