Advertisement
Guest User

Untitled

a guest
Feb 26th, 2014
577
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.95 KB | None | 0 0
  1. @echo off
  2.  
  3. net session >nul 2>&1
  4.  
  5. if %errorLevel% == 0 goto hasPrivileges
  6. goto getPrivileges
  7.  
  8.  
  9. :hasPrivileges
  10. :: Czyszczenie zmiennej
  11. set czywlaczony=
  12.  
  13. :: Trick by do zmiennej przypisac wyjscie sprawdzania stanu
  14. for /f %%i in ('netsh wlan show hostednetwork ^| findstr "Started"') do set czywlaczony=%%i
  15.  
  16. :: Sprawdzamy czy wlaczyc czy wylaczyc hotspota
  17. if "%czywlaczony%" == "" goto wlacz
  18. goto wylacz
  19.  
  20.  
  21. :wlacz
  22. netsh wlan set hostednetwork mode=allow ssid="NAZWA SIECI" key="HASLO DO SIECI" > nul
  23. netsh wlan start hostednetwork | msg *
  24. goto koniec
  25.  
  26.  
  27. :wylacz
  28. netsh wlan stop hostednetwork | msg *
  29. goto koniec
  30.  
  31.  
  32. :getPrivileges
  33. setlocal DisableDelayedExpansion
  34. set "batchPath=%~0"
  35. setlocal EnableDelayedExpansion
  36. ECHO Set UAC = CreateObject^("Shell.Application"^) > "%temp%\OEgetPrivileges.vbs"
  37. ECHO UAC.ShellExecute "!batchPath!", "ELEV", "", "runas", 1 >> "%temp%\OEgetPrivileges.vbs"
  38. "%temp%\OEgetPrivileges.vbs"
  39.  
  40.  
  41. :koniec
  42. exit /B
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement