Цитата:
Ну канешь родная и приятнее и удобнее .. найдешь время ковырни -
она показывает счетчик цикла в сек. , но как его уменьшить ?
|
Хорошо как будет время попробую изучить этот вопрос))
Если через Автоит то там будет DllOpen(), DllCall()... и нужно знать какие функции в библиотеке вызывать.
Я пробовал только один раз с блюсоплей)), включал выключал, но там было все просто)))
PHP код:
$hDLL = DllOpen("C:\Windows\System32\BsSDK.dll")
$dllinit = DllCall($hDLL, "none", "Btsdk_Init") ;init
$bt_off = DLLCall($hDLL,"none","Btsdk_StopBluetooth");bt_off
;$bt_on = DllCall($hDLL, "none", "Btsdk_StartBluetooth") ;bt_on
DllClose($hDLL)
А пока я немного переделал упрощенный вариант переподключалки вафли))
вот так вот...
PHP код:
#include <Misc.au3>
#include <Nativewifi.au3>
_Singleton(@ScriptName, 0)
Opt('TrayAutoPause', 0)
$is_run = 1
$check_timeout = 2000
$icon_on = -158
$icon_off = -153
$fDebugWifi = False
_Wlan_StartSession()
While $is_run
If Not (_wlan_queryinterface() == "Connected") Then
TraySetIcon("netshell.dll", $icon_off)
_Wlan_Scan()
Sleep(500)
_Wlan_Connect(get_wnet(), False)
Else
TraySetIcon("netshell.dll", $icon_on)
EndIf
Sleep($check_timeout)
WEnd
Func get_wnet()
Local $sCurrentProfile
Local $asNetworks = _Wlan_GetNetworks(False, 0, 0)
For $i = 0 To UBound($asNetworks) - 1
If StringInStr($asNetworks[$i][9], "P") Then
$sCurrentProfile = $asNetworks[$i][0]
ExitLoop
EndIf
Next
Return $sCurrentProfile
EndFunc ;==>get_wnet
Ну и сам
UDF NativeWiFi для Автоит на тот случай если его у кого то нет.
...