WSH

WSHで引数の受け取り

WSH

WScript.Argumentsオブジェクトを使用すると引数を受け取ることができる。 drag.vbsドラッグしたファイル名を表示するvbs。 Option Explicit On Error Resume Next '変数定義 dim objArgs '引数取得 set objArgs = WScript.Arguments dim i for i = 0 to obj…

たくさんのファイルを作成する2

WSH

たくさんのファイルを作成するHTA版を作ってみた。 htaはvbsにフォームを付加したもの。フォーム部分はhtmlで記述する。 mkfile.hta <html><head> <title>HTAを作ってみる</title></head> <body> <form name="form1"> <p>出力先を入力してください。 <input type="text" name="outputpath" value="D:\" /></p> <p>テキスト名を入力してください。 <input type="text" name="textname" value="text" /></p> <p></p></form></body></html>

たくさんのファイルを作成する1

WSH

久々にWSHに挑戦しようと思い、複数のファイルを作成するスクリプトを作ってみた。 mkfile.vbs Option Explicit Dim objFileSys Dim strScriptPath Dim strCreateFile Dim i 'ファイルシステムオブジェクトの作成 Set objFileSys = CreateObject("Scripting.…