293 > ارسال فایل با بلوتوث اسان B4A

سلام

یک روز مانده به سال نو به همتون تبریک میگم

پلاسه کهنه اندیشه را دور باید انداخت

کتابخونه ای که اپ کردم برای ارسال فایل با بلوتوث به دیگر گوشی اماده شده

فقط یک خط کد خیلی سادست و خیلی هم کار ما رو راحت کرده

این کد رو توی بیسیک تبدیل به کتابخونه کردم و در اختیار شما قرار دادم

مثال

Dim b1 as Bluetooth

b1.Initialize

("b1.SendFileBluetooth(File.DirRootExteal,"/icm/","trick.apk