shahab1392

منظورم سورس بود ولی رو این اخطار میده

لطفا اگه میشه این مشکل رو حل کنید

سلام من این برنامه رو خریداری کردم ولی به این دسترسی احتیاج داره لطفا راهنمایی کنید

#AdditionalRes:D:\sdk2\b4a_floatingactionbutton, de.amberhome.objects.floatingactionbutton

راهنمایی .............

دروووود....

بنظر من این پیغام ارسال شدن یا نشدن برای پیامی که با از داخل برنامه میدیم نیست.

و اگه از داخل انباکس خود گوشی پیامی ارسال کنیم از این طریق اطلاع داده میشه که ارسال شده یانه.

حالا باید چکار کرد میشه یه نمونه بزارید تا بدونیم چکار باید کرد

سلام و خوش آمد بهتون میگم.

دوست عزیز حرف شما کاملا درسته.

میشه از طریق PhoneEvents گزارش ارسال رو دریافت کرد که ارسال شده یا نه و دریافت شده یا نه...

اما بنده توی جواب فقط اشاره کرده بودم به درخواست دوستمون.

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

Sub Globals
Dim p As PhoneSms
Dim check As PhoneEvents
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	check.Initialize("check")
End Sub

Sub Button1_Click
	p.Send2("09366928285","www.Basic4Android.org",True,True)
End Sub
Sub check_SmsSentStatus (Success As Boolean, ErrorMessage As String, PhoneNumber As String, Intent As Intent)
If Success=False Then
Msgbox("پیغام ارسال نشد" & ErrorMessage,"خطا")
Else
Msgbox("پیغام شما با موفقیت ارسال شد","ارسال شد")
End If
End Sub

Sub check_SmsDelivered (PhoneNumber As String, Intent As Intent)
Msgbox("پیغام شما دریافت شد","دریافت")
End Sub

موفق باشید

 

سلام از کد بالا که استفاده میکنم فقط پیام ارسال میشه ولی پیغامی نمایش داده نمیشه که ارسال شد و یا پیام دریافت شد باید چکار کنم

لطفا یک نمونه برامون بزارید که نمایش داده بشه

ممنون میشم

چه مشکل عجیبی داری واقعا! راهی به ذهنم نمیرسه جز اینکه هرچی که مربوطه به بیسیک رو پاک کنی و از اول نصب کنی.

sdk و jdk و ... همه چی رو پاک کن. از اول نصب کن احتمالا یه فایلی به اشتباه پاک شده.

اینو ببین

دقیقا مشکل تو رو داره ولی با پاک کردن بیسیک و نصب دوبارش حل شده...

آقا ممنون ولی نشد بخدا دارم کلافه میشم ویندوزم رو عوض کردم 8.1 هستش ورژن 3.8.2 رو دوباره نصب کردم تمام مراحل رو انجام دادم ولی باز اخطار پایین رو میده

واقعا نمودنم مشکل از ldk هستش یا چیز دیگر از نسخه jdk1.8.0_25 هم استفاده میکنم

Parsing code.                           0.02
Compiling code.                         0.09
Compiling layouts code.                 0.03
Generating R file.                      0.59
Compiling debugger engine code.         Error
javac 1.8.0_25
shell\src\b4a\example\code_subs_0.java:11: error: method PushSubsStack in class Debug cannot be applied to given types;
       Debug.PushSubsStack("getData (code) ","code",7,_ba,code.mostCurrent,19);
            ^
 required: String,String,int,RemoteObject,Object
 found: String,String,int,RemoteObject,code,int
 reason: actual and formal argument lists differ in length
1 error

بنظر شما از ویندوز نیست ؟ نسخه های 7 یا 8 رو نصب کنم ؟

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

ممنون دوست گرامی ولی همچنان برقراره ... بهاش داستانی دارم...

میگم از ورژن sdk و یا jdk نیست آخه همش از jdk اخطار میده ...

یه کاری کن، بازم ورژن قدیمی رو نصب کن و استفاده کن ببین مشکل حل میشه؟ اگه حل شد با همون به کارت ادامه بده تا بفهمیم مشکلی که درحال حاضر با ورژن 4 داری از کجاس و چطور رفع میشه.

من خودمم ورژن جدیدو نصب نکردم با 3.8.2 کار میکنم.

سلام حالا که برنامه روپاک کردم و نسخه قدیم رو نصب کردم باز هم اخطار رو میده !!!!

چکار باید کرد ....

فکر میکنم منظور دوستمون از sd همون sdk هستش و این عکس بیشتر مشخص میکنه که کجا بذاریش:

امیداورم مشکلت حل شه.

هنوز اخطار میده

من قبلا با b4a ورژن 3.8.2 کار می کردم ورژن جدید که اومد اون رو نصب کردم حالا برنامهام اجرا نمیشن ...

کرک هم انجام دادم نمیدونم مشکل از کجاست که این خطا رو میده ......

