before the file is uploaded on the server, I want to create a QT reference movie to it (aka pointer movie). Unfortunately I did not find any example or documentation about it.
on open these_items
tell application "Finder" to set destination to insertion location as string
try
tell application "QuickTime Player"
activate
stop every movie
close every movie saving no
repeat with this_item in these_items
open this_item
set {fName, fExt} to {name, name extension} of (info for this_item)
with timeout of 100000 seconds
copy destination & text 1 thru ((offset of fExt in fName) - 1) of fName & ".mov" to newfilename
save (a reference to file newfilename)
end timeout
close window 1
end repeat
quit
end tell
end try
end open
I can’t find how to make a reference movie without the MakeRefMovie tool. Maybe you can script that with ui scripting, because I don’t think it’s scriptable.