رفتن به مطلب

سوال

سلام

کسی کتابخونه ای برا ارسال پیامک از درون نرم افزار داره؟ (بدون رفتن به قست پیام های گوشی!)

کتابخونه ای که دارم وقتی متنی رو داخل برنامه مینویسی برای ارسال ارجاع میده به قسمت ارسال پیام گوشی که اینطوری این پیام داخل کوشی ذخیره میشه و مخاطب شماره رو میبینه، ولی من نمیخوام شماره رو ببینه

لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • پاسخ ها 45
  • ایجاد شده
  • آخرین پاسخ

بیشترین ارسال‌ها برای این سوال

ارسال‌های محبوب

سلام و خوش آمد بهتون میگم. دوست عزیز حرف شما کاملا درسته. میشه از طریق PhoneEvents گزارش ارسال رو دریافت کرد که ارسال شده یا نه و دریافت شده یا نه... اما بنده توی جواب فقط اشاره کرده بودم به درخواس

من تست کردم Dim p As PhoneSms Sub Button1_Click p.Send2("09366928285","www.Basic4Android.org",False,False) End Sub اصلا وقتی Button رو میزنی نه پیغامی نشون داده میشه. نه میگه رفت . نه میگه

سلام دوست گرامی اولین بخش برای ارسال صحیح فرستادن پیامه و دومی برای دلیور که خبر میده به دستش رسیده!شما نباید ترو فالس کنید که! اونو باید ترو بکنید و با phoneevent مقدارش رو برگردونید که از اون جا مت

ارسال‌های توصیه شده

  • 0

سلام

 

من از این روش استفاده میکنم ولی نمیدونم چرا یک بار عمل میکنه 5 بار عمل نمیکنه

اگه کسی راهنمایی کنه ممنون میشم

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

For i = 0 To 5
Dim p As PhoneSms
p.Send("9123456789","matn")
Next
  • پسندیدن 2
لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

 

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

For i = 0 To 5
Dim p As PhoneSms
p.Send("9123456789","matn")
Next

 

 

 

منظور من چیز دیگه بود

 

منظورم این بود که از هر چند بار فقط یک بار عمل میکنه

 

بعضی وقتها ارسال میشه

 

80 در صد هم ارسال نمیشه  ( حتی log بعد دستور ارسال پیامک ارسال میشه ولی پیامکی ارسال نمیشه )

لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

ارسال با send2 یه مشکل داره

اگه تعداد کارکترها زیاد باشه درست کار نمیده و اگر 2 پیامک شد که اصلا جوا نمیده ( اینطور که رو تبلت من جواب داد )

 

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

Sub SendLargeSms(Destination As String, Message As String)
   Dim r As Reflector
   r.Target = r.RunStaticMethod("android.telephony.SmsManager", "getDefault", Null, Null)
   Dim parts As Object
   parts = r.RunMethod2("divideMessage", Message, "java.lang.String")
   r.RunMethod4("sendMultipartTextMessage", _
      Array As Object(Destination, Null, parts, Null, Null), _
      Array As String("java.lang.String", "java.lang.String", _
         "java.util.ArrayList", "java.util.ArrayList", "java.util.ArrayList"))
End Sub

بعد با دستور زیر هر جای برنامه میتونید پیامک ارسال کنید

SendLargeSms("09381111111","matn sms")
  • پسندیدن 1
  • تشکر 1
لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

سلام .

چجوری بعد از اینکه روی کلید کلیک شد .اون کلید بعد ازون غیر فعال بشه .یا پاک بشه و منظورم اینهه کاربر فقط یک بار بتونه روش کلیک کنه؟ *vibre*

ممنون میشم پاسخ بدید

سلام فقط کافیه این کدو بزارین داخل عملیات کلیک 

Button1.Enabled=False

لینک ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

سلام .

چجوری بعد از اینکه روی کلید کلیک شد .اون کلید بعد ازون غیر فعال بشه .یا پاک بشه و منظورم اینهه کاربر فقط یک بار بتونه روش کلیک کنه؟ *vibre*

ممنون میشم پاسخ بدید

شما میتونید یعد از انجام کار در خط آخر اون روال visible اون قسمت رو False کنید یا Enable رو False قرار بدید

  • پسندیدن 1
لینک ارسال
به اشتراک گذاری در سایت های دیگر

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.

×
×
  • اضافه کردن...