این نسخه سناریوی «تماس با پشتیبانی» را میسازد: شماره پشتیبانی در متغیر ثابت support نگه داشته میشود و متن پیام از ترکیب یک سلام ثابت و متن ادیت باکس edtUser با CRLF ساخته میشود. مزیت پیامک مستقیم این است که کاربر صفحه پیامک را نمیبیند و همهچیز داخل اپ میماند؛ اگر میخواهید کاربر قبل از ارسال متن را ببیند و ویرایش کند، بهجای PhoneSms از Intent با ACTION_SENDTO و نوع smsto استفاده کنید. یادتان باشد هزینه پیامک روی اعتبار سیمکارت کاربر است و باید در توضیحات اپ ذکر شود.
کتابخانههای مورد نیاز: Phone
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تعداد بازدید | ۱ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- کتابخانه: Phone
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub btnMain_Click
Dim sms1 As PhoneSms
Dim support As String = "10004xxxxx"
Dim msg As String = "سلام، از اپلیکیشن شما کمک میخواهم:" & CRLF & edtUser.Text
sms1.Send(support, msg)
ToastMessageShow("پیامک برای پشتیبانی ارسال شد", False)
End Sub