Parsing code.                           0.07
Compiling code.                         0.24
Compiling layouts code.                 0.03
Generating R file.                      0.76
Compiling generated Java code.          Error
B4A line: 129
End Sub
javac 1.8.0_25
src\HHJ\example\slidingsidebar.java:981: error: cannot find symbol
BA.senderHolder.set(sender);
 ^
 symbol:   variable senderHolder
 location: class BA
1 error

اخطاری که به جاوا مربوط میشه

آیا شما این فایل رو تو مسیر sd دارین؟

اگه ندارین دان کنید

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

دانلود build-tools از پیکوفایل

با سلام منظورتون از (آیا شما این فایل رو تو مسیر sd دارین؟) چیه و این sd کجاست ؟

من فایل رو دانلود کردم ولی نمیدونم کجا بزارمش ؟

ممنون میشم راهنمایی کنید؟

با سلام

چطور میشه با یه SeekBar فاصله بین خطوط را زیاد کرد ....

یکی از دوستان بگه مشکل کجاست؟؟

آقا این خطا رو چکار کنم چه ورژنی باید نصب کنم آخرین ورژن بیسیک که نسخه 4 هستش رو نصب کردم ...

Parsing code.                           0.07
Compiling code.                         0.20
Compiling layouts code.                 0.04
Generating R file.                      0.96
Compiling generated Java code.          Error
B4A line: 555
End Sub
javac 1.8.0_25
src\com\biography\janbarari\clsslidingsidebar.java:1001: error: cannot find symbol
BA.senderHolder.set(sender);
 ^
 symbol:   variable senderHolder
 location: class BA
1 error

یه if بزار اگه از 72 کاراکتر بیشتر بود 72 تای اولو تو یه اس ام اس بفرسته بعدی ها رو جدا.

گوشی های قدیمی هم یه تنظیماتی داشت همین کارو می کرد.*خنده*

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

ممنون میشم بیشتر راهنمایی کنید ...

کسی از دوستان میتونه راهنمایی کنه ؟؟

با سلام خدمت تمام دوستان عزیز

با این کتابخانه phone که برای برنامه ارسال اس ام اس هستش فقط میشه 72 کاراکتر رو ارسال کرد آیا برای ارسال پیامک های بالاتر از 2 کاراکتر میشه کاری کرد

من از کد زیر استفاده کردم جواب نداد

Sub Send1_Click
   If EditText1.Text= "" OR EditText2.Text="" Then 
       Msgbox("لطفا متن پیام را وارد کنید","اخطار")
           Else
   p.Send2(EditText1.Text,EditText2.Text,True,True)
   ph.Vibrate(1000)
   Dim Label6 , Label7 As Label
   Label6.Initialize("Label6")
   Label7.Initialize("Label7")
   Label6.text="ارسال شد"
   Label7.text=") بود"
   ToastMessageShow("پیام به شماره تلفن "&EditText1.text&" "&Label6.text,True)
'    ToastMessageShow(" متن پیام شما ("&EditText2.text&" "&Label7.text,True)

   End If
End Sub

Sub send(PhoneNumber As String, Text As String)
   Dim r As Reflector
       p.Send2(EditText1.Text,EditText2.Text,True,True)

   r.Target = r.RunStaticMethod("android.telephony.SmsManager", "getDefault", Null, Null)
   r.RunMethod4("sendTextMessage", Array As Object(PhoneNumber, Null, Text, Null, Null), _
       Array As String("java.lang.String", "java.lang.String", "java.lang.String", _
           "android.app.PendingIntent", "android.app.PendingIntent"))
End Sub

تا هم در قسمت Manifest Editor کد زیر را هم وارد کردم

AddPermission(android.permission.SEND_SMS)

باز هم نشد و اخطار میده

نمیشه کاری کرد تا پیامک های با حجم بیشتر و بالا تر ار 72 کاراکتر ارسال بشن

لطفا راهنمایی کنید....

قبل لود لایوت ها این کدو بزار قبلیا محو شن

activity.removeallviews

این رو که میزارم هیچی دیگه نشون داده نمیشه و همه چیز پاک میشه

با سلام

دوستان من چند تا لایوت ساختم و در یک لیست ویو گداشتم و چند منو تعریف کردم ولی هر بار که کلیک میکنم همه متن ها و لایئوت ها ظاهر میشن

چکار باید کرد

این هم لینک برنامه هستش

کد زیر:

Sub listview1_ItemClick (Position As Int, Value As Object)

If Position= 0 Then
ScrollView1.Panel.LoadLayout("Layout3")
ListView1.Visible=False
ScrollView1.Visible=True
Button1.Visible= True
End If

If Position= 1 Then
ScrollView1.Panel.LoadLayout("Layout4")
ListView1.Visible=False
ScrollView1.Visible=True
Button1.Visible= True

End If

If Position= 2 Then
Msgbox("سلام ذوستان ","Basic 4 android")
End If
End Sub

تشکر خسته نباشید*تعجب**تعجب**تعجب*