Try
Dim LameEncoder As liblameEncoder
LameEncoder.Initialize("LameEncoder")
If LameEncoder.SetFiles(File.Combine(perc_to_save, mFileName), File.Combine(perc_to_save, mFileNameMP3)) Then
ProgressDialogShow2("Encoding...", False)
LameEncoder.Encode
Else
Log("An error occurred while calling LameEncoder.SetFiles")
CallSub2(module, eventName,"KO")
End If
Catch
Log(LastException)
End Try