IPB

Welcome Guest ( Log In | Register )

WAV-->AAC with Quicktime (WIN), convert 500 files with quicktime
spirit303
post Jun 30 2003, 01:26
Post #1





Group: Members
Posts: 8
Joined: 30-June 03
Member No.: 7468



i need help

how do i convert my 500 WAV files into AAC (mp4) with the best quality encoder apple quick time 6.3 for !windows! ?
i don' wanna open each file and export it. it will keep me goin for years !!!

please tell me how to do it

thank u guys
Go to the top of the page
+Quote Post
 
Start new topic
Replies
FrDakota
post Jul 6 2003, 07:39
Post #2





Group: Members
Posts: 128
Joined: 14-June 03
Member No.: 7174



To simplify things, here his the full corrected script for encoding thru EAC.

CODE
Function CallQuickTime(Path)
  Dim fso, mp4, mp5, c, Car, QT, Str
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set WshShell = WScript.CreateObject("WScript.Shell")

  Str = ""
  For c = 1 To Len(Path) 'Convert 1 \ in 2 \
    If Mid(Path, c, 1) = "\" Then
        Str = Str & "\\"
      Else
        Str = Str & Mid(Path, c, 1)
    End If
  Next

  mp4 = Left(Path, Len(Path)-3) & "mp4"

  Path = Chr(34) & Str & Chr(34)

  QT = Chr(34) & "C:\\Program Files\\QuickTime\\QuickTimePlayer.exe " & Chr (34)
 
  WshShell.Run(QT & Path)
 
  WScript.Sleep 3000

Do 'Loop until the mp4 file really exists

  WScript.Sleep 1500
  WshShell.SendKeys "%FE" 'File Export, could be "^E"
  WScript.Sleep 500
  WshShell.SendKeys ("C:\Temp.mp4") 'Temporary mp4 filename
  WScript.Sleep 500
  WshShell.SendKeys "{ENTER}"
  WScript.Sleep 8000

'Check to see if the temp file is still here
  While fso.FileExists ("C:\Temp.mp5")
    WScript.Sleep 1000 'With CScript.exe instead of WScript.exe I could put 500
   'IMPORTANT : Increase the value under slower systems (.wav already exists bug)
  Wend
 
'The Enter was added in case QuickTime says .wav file already exists, to clear the error.
'I launches playing if all goes well.
  WScript.Sleep 500
  WshShell.SendKeys "{ENTER}"
  WScript.Sleep 500
  WshShell.SendKeys "{ESC}"
  WScript.Sleep 500

Loop Until fso.FileExists("C:\Temp.mp4")
'Close QuickTime
  WScript.Sleep 500
  WshShell.SendKeys "{ESC}"
  WScript.Sleep 500
  WshShell.SendKeys "%FX"
  'Move the Temp.mp4 to the right place while renaming it
  fso.MoveFile "C:\Temp.mp4" , mp4
  Set fso = Nothing
  WScript.Sleep 2000 'A little wait to let QuickTime exit before returning to EAC
  ' If not EAC could not be able to rename the wav file to original, then delete it.
  'IMPORTANT : Increase the value under slower systems (files do not regain their original names bug)
End Function


'Get the 2 first arguments and assumes they are %s & %d (source and destination in EAC)

Dim wav

Set objArgs = WScript.Arguments

  wav = objArgs(0)
  mp4 = objArgs(1)
 
CallQuickTime(wav)
Wscript.Quit


I hope it helps biggrin.gif
Go to the top of the page
+Quote Post

