ulož do xxx.vbs
spouštej xxx.vbs c:\sss.lol
spusti to c:\fff.exe s parametrem jen sss
On Error Resume Next
Dim args,a
Set oShell = WScript.CreateObject("WScript.Shell")
Set args = WScript.Arguments
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")
set a=FSO.GetFile(args(0))
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Run "c:\fff.exe "+ Left(a.Name,InStr(a.Name,".")-1)
Kdyžtak to uprav, funguje to jen na jednu tečku v názvu souboru...Doufam, že je to to co jsi chtěl
