[Solved] Help in Syntax

[Processor]

Hi ,

I tried to convert this syntax in several ways but it don't work:

I wanted to change this :

run("cmd")
     WinWaitActive("[CLASS:ConsoleWindowClass]")
     Send('"' & @ScriptDir & '\mediainfo.exe" --Output=Video;%Duration/String3% "' & $file & '" > ' & '"' & @ScriptDir & '\Duration.txt"' & '{enter}')
     send("exit" & "{enter}")
     WinWaitClose("[CLASS:ConsoleWindowClass]")

to something like :

Run('"' & @ScriptDir & '\mediainfo.exe" --Output=Video;%Duration/String3% "' & $file & '" > ' & '"' & @ScriptDir & '\Duration.txt"')

but a have an MS-Dos message error which disapear to quickly to see what's happening.

Thx by advance for your help

Processor.

Edited January 9, 2013 by Processor

[guinness]

So the first code snippet works but not the second? What about ShellExecute instead?

[EndFunc]

Hi ,

I tried to convert this syntax in several ways but it don't work:

I wanted to change this :

run("cmd")
     WinWaitActive("[CLASS:ConsoleWindowClass]")
     Send('"' & @ScriptDir & '\mediainfo.exe" --Output=Video;%Duration/String3% "' & $file & '" > ' & '"' & @ScriptDir & '\Duration.txt"' & '{enter}')
     send("exit" & "{enter}")
     WinWaitClose("[CLASS:ConsoleWindowClass]")

to something like :

Run('"' & @ScriptDir & '\mediainfo.exe" --Output=Video;%Duration/String3% "' & $file & '" > ' & '"' & @ScriptDir & '\Duration.txt"')

but a have an MS-Dos message error which disapear to quickly to see what's happening.

Thx by advance for your help

Processor.

maybe try this to see what error you are getting.

Run(@ComSpec & " /k " & @ScriptDir & "\mediainfo.exe --Output=Video;%Duration/String3% " & $file & " > " & @ScriptDir & "\Duration.txt", @SW_SHOW)

[Processor]

maybe try this to see what error you are getting.

Run(@ComSpec & " /k " & @ScriptDir & "\mediainfo.exe --Output=Video;%Duration/String3% " & $file & " > " & @ScriptDir & "\Duration.txt", @SW_SHOW)

Nothing happen with this command, no error, but nothing done.

what should have happened?

[Processor]

So the first code snippet works but not the second? What about ShellExecute instead?

Already tried with shellexecute but the problem is the same.

[kylomas]

Processor,

Your run cmd is trying to pipe output to a file. I don't think you can do that. You may be able to get the output using stdoutread.

kylomas

edit: also you are using DOS cmd syntax which will not work (;%Duration/String3%)

edit2: maybe the syntax is OK for that pgm's parameter, don't know as I do not have that pgm.

edit3: you did not answer guinness's question. And is there more to the original snippet that we are not seeing?

Edited January 8, 2013 by kylomas

[BrewManNH]

Is there a text file called duration.txt in the script directory? If so there's probably information in it that might tell you what's happening.

[Jos]

You had the @SW_SHOW as second parameter which is the WorkDir! Also added the double quote back in which I expect are needed.

Try the following:

Run(@ComSpec & ' /k "' & @ScriptDir & '\mediainfo.exe" --Output=Video;%Duration/String3% "' & $file & '" > Duration.txt', @ScriptDir ,@SW_MAXIMIZE)

Jos

Edited January 8, 2013 by Jos

[Processor]

Processor,

Your run cmd is trying to pipe output to a file. I don't think you can do that. You may be able to get the output using stdoutread.

kylomas

edit: also you are using DOS cmd syntax which will not work (;%Duration/String3%)

edit2: maybe the syntax is OK for that pgm's parameter, don't know as I do not have that pgm.

edit3: you did not answer guinness's question. And is there more to the original snippet that we are not seeing?

my purpose is get the information provided by the command mediainfo.exe --output=video;%Duration/String3% and put it to a file called duration.txt

I aleady did these kind of things with another PGM without any problem. Error I used send keys

The Syntax is ok as it works in CMD box.

What is snippet?

Processor

Edited January 8, 2013 by Processor

[Processor]

Thx for the syntax, I now know where is the problem.

There is a space in the folder name of the scriptdir so the command launched is someting like:

