How to edit metadata from filename

Now my topic becomes "How to edit metadata from filename" :slight_smile:
And I found this very useful post from AlbatorV :

So I tried to modify it, to apply for this kind of files : "1 Coming of Age.mp3"

@nodeselect
Rename FILEINFO To="{mp3track}%{mp3title}"
@script vbscript
Option Explicit
Dim DOpusRTPath
DOpusRTPath = "C:\Program Files\GPSoftware\Directory Opus\dopusrt.exe"
Dim Shell
Set Shell = CreateObject("WScript.Shell")
Function Rename_GetNewName ( strFileName, strFilePath, fIsFolder, strOldName, ByRef strNewName )
    Dim re, strCommand, track, titre, path
    Set re = new RegExp
    re.Pattern = "(.*?) (.*)(\.mp3)"
    track = re.Replace(strFileName, "$1")
    titre = re.Replace(strFileName, "$2")
    path = strFilePath & "\" & strFileName
    strCommand = """" & DOpusRTPath & """ /cmd SetAttr """ & path & """ META ""track:" & track & """ ""title:" & titre & """"
	Shell.Run strCommand,0,False
    Dopus.OutputString  "Commande : " & strCommand
    strNewName = ""
End Function

But nothing happens ! Can you help me, please ?