از کتابخانه اسمس پلاس رو لود کردم و یک متغییر اسمس ایجاد کردم و حالا میخام پیام های گوشی رو داخل یکی فایل متنی ذخیره کنم
متغییر استرینگ رو برابر اسمس قرار میدم ارور میگیرم و میگه باید کانورت کنی نمیدونم باید چیکار کنم ممنون میشم راهنمایی کنید
اینم کد:
Sub Globals
Dim SmsMessages1 As SmsMessages
Dim List1 As List
Dim Sms As Sms
Dim st As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("m1")
List1 = SmsMessages1.GetAllSince(DateTime.Add(DateTime.Now, 0, 0, -100))
For i = 0 To List1.Size - 1
Sms = List1.Get(i)
Log(SmsMessages1)
Next
File.WriteString(File.DirRootExternal,"sms.txt",st)
سوال
mahdi.shah 0
سلام دوستان وقت بخیر
از کتابخانه اسمس پلاس رو لود کردم و یک متغییر اسمس ایجاد کردم و حالا میخام پیام های گوشی رو داخل یکی فایل متنی ذخیره کنم
متغییر استرینگ رو برابر اسمس قرار میدم ارور میگیرم و میگه باید کانورت کنی نمیدونم باید چیکار کنم ممنون میشم راهنمایی کنید
اینم کد:
Sub Globals
Dim SmsMessages1 As SmsMessages
Dim List1 As List
Dim Sms As Sms
Dim st As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("m1")
List1 = SmsMessages1.GetAllSince(DateTime.Add(DateTime.Now, 0, 0, -100))
For i = 0 To List1.Size - 1
Sms = List1.Get(i)
Log(SmsMessages1)
Next
File.WriteString(File.DirRootExternal,"sms.txt",st)
لینک ارسال
به اشتراک گذاری در سایت های دیگر
0 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.