ایمان سعیدی 48 ارسال شده در 7 دی، ۱۳۹۳ اشتراک گذاری ارسال شده در 7 دی، ۱۳۹۳ سلام لایبری phone رو فعال کنید Dim Calls As List Dim CallLog As CallLog Calls = CallLog.GetAll(10) 'Get the last 10 calls For i = 0 To Calls.Size - 1 Dim c As CallItem c = Calls.Get(i) Dim callType, name As String Select c.CallType Case c.TYPE_INCOMING callType="Incoming" Case c.TYPE_MISSED callType = "Missed" Case c.TYPE_OUTGOING callType = "Outgoing" End Select name = c.CachedName If name = "" Then name = "N/A" Log("Number=" & c.Number & ", Name=" & name _ & ", Type=" & callType & ", Date=" & DateTime.Date(c.Date)) Next لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
.B.I.S 10 ارسال شده در 7 دی، ۱۳۹۳ اشتراک گذاری ارسال شده در 7 دی، ۱۳۹۳ سلام یه توضیح برای منه مبتدی نمیدین ؟؟!؟ *خنده شیطان از چه اشیایی استفاده کردین ؟!؟ یه توضیح مختصر لطفا *خنده شیطان لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
salmana 174 ارسال شده در 13 دی، ۱۳۹۳ اشتراک گذاری ارسال شده در 13 دی، ۱۳۹۳ یک توضیحی بده یا یک سمپلی بزار که متوجه نشدم. با تشکر لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
مهران محمودی 778 ارسال شده در 14 دی، ۱۳۹۳ اشتراک گذاری ارسال شده در 14 دی، ۱۳۹۳ اول یه لیست تعریف شده، یه نمونه از شیء CallLog که در کتابخانه Phone وجود داره تعریف شده. بعدش 10 تماس آخر رو از اون شی گرفته و در لیست ذخیره کرده. با حلقه for آیتم ها رو یکی یکی میخونه و ویژگیهای مورد نیازشون مثل نوع تماس (ورودی، خروجی، از دست رفته) ، نام مخاطب ، تاریخ تماس و شمارش رو Log میکنه. کد پیچیده ای نیست درکل، خود ایمان اگه اینجا رو ببینه جوابتون رو میده. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.