Командная строка остается открытой после drag'n'drop на пакетный файл

Question

Я запускаю Windows 7 64-bit (папки библиотеки перемещены в E:, система все еще на C:). Я использую someone's batch file, чтобы открыть медиаплеер VLC в полноэкранном режиме на моем втором дисплее (слева) и в окне управления на моем основном дисплее (справа). Пакетный файл находится в моей видеотеке, и я перетаскиваю видеофайл в пакетный файл, и все отлично. ИСКЛЮЧАЕТ, что приглашение командной строки не будет закрыто, пока я не закрою VLC.

Я попытался exit, cls, goto:eof и @echo off в начале в нескольких различных сочетаниях без успеха. Как я могу закрыть окно cmd после открытия VLC или никогда не показывать в первую очередь?

(обратите внимание, что мое окно CMD занимает большую часть моего основного экрана из-за того, как я использую его для чего-то совершенно не связаны, так что не делает его меньше и двигаться он не будет работать.)

set vlcPath="C:\Program Files\VideoLAN\VLC\vlc.exe" 

%vlcPath% %1 --video-x=-1920 --video-y=1080 --width=300 --height=300 --fullscreen --no-video-title-show --no-embedded-video --no-qt-fs-controller 

Answer 1

Попробуйте эту партию:

@echo off 
set vlcPath="C:\Program Files\VideoLAN\VLC\vlc.exe" 
start "" %vlcPath% %1 --video-x=-1920 --video-y=1080 --width=300 --height=300 --fullscreen --no-video-title-show --no-embedded-video --no-qt-fs-controller 
Exit 

И это то, что я имею в виду, чтобы сделать это с помощью VBScript:

Option Explicit 
Dim vlcPath,video,Command,ws 
If WScript.Arguments.Count > 0 Then 
    video = WScript.Arguments.Item(0) 
    vlcPath ="C:\Program Files\VideoLAN\VLC\vlc.exe" 
    Command = DblQuote(vlcPath) & " " & DblQuote(video) &" --video-x=-1920 --video-y=1080 --width=300 --height=300 --fullscreen --no-video-title-show --no-embedded-video --no-qt-fs-controller""" 
    'wscript.echo Command 
    set ws = CreateObject("wscript.shell") 
    ws.run Command,1,True 
else 
    wscript.echo "You must drag and drop any video over this script in order to open it in fullscreen" 
end if 
'********************************************************************************* 
Function DblQuote(Str) 
    DblQuote = Chr(34) & Str & Chr(34) 
End Function 
'*********************************************************************************