Posts in this topic
- spirit303   WAV-->AAC with Quicktime (WIN)   Jun 30 2003, 01:26
- - rjamorim   You'll have to wait. At the time, there's ...   Jun 30 2003, 01:44
- - FrDakota   I have quite successfully done a VBScript that con...   Jul 3 2003, 12:19
- - richard123   It would be easier to comment on your script if yo...   Jul 3 2003, 13:17
- - FrDakota   Ok I post it. Things to know. I made a direct ref...   Jul 3 2003, 13:51
- - richard123   Perhaps we are using different versions of QT. I...   Jul 3 2003, 15:22
- - Tomb   >how do i convert my 500 WAV files into AAC (mp...   Jul 3 2003, 15:35
- - FrDakota   It strange to send an ESC to QT it should clear a ...   Jul 3 2003, 15:43
- - richard123   I send an escape because sometimes the Edit menu g...   Jul 3 2003, 16:00
- - FrDakota   My problem is that I couldn't find a reference...   Jul 3 2003, 16:33
- - richard123   You appear to be right about AppActivate. I'm...   Jul 3 2003, 18:02
- - FrDakota   I saw you cleaned the unused variables They wer...   Jul 3 2003, 18:34
- - richard123   A number of web sites recommend set fso = nothing....   Jul 3 2003, 19:23
- - FrDakota   QUOTE (richard123 @ Jul 3 2003, 06:22 AM)Perh...   Jul 4 2003, 08:00
- - SentientPC   Great work FrDakota and richard123...looking forwa...   Jul 4 2003, 08:45
- - richard123   Another point I noticed - QT won't open a file...   Jul 4 2003, 09:22
- - SentientPC   QUOTE (richard123 @ Jul 4 2003, 03:22 AM)I...   Jul 4 2003, 09:42
- - FrDakota   (w00t) I finaly found how the infamous ".wav...   Jul 4 2003, 15:57
- - richard123   I had added a delay to the loop CODEWhile fso.Fil...   Jul 4 2003, 16:38
- - c123   Hi When I tried to get this to work, I got a ...   Jul 4 2003, 21:45
- - FrDakota   Well for the script to work QuickTime Pro must be ...   Jul 5 2003, 01:01
- - spoon   I should have something to release either today or...   Jul 5 2003, 09:34
- - c123   QUOTE (FrDakota @ Jul 5 2003, 12:01 AM)Well f...   Jul 5 2003, 10:47
- - c123   Just tried to encode four wav files, and ED:...   Jul 5 2003, 11:03
- - c123   Keep on getting the "file exists already...   Jul 5 2003, 12:00
- - FrDakota   QUOTE (c123 @ Jul 5 2003, 03:00 AM)p.s. on my...   Jul 5 2003, 12:56
- - c123   I doubled the times in the vbs file, and now I can...   Jul 5 2003, 19:18
- - FrDakota   QUOTE (c123 @ Jul 5 2003, 10:18 AM)Only probl...   Jul 5 2003, 21:18
- - FrDakota   To simplify things, here his the full corrected sc...   Jul 6 2003, 07:39
- - jsnx   Thanks for sharing the script. Works good. There...   Jul 6 2003, 16:16
- - SentientPC   Error: see below.   Jul 8 2003, 03:26
- - SentientPC   QUOTE (FrDakota @ Jul 6 2003, 01:39 AM)To sim...   Jul 8 2003, 03:33
- - FrDakota   QUOTE (SentientPC @ Jul 7 2003, 06:33 PM)I ha...   Jul 8 2003, 07:34
- - perplx   Im working on my own front end that uses winapi in...   Jul 8 2003, 19:30
- - spoon   SendMessages? I found the menu handling to be quit...   Jul 8 2003, 23:20
- - perplx   I had to do that too, I wanted add bit rate ect to...   Jul 9 2003, 01:03
- - zeer   this script version works for me with EAC (if you ...   Jul 9 2003, 15:28
- - rpop   I haven't tried using this script, but I'v...   Jul 10 2003, 23:36
- - Nic   As soon as QuickTime 6 came out, I grabbed the SDK...   Jul 11 2003, 00:05
- - perplx   A question for spoon or anyone else that knows. Wh...   Jul 11 2003, 06:33
- - zeer   It seems to get Quicktime api/sdk to work the APP ...   Jul 13 2003, 11:08
- - FrDakota   QUOTE (zeer @ Jul 9 2003, 06:28 AM)CODE While...   Jul 14 2003, 09:42
- - Nic   @zeer: Ahh, I guess that maybe the case. Its a sha...   Jul 14 2003, 09:47
- - spoon   QUOTE (perplx @ Jul 11 2003, 05:33 AM)A quest...   Jul 14 2003, 11:11
- - zeer   2 FrDakota: Nobody is perfect. Actually, the prob...   Jul 14 2003, 14:07
- - zaphod   I've made a tiny Python script which "abu...   Jul 27 2003, 16:12


Reply to this topicStart new topic
1 User(s) are reading this topic (1 Guests and 0 Anonymous Users)
0 Members:

 



RSS Lo-Fi Version Time is now: 29th August 2014 - 10:28