Code: Select all
Start-Process "C:\q\Mp3tag\Mp3tag.exe" -ArgumentList '"C:\q\! AUDIO\MMMM.m3u8"'
$wshell = New-Object -ComObject wscript.shell;
$wshell.AppActivate('*Mp3Tag')
$wshell.SendKeys('(%(" "(n)))')
I tried inserting it to VBS like so
Code: Select all
On Error Resume Next
ReDim args(WScript.Arguments.Count - 1)
For i = 0 To WScript.Arguments.Count - 1
If InStr(WScript.Arguments(i), " ") > 0 Then
args(i) = Chr(34) & WScript.Arguments(i) & Chr(34)
Else
args(i) = WScript.Arguments(i)
End If
Next
command = "Start-Process 'C:\q\Mp3tag\Mp3tag.exe' -ArgumentList '""C:\q\! AUDIO\MMMM.m3u8""'"
Set shell = CreateObject("WScript.Shell")
shell.Run "powershell.exe -WindowStyle Hidden -Command " & Chr(34) & command & Chr(34), 0, False
Set wshell = CreateObject("WScript.Shell")
wshell.AppActivate("*Mp3Tag")
I tried using different amounts of >>"<< and >>`<< but I always get the such messagesC:\q\! was not found.