vbscriptのメッセージが文字化けを直す方法

Question

現在、動作確認としてvbscriptの練習をしているのですが、msgboxの日本語部分が文字化けしてしまいます。

文字化けするファイルWithtest.vbsのプログラムは以下のようになっています。

set objFile = CreateObject("Scripting.FileSystemObject")
set objFolder = objFile.GetFolder("C:\vbsScript")

With objFolder
	strStatus = strStatus & "サイズ： " & .Size & vbCr
	strStatus = strStatus & "ファイル数： " & .Files.Count & vbCr
	strStatus = strStatus & "サブフォルダ数： " & .SubFolders.Count & vbCr

End With

MsgBox strStatus

因みに使用しているエディタはnotepad++でエンコードはUTF-8になっています。

UTF-8で文字化けしないように日本語表示する為にはどうしたらよろしいでしょうか？
宜しくお願い致します。

Answer 1

文字コードをANSIにして下さい。

UTF-8で文字化けしないように日本語表示する為にはどうしたらよろしいでしょうか？

出来ません。

Answer 2

VBS スクリプトとして使えるのは ANSI か UTF16 のみで UTF8 には対応していないようです。

ANSI か UTF16 で保存するのが一番手っ取り早いですが、それでもという場合、WSF なら UTF8 が使えるようです。

JScript(Windows スクリプト ファイル)をUTF-8で書く

例は JScript ですが、VBcript でも大丈夫かも知れませんので試してみてください。