2017-03-17から1日間の記事一覧

フォルダ内にある全ファイル名取得

VBS

VBSでファイルを取得してMsgを表示する Dim objFileSysDim objFolderDim objFile Set objFileSys = CreateObject("Scripting.FileSystemObject") 'フォルダオブジェクトを取得Set objFolder = objFileSys.GetFolder("ディレクトリ名") 'Folderオブジェクトの…

ログファイル作成 & 追記

VBS

VBSでログファイルを作成する Dim objFSO,objLogSet objFSO = WScript.CreateObject("Scripting.FileSystemObject")Set objLog = objFSO.OpenTextFile("ファイル名",8,True)objLog.WriteLine("任意の文字列")objLog.CloseSet objLog = Nothing Set objFSO = …

【RegExp】文字列比較

VBS

VBSで文字列を比較する Dim objRESet objRE = CreateObject("VBScript.RegExp")objRE.Pattern = "比較したい文字列"If objRE.Test("比較する文字列") Then 一致したときの動作Else 一致しないときの動作End IfSet objRE = Nothing 正規表現 文字列の先頭を指…