دریافت لیست وای فای های روشن در اطراف دستگاه با استفاده از کتابخانه ABWifi

[a.samiee 3]

سلام

من میخوام با استفاده از کتابخانهABwifi یه برنامه بنویسم که لیستی از دستگاههای وای فای دار موجود در اطراف گوشی رو برام لیست کنه 

برای شروع یه تیکه کد نوشتم تا فقط بتونم تعداد دستگاهها رو نشون بده که همش مقدار صفر رو بر میگردونه !

ممنون میشم اگه دوستان کمک کنند

Dim x as ABWifi

 

sub btn_scan_Click

Dim num as int

()st=x.ABLoadwifi

if st=true then

num=x.ABNumberOfavailablewifiNetworks

Lable1.text = num

Endif

Endsub

[پژمان نیکروان 6,055]

سلام

شما از کتابخانه MLWifi هم میتونید استفاده کنید و براحتی لیست شبکه های وای فای رو پیدا کنید:

Sub Globals
	Dim ml As MLScan
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Dim ml As MLScan
	ml.startScan("ml")
End Sub
Sub ml_ScanDone(Results() As String, Count As Int)
	ToastMessageShow("تعداد شبکه های پیدا شده: "&Count,True)
	
	For i=0 To Results.Length-1
		Log(Results(i))
	Next
End Sub

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

[stm32 22]

در در 1395/10/19, 10:26:34، پژمان نیکروان گفته است :

سلام

شما از کتابخانه MLWifi هم میتونید استفاده کنید و براحتی لیست شبکه های وای فای رو پیدا کنید:

Sub Globals
	Dim ml As MLScan
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Dim ml As MLScan
	ml.startScan("ml")
End Sub
Sub ml_ScanDone(Results() As String, Count As Int)
	ToastMessageShow("تعداد شبکه های پیدا شده: "&Count,True)
	
	For i=0 To Results.Length-1
		Log(Results(i))
	Next
End Sub

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

خیلی ممنون ولیکن من کد را که تو برنامه گذاشتم موقع اجرای برنامه برنامه اجرا نمیشه و متوقف میشه ارور میده

[پژمان نیکروان 6,055]

در ۱ ساعت قبل، stm32 گفته است :

خیلی ممنون ولیکن من کد را که تو برنامه گذاشتم موقع اجرای برنامه برنامه اجرا نمیشه و متوقف میشه ارور میده

چه ارروری میده؟

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

[stm32 22]

خدا خیرتون بده واقعا لازمش دارم

[پژمان نیکروان 6,055]

این 3 دسترسی رو اضافه کنید به منیفست:

AddPermission(android.permission.ACCESS_NETWORK_STATE)
AddPermission(android.permission.ACCESS_WIFI_STATE)
AddPermission(android.permission.CHANGE_WIFI_STATE)

برای اطلاعات بیشتر در مورد این کتابخانه و.....

به تو تاپیک زیر توی سایت مرجع مراجعه کنید:

B4A Library - Simple WIFI library | B4X Community - Android, iOS, desktop, server and IoT programming tools

B4A - MLwifi

 

[mojtaba68 62]

مهندس سلام --- ممنون میشم این کتابخانه اینجا پیوست کنید ؟

 

[mostafaHD 44]

 

در 24 دقیقه قبل، mojtaba68 گفته است :

مهندس سلام --- ممنون میشم این کتابخانه اینجا پیوست کنید ؟

 

خدمت شما.

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

mlwifi-2.17

[stm32 22]

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