11/04/26 20:18:02.70 HCjrkScL0
For Each Arg As String In My.Application.CommandLineArgs
File.Move(Arg, Path.GetDirectoryName(Arg) & "\" & Web.HttpUtility.UrlEncode(Path.GetFileName(Arg), Encoding.UTF8))
Next
ちなみにエンコード変えるなら
Encoding.GetEncoding(51932)
とかにすれば