ارسال و دریافت پیامک

[berayan 90]

سلام

من راجع ussd در انجمن سرچ کردم اما واقعا چیزی نبود یدونه بود اونم حذف شده ، تو سایتها و انجمنهای دیگه هم چیزی پیدا نکردم !

همه نوشتن ولش کن !

پس این نرم افزار های خرید شارژ با اسم اس و اجرای کدهای ایرانسل رو با چی می سازن .*تعجب3*

[مصطفی حقیقی 176]

http://answercenter.ir/thread689.html

[jeqele 563]

کاملا شدنیه من قبلا اجرا کردم ولی باور کن الان وقت اجرا و آموزششو ندارم.

بعد از 5 آذر یکم وقتم خالی میشه میام توضیح میدم.

شرمنده عزیز دل.

[berayan 90]

http://answercenter.ir/thread689.html

خوب حالا من می خوام یه نرم افزاار بسازم که با زدن یک دکمه ( مثلا) کدایرانسل رو بفرسته و بعد از دریافت پاسخ در نرم افزار نمایش داده *همینه بشه . دوستان یه راهنمایی کنن و یه سر نخ بدن خودم پیشو می گیرن پیداش می کنم .*همینه*

[Intelligent 93]

Sub Activity_Create(FirstTime As Boolean)
Call("*#123#")
End Sub

Sub Call(Command As String)
Dim i As Intenti.Initialize(i.ACTION_CALL, "tel:" & Command.Replace("#", "%23"))
StartActivity(i)
End Sub

به همین راحتی و به همین خوشمزگی *خوشمزه*

[berayan 90]

Sub Activity_Create(FirstTime As Boolean)
Call("*#123#")
End Sub

Sub Call(Command As String)
Dim i As Intenti.Initialize(i.ACTION_CALL, "tel:" & Command.Replace("#", "%23"))
StartActivity(i)
End Sub

به همین راحتی و به همین خوشمزگی *خوشمزه*

ممنون . البته این کد تو یک انجمن خارجی دیدم و لی درست متوجه نشدم . به چه کتاب خونه ای وصله call چیه متغیر آیتمه .؟

[Intelligent 93]

call یه تابع هست دیگه.. چون خودمون این تابع(ساب) رو نوشتیم لازم نیست کتابخونه ای اضافه بشه

و یه کد ussd رو به عنوان ورودی میگیره

کتابخونه ها هم همه مجموعی از تابع ها هستن

[salmana 174]

در مورد ussd که دوستان فرمودن که چگونه انجام بدی ولی در مورد سوال دومت که پاسخ ussd رو توی برنامه ات بیاری فکر کنم غیر ممکنه . فکر کنم ارل (بنیان گذار b4a ) هم همینو گفته

[berayan 90]

دوستان بهترین راه ارسال رو پیدا کردم . می ذ ارم اگر کسی خواست استفاده کنه و اگر هم کسی تونست بگه چطوری جواب پیام رو که میاد بیاریم تو نرم افزار کار نشد نداره مگر b4a همچین قدرتی نداشته باشه . چون همین نرم افزارهای بانکی دقیقا دارن همین کارو انجام میدن و نرم افزارهای خرید شارژ ،من می خوام خروجی که تو گوشی میده تو نرم افزار بیا د .

Sub Process_Globals




End Sub


Sub Globals

Dim p As PhoneCalls
Private Button1 As Button
Private EditText1 As EditText
End Sub


Sub Activity_Create(FirstTime As Boolean)

Activity.LoadLayout("1")

End Sub


Sub Activity_Resume


End Sub


Sub Activity_Pause (UserClosed As Boolean)


End Sub


Sub Button1_Click


Dim s As String
s ="*720"&"%23"
StartActivity(p.Call(s))


End Sub

کتابخونه phon هم فعال باشه

[jeqele 563]

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

شما باید از ارایه دهنده api بگیری و با سرور اون همزمان از طریق اینترنت در تماس باشی.

مثالش هم نرم افزار رسمی آسان پرداخت.

بگو دقیقا چی می خوای تا آموزشش رو بزاریم تو سایت.

[jeqele 563]

در ضمن من الان متوجه شدم اسم تاپیکت هیچ ربطی به سوالت نداره. مدیران رسیدگی کنن لطفا.

[berayan 90]

سلام تقریبا یک نرم افزار خرید شارژ . مانند نرم افزارهای زیادی که تو بازار موجوده و رایگانم هست اینا از چه سیستمی استفاده می کنن