C:userstotodesktopnew

whereas it should be :

"c:userstotodesktopnew foldermediainfo.exe" ...

so it seems the run command doesn't care of the quotes our double quotes in my syntax whereas the send does

Edited January 8, 2013 by Processor

[Jos]

Have you tried the syntax I supplied ?

Didn't that work either?

[Darkbeo]

You can try to use this...

Run(@ComSpec & " /c " & 'mediainfo.exe --Output=Video;%Duration/String3% "' & $file & '" > Duration.txt', @ScriptDir, @SW_MAXIMIZE)

Double quotes inside single quotes...

Edited January 8, 2013 by Darkbeo

[Processor]

Have you tried the syntax I supplied ?

Didn't that work either?

Yes I did, that's how I saw that there was a path problem (space in path)

You can try to use this...

Run(@ComSpec & " /c " & 'mediainfo.exe --Output=Video;%Duration/String3% "' & $file & '" > Duration.txt', @ScriptDir, @SW_MAXIMIZE)

Double quotes inside single quotes...

I tried this, it's a little bit better as the file duration.txt is created, but the file is empty

As Kytomas said it's maybe impossible to pipe to an output file.

[Jos]

You could try to use the file's shortname:

Run(@ComSpec & ' /k "' & FileGetShortName(@ScriptDir & '\mediainfo.exe') & '" --Output=Video;%Duration/String3% "' & $file & '" > Duration.txt', @ScriptDir ,@SW_SHOW)

[Processor]

Mediainfo telling the syntax in not good I keep trying

[Processor]

This syntax give the right value :

Run(@ComSpec & " /k " & 'mediainfo.exe --Output=Video;%Duration/String3% "' & $file & '"', @ScriptDir, @SW_MAXIMIZE)

I just to find a way to put the result into a text file.

[GMK]

You might look and/or for more inspiration.

[kylomas]

Procesor,

Perhaps I have not made myself clear. You cannot pipe to a file using the run command. What Jos and EndFunc are showing you is a way to run through the command processor so you can pipe your output.

kylomas

[Processor]

Hi All,

Finally got what I wanted using the dll, I had a first read while ago but it seemed to complicated for me. this morning in five mins I found the solution:

; Open Media Info dll
$hDLL = DllOpen("MediaInfo.dll")
; New MediaInfo handle
$aMediaInfo = DllCall($hDLL, "ptr", "MediaInfo_New")
$hMediaInfo = $aMediaInfo[0]

; Open
DllCall($hDLL, "dword", "MediaInfo_Open", "ptr", $hMediaInfo, "wstr", "C:\HNI_001.avi" ) ; Full path
; MediaInfo
$aMediaInfoGet = DllCall($hDLL, "wstr", "MediaInfo_Get", "ptr", $hMediaInfo, "int", 0, "int", 0, "wstr", "Duration/String3", "int", 1, "int", 0)
$sMediaInfo = $aMediaInfoGet[0]
MsgBox("","",$sMediaInfo & @CRLF)
DllClose($hDLL)

The problem is that even if it works, I don't totally understand what I'm doing.

if someone could explain what are the PTR, WSTR it would be great.

Processor

Edited January 9, 2013 by Processor

[Processor]

Ok Very last problem I guess:

the code in stand alone works great but in this format

select
       case msg=$toto

         ; Open Media Info dll
      $hDLL = DllOpen("MediaInfo.dll")
      ; New MediaInfo handle
      $aMediaInfo = DllCall($hDLL, "ptr", "MediaInfo_New")
      $hMediaInfo = $aMediaInfo[0]

      ; Open
      DllCall($hDLL, "dword", "MediaInfo_Open", "ptr", $hMediaInfo, "wstr", "C:\HNI_001.avi" ) ; Full path
      ; MediaInfo
      $aMediaInfoGet = DllCall($hDLL, "wstr", "MediaInfo_Get", "ptr", $hMediaInfo, "int", 0, "int", 0, "wstr", "Duration/String3", "int", 1, "int", 0)
      $sMediaInfo = $aMediaInfoGet[0]
      MsgBox("","",$sMediaInfo & @CRLF)
bla
bla
bla

return the following error:

==> Subscript used with non-Array variable.:

$hMediaInfo = $aMediaInfo[0]

$hMediaInfo = $aMediaInfo^ ERROR

Thx by advance for the help