کتابخانه AudioRecorder – ضبط تماس در B4A

سلام میکنم به همه همراهان دوست داشتی سایت یاهو ۹۸ !

خب امروز به درخواست یکی از دوستان کتابخانه AudioRecorder که برای ضبط مکالمات تلفنی در B4A استفاده میشه رو آماده کردیم.

 

شما توسط این کتابخانه، میتونید برنامه ای جهت ضبط مکالمات تلفنی بسازید که میتونه بسیار بسیار ازش استقبال بشه!

به علاوه بر آماده کردن خود کتابخانه، آموزش متنی اون رو هم براتون تدارک دیدیم که میتونید از اون هم کمال استفاده رو ببرید!

 

  • ابتدا کتابخانه را از انتهای همین صفحه دانلود، و متغیر آنرا تعریف کنید :

 

Dim rec As AudioRecorder

 

  • سپس میبایست برای ضبط مکالمه، کد زیر را در مکان دلخواه قرار دهید :

 

rec.Initialize()
rec.AudioSource = rec.As_MIC
rec.OutputFormat = rec.OF_DEFAULT
rec.AudioEncoder = rec.AE_AMR_NB DateTime.DateFormat = "yyMMddHHmmss"
rec.setOutputFile(File.DirRootExternal,"/Recordings/"&DateTime.date(DateTime.now) &".wave")
rec.MaxDuration=10000
rec.prepare()
 rec.start

 

  • و این کد رو هم برای متوقف کردن فرایند ضبط باید در مکان مناسب قرار بدید :

 

rec.stop

 

  • حالا شما باید چک کنید که هر وقت تماس بر قرار شد، کد دوم و وقتی تماس پایان یافت، کد سوم اجرا بشه!