رفتن به مطلب
بیسیک فور ایکس
mostafa-gh

چک کردن اتصال به اینترنت در برنامه

پست های پیشنهاد شده

سلام دوستان

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

من یه روش بهتون میگم که یه فایل txt خالی (حجم کمتر از 1 کیلوبایت) آپلود میکنید و به برنامه میدید اگه فایل با موفقیت دانلود شد یعنی نت وصله

اگه با موفقیت دانلود نشد یعنی وصل نیست

بریم سراغ آموزش(این آموزش نیارمند کتابخانه httpUtils2 هستش که پایین تایپیک قرار دادم)

اول در Globals بنویسید:

Dim ht As HttpJob

حالا در Activity_Create بنویسید:

  Activity.LoadLayout("1")
  ht.Initialize("basic4x",Me)
  ht.Download("http://basic4x.ir/text.txt")

بجای http://basic4x.ir/text.txt لینک فایل txt که آپلود کردید رو بزارید که حتما باید لینکش مستقیم باشه(مثلا نمیشه لینک پیکوفایل رو داد)

حالا بنویسید:

Sub JobDone(Job As HttpJob)
If Job.Success = True Then
Msgbox("اینترنت شما متصل است"&CRLF&"","پیام")
Else
Msgbox("اینترنت شما متصل نیست"&CRLF&"","خطا")
   End If
End Sub

امیدوارم مفید باشه :)

http://s2.picofile.com/file/8263204784/HttpUtils2_1_0.zip.html

اینم کتاب خانه HttpUtils2

-----------------

لینک دانلود سورس آموزش همین تایپیک:

http://s2.picofile.com/file/8263207142/net_check_basic4x_ir.rar.html

این روش کاملا تست شدس و با سرعت خیلی بالا اتصال نت رو چک میکنه

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


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

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

http://basic4x.ir/topic/444-کتابخانه-waitforinternet-بررسی-و-داشتن-اینترنت-در-بیسیک-فور-ا/

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


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

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

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

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

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

ورود به حساب کاربری

×