Media.au3 Recorder

[Tukata]

Hi,

Basically I took this code from "Media.au3".

It woks fine for me but when I tried on another PC (XP) it didn't save the file. Any idea ?

Thank you

Tuk

#include <Media.au3>
MsgBox(0,"Recorder","Click OK and recording will start." & @CR & "Press ESC to stop recording." & @CR & "You will be asked to save your file."")
HotKeySet("{ESC}","StopRecording")

$Stop=1

Func StopRecording()
  $Stop=0
EndFunc

$Media=_MediaCreate(6)
_MediaRecord($Media)

While $Stop
WEnd

$File=FileSaveDialog("","","Wave files (*.wav)")&".wav"
If @error Then
    _MediaClose($Media)
    Exit
EndIf

_MediaStop($Media)

$M="C:\Temp\Temp.wav"
_MediaSave($Media, $M)
_MediaClose($Media)

Sleep(500)
FileCopy($M, $File)
FileDelete ($M)

.

Edited December 1, 2006 by Tukata

[Tukata]

Nobody ???

Tuk

[RazerM]

Make sure C:\Temp exists