VBScript Tips-0-

2015年12月12日21:18  VBScript Tips



告知
--新規カテゴリの追加--
画像をScan&ReTouchして公開することに
少し飽きてきたので、
VBScriptのTipsを備忘録代りに記事にします。

Windows Scripting Host(WSH）がベースなので、
OSがWindowsなら特別な準備は要りません。
行番号が表示できるテキスト・エディタがあれば十分です。

VBScript for ImageMagickが中心になると思います。



基本形(test-1.vbs)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 		Option Explicit

Dim objShell
Dim objFso

Set objShell = WScript.CreateObject("WScript.Shell")
Set objFso = WScript.CreateObject("Scripting.FileSystemObject")
Const ForReading = 1, ForWriting = 2, ForAppending = 8

'ここに命令文を記述していきます。

Dim ScriptNameME
Dim End_W

ScriptNameME = WScript.ScriptName
End_W ="が終了しました。"
objShell.Popup ScriptNameME & End_W ,3 ,,vbOKOnly

Set objShell = Nothing
Set objFso = Nothing

[EOF]


まずはこのファイル(test-1.vbs)を作り、
ダブルクリックして実行してみて下さい。

次に、行頭の「Option Explicit」と、
「Dim ～」の行（４ヵ所）と、19,20行目を削除して、
実行してみて下さい。

何も変りませんか？

何も変らないのが正解です。
その辺りも含めて、次回に続きます。
前の記事次の記事