vbscript - 文字を使用して名前を分割する

Question

分割したいファイル名が異なるため、ex Contents.js jQuery.10.1.js Main.css

jsやcssなどのこれらのファイルから拡張部分を取得する方法を教えてください.iは分割機能を使用し、. charatcer ですが、 jquery.10.1.js では機能しません。

Answer 1

ジョブに適切なツール - .GetExtensionName() - を使用します。

>> Dim oFS : Set oFS = CreateObject("Scripting.FileSystemObject")
>> Dim aTests : aTests = Split("Contents.js jQuery.10.1.js Main.css")
>> Dim sFiNa
>> For Each sFiNa In aTests
>>     WScript.Echo sFina
>>     WScript.Echo oFS.GetExtensionName(sFiNa)
>> Next
>>
Contents.js
js
jQuery.10.1.js
js
Main.css
css